((\+ Missing/(Missing\==Create), \+ Create , \+ ~(Create)) ==> Create)). /*~ ~*/ % this should have been ok % (if_missing(Missing,Create) ==> ((\+ Missing/(Missing\==Create), \+ Create , \+ ~(Create)) ==> Create)). if_missing(Missing,Create) ==> ( ( \+ Missing/( % nonvar(Missing),nonvar(Create), Missing\=@=Create)) ==> Create). % prevents segfaults %:- set_prolog_flag(gc,true). /*~ ~*/ % prevents segfaults %:- set_prolog_flag(gc,true). :- mpred_test(foob(a)). %:- set_prolog_flag(gc,false). /*~ %~ ?-( mpred_test("Test_0001_Line_0000__A_in_user",user:foob(a))). passed=info(why_was_true(user:foob(a))) no_proof_for(foob(a)). no_proof_for(foob(a)). no_proof_for(foob(a)). name='logicmoo.pfc.test.sanity_base.IF_MISSING_01C-Test_0001_Line_0000__A_in_user'. JUNIT_CLASSNAME='logicmoo.pfc.test.sanity_base.IF_MISSING_01C'. JUNIT_CMD='timeout --foreground --preserve-status -s SIGKILL -k 10s 10s swipl -x /var/lib/jenkins/workspace/logicmoo_workspace/bin/lmoo-clif -t "[\'if_missing_01c.pfc\']"'. % saving_junit: /var/lib/jenkins/workspace/logicmoo_workspace/test_results/jenkins/Report-logicmoo-pfc-test-sanity_base-vSTARv0vSTARvvDOTvvSTARv-2-1--grep-2-i-WARN-ERROR-_file-00-fail-pass--Units-Logicmoo_pfc_test_sanity_base_IF_MISSING_01C_Test_0001_Line_0000_A_in_user-junit.xml ~*/ %:- set_prolog_flag(gc,false). :- ain(foob(b)). /*~ ~*/ :- mpred_test(\+foob(a)). /*~ %~ ?-( mpred_test("Test_0002_Line_0000__naf_A_in_user",user:(\+foob(a)))). failure=info((why_was_true(user:foob(a)),nop(ftrace(user:(\+foob(a)))))) no_proof_for(foob(a)). no_proof_for(foob(a)). no_proof_for(foob(a)). name='logicmoo.pfc.test.sanity_base.IF_MISSING_01C-Test_0002_Line_0000__naf_A_in_user'. JUNIT_CLASSNAME='logicmoo.pfc.test.sanity_base.IF_MISSING_01C'. JUNIT_CMD='timeout --foreground --preserve-status -s SIGKILL -k 10s 10s swipl -x /var/lib/jenkins/workspace/logicmoo_workspace/bin/lmoo-clif -t "[\'if_missing_01c.pfc\']"'. % saving_junit: /var/lib/jenkins/workspace/logicmoo_workspace/test_results/jenkins/Report-logicmoo-pfc-test-sanity_base-vSTARv0vSTARvvDOTvvSTARv-2-1--grep-2-i-WARN-ERROR-_file-00-fail-pass--Units-Logicmoo_pfc_test_sanity_base_IF_MISSING_01C_Test_0002_Line_0000_naf_A_in_user-junit.xml ~*/ :- mpred_test(foob(b)). /*~ %~ ?-( mpred_test("Test_0003_Line_0000__B_in_user",user:foob(b))). passed=info(why_was_true(user:foob(b))) no_proof_for(foob(b)). no_proof_for(foob(b)). no_proof_for(foob(b)). name=' goal=user:(\+foob(b)). time=0.0004451274871826172. passed=passed=info(why_was_true(user:(\+foob(b)))) no_proof_for(\+foob(b)). no_proof_for(\+foob(b)). no_proof_for(\+foob(b)). result=passed. ]]>