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

codes/2 functor (used by format).

Browse Source
This commit is contained in:
Vitor Santos Costa 2010-07-19 14:48:42 +01:00
parent 5347581f84
commit 6ebc31f2d8
4 changed files with 10 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
H/iatoms.h
View File

@ -48,6 +48,7 @@
AtomCleanCall = Yap_FullLookupAtom("$clean_call");
AtomColomn = Yap_LookupAtom(":");
AtomCodeSpace = Yap_LookupAtom("code_space");
AtomCodes = Yap_LookupAtom("codes");
AtomComma = Yap_LookupAtom(",");
AtomCompound = Yap_LookupAtom("compound");
AtomConsistencyError = Yap_LookupAtom("consistency_error");
@ -326,6 +327,7 @@
FunctorChangeModule = Yap_MkFunctor(AtomChangeModule,1);
FunctorCleanCall = Yap_MkFunctor(AtomCleanCall,2);
FunctorClist = Yap_MkFunctor(AtomWhen,4);
FunctorCodes = Yap_MkFunctor(AtomCodes,2);
FunctorComma = Yap_MkFunctor(AtomComma,2);
FunctorContext2 = Yap_MkFunctor(AtomContext,2);
FunctorConsistencyError = Yap_MkFunctor(AtomConsistencyError,1);

2
H/ratoms.h
View File

@ -48,6 +48,7 @@
AtomCleanCall = AtomAdjust(AtomCleanCall);
AtomColomn = AtomAdjust(AtomColomn);
AtomCodeSpace = AtomAdjust(AtomCodeSpace);
AtomCodes = AtomAdjust(AtomCodes);
AtomComma = AtomAdjust(AtomComma);
AtomCompound = AtomAdjust(AtomCompound);
AtomConsistencyError = AtomAdjust(AtomConsistencyError);
@ -326,6 +327,7 @@
FunctorChangeModule = FuncAdjust(FunctorChangeModule);
FunctorCleanCall = FuncAdjust(FunctorCleanCall);
FunctorClist = FuncAdjust(FunctorClist);
FunctorCodes = FuncAdjust(FunctorCodes);
FunctorComma = FuncAdjust(FunctorComma);
FunctorContext2 = FuncAdjust(FunctorContext2);
FunctorConsistencyError = FuncAdjust(FunctorConsistencyError);

4
H/tatoms.h
View File

@ -94,6 +94,8 @@
#define AtomColomn Yap_heap_regs->AtomColomn_
Atom AtomCodeSpace_;
#define AtomCodeSpace Yap_heap_regs->AtomCodeSpace_
Atom AtomCodes_;
#define AtomCodes Yap_heap_regs->AtomCodes_
Atom AtomComma_;
#define AtomComma Yap_heap_regs->AtomComma_
Atom AtomCompound_;
@ -650,6 +652,8 @@
#define FunctorCleanCall Yap_heap_regs->FunctorCleanCall_
Functor FunctorClist_;
#define FunctorClist Yap_heap_regs->FunctorClist_
Functor FunctorCodes_;
#define FunctorCodes Yap_heap_regs->FunctorCodes_
Functor FunctorComma_;
#define FunctorComma Yap_heap_regs->FunctorComma_
Functor FunctorContext2_;

2
misc/ATOMS
View File

@ -53,6 +53,7 @@ A CharacterCode N "character_code"
A CleanCall F "$clean_call"
A Colomn N ":"
A CodeSpace N "code_space"
A Codes N "codes"
A Comma N ","
A Compound N "compound"
A ConsistencyError N "consistency_error"
@ -331,6 +332,7 @@ F Catch Catch 3
F ChangeModule ChangeModule 1
F CleanCall CleanCall 2
F Clist When 4
F Codes Codes 2
F Comma Comma 2
F Context2 Context 2
F ConsistencyError ConsistencyError 1