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

View File

@ -78,6 +78,9 @@ restore_opcodes(yamop *pc, yamop *max USES_REGS)
case _call:
case _call_cpred:
case _call_usercpred:
case _dexecute:
case _execute:
case _execute_cpred:
case _fcall:
case _p_execute2:
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 = NEXTOP(pc,plyys);
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 */
case _cut:
case _cut_e:

View File

@ -399,11 +399,6 @@ output_walk(C,"Osbpp",[Op|_]) :-
walk_to_meta_call(C).
output_walk(C,"Osbpp",_) :- !,
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",_) :- !,
label_in_clause(C,"OtapFs","p").
output_walk(C,"Otapl",_) :- !,

View File

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

View File

@ -6,7 +6,7 @@
@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.
Each _Gi_ is a mode specification.