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

JPL and DL fixes

Browse Source 
documentation fix.


git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1572 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc 2006-03-22 15:00:29 +00:00
parent e90ddb032f
commit 01091f0bfa
8 changed files with 10 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
C/corout.c
View File

@ -581,7 +581,7 @@ Yap_InitCoroutPreds(void)
Atom at; Atom at;
PredEntry *pred; PredEntry *pred;
at = Yap_LookupAtom("$wake_up_goal"); at = Yap_FullLookupAtom("$wake_up_goal");
pred = RepPredProp(PredPropByFunc(Yap_MkFunctor(at, 2),0)); pred = RepPredProp(PredPropByFunc(Yap_MkFunctor(at, 2),0));
WakeUpCode = pred; WakeUpCode = pred;
#endif #endif

2
C/heapgc.c
View File

@ -2997,7 +2997,7 @@ compact_heap(void)
current = ptr; current = ptr;
continue; continue;
} }
} else{ } else {
if (current <= next_hb) { if (current <= next_hb) {
gc_B = update_B_H(gc_B, current, dest, dest+1 gc_B = update_B_H(gc_B, current, dest, dest+1
#ifdef TABLING #ifdef TABLING

3
C/tracer.c
View File

@ -126,6 +126,7 @@ low_level_trace(yap_low_level_port port, PredEntry *pred, CELL *args)
sc = Yap_heap_regs; sc = Yap_heap_regs;
vsc_count++; vsc_count++;
if (vsc_count == 229) jmp_deb(1);
#ifdef COMMENTED #ifdef COMMENTED
// if (vsc_count == 218280) // if (vsc_count == 218280)
// vsc_xstop = 1; // vsc_xstop = 1;
@ -183,7 +184,7 @@ low_level_trace(yap_low_level_port port, PredEntry *pred, CELL *args)
printf("\n"); printf("\n");
} }
#endif #endif
fprintf(Yap_stderr,"%lld ", vsc_count); fprintf(Yap_stderr,"%lld %x ", vsc_count,ActiveSignals);
#if defined(THREADS) || defined(YAPOR) #if defined(THREADS) || defined(YAPOR)
fprintf(Yap_stderr,"(%d)", worker_id); fprintf(Yap_stderr,"(%d)", worker_id);
#endif #endif

4
LGPL/JPL/java/Makefile.in
View File

@ -79,8 +79,8 @@ CLASSES=$(JAVA:.java=.class)
all: $(JPL) all: $(JPL)
$(JAVA): $(JAVA):
-@ ( cd jpl ; @LN_S@ $(srcdir)/jpl/*.java .) for f in $(CLS); do cp $(srcdir)/$$f jpl ; done
-@ ( cd jpl/fli ; @LN_S@ $(srcdir)/jpl/fli/*.java .) for f in $(FLI); do cp $(srcdir)/$$f jpl/fli ; done
$(JPL): $(JAVA) $(JPL): $(JAVA)
$(JAVAC) $(JAVA) $(JAVAC) $(JAVA)

2
LGPL/JPL/src/Makefile.in
View File

@ -23,7 +23,7 @@ LIBDIR=$(EROOTDIR)/lib/Yap
# #
# #
CC=@CC@ CC=@CC@
CFLAGS= @CFLAGS@ $(YAP_EXTRAS) $(DEFS) -I$(srcdir) -I../.. -I$(srcdir)/../../../include -I$(srcdir)/../../../library/yap2swi $(JVM_INC) -DIN_YAP=1 -DJAVA_HOME=\"$(JAVA_HOME)\" CFLAGS= @CFLAGS@ $(YAP_EXTRAS) $(DEFS) -I$(srcdir) -I../../.. -I$(srcdir)/../../../include -I$(srcdir)/../../../library/yap2swi $(JVM_INC) -DIN_YAP=1 -DJAVA_HOME=\"$(JAVA_HOME)\"
# #
# #
# You shouldn't need to change what follows. # You shouldn't need to change what follows.

2
Makefile.in
View File

@ -537,11 +537,11 @@ install_unix: startup libYap.a
$(INSTALL_PROGRAM) -m 755 yap@EXEC_SUFFIX@ $(DESTDIR)$(BINDIR)/yap $(INSTALL_PROGRAM) -m 755 yap@EXEC_SUFFIX@ $(DESTDIR)$(BINDIR)/yap
mkdir -p $(DESTDIR)$(YAPLIBDIR) mkdir -p $(DESTDIR)$(YAPLIBDIR)
$(INSTALL_DATA) startup $(DESTDIR)$(YAPLIBDIR)/startup $(INSTALL_DATA) startup $(DESTDIR)$(YAPLIBDIR)/startup
@INSTALL_DLLS@ $(INSTALL_DATA) -m 755 @YAPLIB@ $(DESTDIR)$(LIBDIR)
$(INSTALL_DATA) libYap.a $(DESTDIR)$(LIBDIR)/libYap.a $(INSTALL_DATA) libYap.a $(DESTDIR)$(LIBDIR)/libYap.a
mkdir -p $(DESTDIR)$(SHAREDIR)/Yap mkdir -p $(DESTDIR)$(SHAREDIR)/Yap
mkdir -p $(DESTDIR)$(SHAREDIR)/Yap/pl mkdir -p $(DESTDIR)$(SHAREDIR)/Yap/pl
for f in $(PL_SOURCES); do $(INSTALL) $$f $(DESTDIR)$(SHAREDIR)/Yap/pl; done for f in $(PL_SOURCES); do $(INSTALL) $$f $(DESTDIR)$(SHAREDIR)/Yap/pl; done
@INSTALL_DLLS@ $(INSTALL_PROGRAM) -m 755 @YAPLIB@ $(DESTDIR)$(LIBDIR)
@INSTALL_DLLS@ (cd library/random; make install) @INSTALL_DLLS@ (cd library/random; make install)
@INSTALL_DLLS@ (cd library/regex; make install) @INSTALL_DLLS@ (cd library/regex; make install)
@INSTALL_DLLS@ (cd library/system; make install) @INSTALL_DLLS@ (cd library/system; make install)

1
changes-5.1.html
View File

@ -16,6 +16,7 @@
<h2>Yap-5.1.0:</h2> <h2>Yap-5.1.0:</h2>
<ul> <ul>
<li> FIXED: compilation with dynamic libraries and JPL compilation.</li>
<li> FIXED: typo in manual (obs Bernd Gutmann).</li> <li> FIXED: typo in manual (obs Bernd Gutmann).</li>
<li> NEW: track the current block more aggressively, to avoid <li> NEW: track the current block more aggressively, to avoid
expand_index taking too long searching for a block.</li> expand_index taking too long searching for a block.</li>

2
docs/yap.tex
View File

@ -2455,7 +2455,7 @@ Prolog standard the default action is @code{error}).
After defining @code{undefined/1} by: After defining @code{undefined/1} by:
@example @example
undefined(A) :- format('Undefined predicate: ~w~n'), fail. undefined(A) :- format('Undefined predicate: ~w~n',[A]), fail.
@end example @end example
@noindent @noindent
and executing the goal: and executing the goal: