fix CHARESCAPE mess (Ulrich #292)

2014-03-11 10:24:44 +00:00
parent 4160562e45
commit 8cf9e44a57
5 changed files with 3 additions and 6 deletions
--- a/C/modules.c
+++ b/C/modules.c
@@ -345,6 +345,7 @@ Yap_InitModules(void)
 {
  CACHE_REGS
  LookupModule(MkAtomTerm(AtomProlog));
+  LOCAL_SourceModule =  MkAtomTerm(AtomProlog);
  LookupModule(USER_MODULE);
  LookupModule(IDB_MODULE);
  LookupModule(ATTRIBUTES_MODULE);