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

varia

Browse Source
This commit is contained in:
Vitor Santos Costa 2017-08-27 22:26:44 +01:00
parent 3239778cf5
commit 6e6738b199
4 changed files with 7 additions and 17 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
H/rclause.h
View File

@ -78,6 +78,9 @@ restore_opcodes(yamop *pc, yamop *max USES_REGS)
case _call: case _call:
case _call_cpred: case _call_cpred:
case _call_usercpred: case _call_usercpred:
case _dexecute:
case _execute:
case _execute_cpred:
case _fcall: case _fcall:
case _p_execute2: case _p_execute2:
OrArgAdjust(pc->y_u.Osbpp.or_arg); OrArgAdjust(pc->y_u.Osbpp.or_arg);
@ -479,14 +482,6 @@ restore_opcodes(yamop *pc, yamop *max USES_REGS)
pc->y_u.plyys.flags = ConstantAdjust(pc->y_u.plyys.flags); pc->y_u.plyys.flags = ConstantAdjust(pc->y_u.plyys.flags);
pc = NEXTOP(pc,plyys); pc = NEXTOP(pc,plyys);
break; break;
/* instructions type pp */
case _dexecute:
case _execute:
case _execute_cpred:
pc->y_u.pp.p = PtoPredAdjust(pc->y_u.pp.p);
pc->y_u.pp.p0 = PtoPredAdjust(pc->y_u.pp.p0);
pc = NEXTOP(pc,pp);
break;
/* instructions type s */ /* instructions type s */
case _cut: case _cut:
case _cut_e: case _cut_e:

5
misc/buildops
View File

@ -399,11 +399,6 @@ output_walk(C,"Osbpp",[Op|_]) :-
walk_to_meta_call(C). walk_to_meta_call(C).
output_walk(C,"Osbpp",_) :- !, output_walk(C,"Osbpp",_) :- !,
label_in_clause(C,"Osbpp","p0"). label_in_clause(C,"Osbpp","p0").
output_walk(C,"pp",[Op|_]) :-
c_call_op(Op), !,
walk_to_c_code(C,"pp","p").
output_walk(C,"pp",_) :- !,
label_in_clause(C,"pp","p0").
output_walk(C,"OtapFs",_) :- !, output_walk(C,"OtapFs",_) :- !,
label_in_clause(C,"OtapFs","p"). label_in_clause(C,"OtapFs","p").
output_walk(C,"Otapl",_) :- !, output_walk(C,"Otapl",_) :- !,

6
packages/raptor/CMakeLists.txt
View File

@ -54,9 +54,9 @@ else (WIN32)
endif() endif()
install(TARGETS libxml2 install(TARGETS libxml2
LIBRARY DESTINATION ${libdir} LIBRARY DESTINATION ${dlls}
RUNTIME DESTINATION ${dlls} RUNTIME DESTINATION ${dlls}
ARCHIVE DESTINATION ${dlls} ARCHIVE DESTINATION ${libdir}
) )
endif(WIN32) endif(WIN32)
@ -111,7 +111,7 @@ IF (RAPTOR_FOUND)
install(TARGETS raptor install(TARGETS raptor
LIBRARY DESTINATION ${dlls} LIBRARY DESTINATION ${dlls}
RUNTIME DESTINATION ${dlls} RUNTIME DESTINATION ${dlls}
ARCHIVE DESTINATION ${dlls} ARCHIVE DESTINATION ${libdir}
) )

2
pl/meta.yap
View File

@ -6,7 +6,7 @@
@ingroup YAPModules @ingroup YAPModules
@{ @{
@pred meta_predicate(_G1_,...., _Gn) is directive @pred meta_predicate(G1 , Gj , Gn) is directive
Declares that this predicate manipulates references to predicates. Declares that this predicate manipulates references to predicates.
Each _Gi_ is a mode specification. Each _Gi_ is a mode specification.