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

loops

Browse Source
This commit is contained in:
Vitor Santos Costa 2019-02-11 09:28:46 +00:00
parent 3fdc260ee6
commit ac60bee30d
3 changed files with 460 additions and 369 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

826
C/terms.c
View File

File diff suppressed because it is too large Load Diff

2
C/write.c
View File

@ -1105,7 +1105,7 @@ void Yap_plwrite(Term t, StreamDesc *mywrite, int max_depth, int flags,
wglb.lw = separator; wglb.lw = separator;
if ((flags & Handle_cyclics_f) ){ if ((flags & Handle_cyclics_f) ){
Yap_CyclesInTerm(t, 3, NULL PASS_REGS); t = Yap_CyclesInTerm(t PASS_REGS);
} }
/* protect slots for portray */ /* protect slots for portray */

1
H/Yapproto.h
View File

@ -445,6 +445,7 @@ bool Yap_isDirectory(const char *FileName);
extern bool Yap_Exists(const char *f); extern bool Yap_Exists(const char *f);
/* terms.c */ /* terms.c */
extern Term Yap_CyclesInTerm(Term t USES_REGS);
extern bool Yap_IsCyclicTerm(Term inp USES_REGS); extern bool Yap_IsCyclicTerm(Term inp USES_REGS);
extern Term Yap_BreakCycles(Term inp, UInt arity, Term *listp USES_REGS); extern Term Yap_BreakCycles(Term inp, UInt arity, Term *listp USES_REGS);
extern void Yap_InitTermCPreds(void); extern void Yap_InitTermCPreds(void);