diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Merge branch 'master' of yap.dcc.fc.up.pt:yap-6

Browse Source
This commit is contained in:
U-Khasa\Vitor 2010-03-01 02:50:46 -06:00
commit f7b05ede15
2 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
C/cdmgr.c
View File

@ -2993,7 +2993,7 @@ p_owner_file(void)
UNLOCK(pe->PELock); UNLOCK(pe->PELock);
return FALSE; return FALSE;
} }
owner = pe->src.OwnerFile owner = pe->src.OwnerFile;
UNLOCK(pe->PELock); UNLOCK(pe->PELock);
return Yap_unify(ARG3, MkAtomTerm(owner)); return Yap_unify(ARG3, MkAtomTerm(owner));
} }

1
pl/boot.yap
View File

@ -97,6 +97,7 @@ true :- true.
'$init_globals' :- '$init_globals' :-
'$init_consult', '$init_consult',
nb_setval('$chr_toplevel_show_store',false),
nb_setval('$break',0), nb_setval('$break',0),
% '$set_read_error_handler'(error), let the user do that % '$set_read_error_handler'(error), let the user do that
nb_setval('$open_expands_filename',true), nb_setval('$open_expands_filename',true),