'). 0m49m0m0m0m % init.pl:2353: (13)$0m0m94m49m15m[system]0m49m0m0m0m#0m2m96m49m15m '$sig_atomic'(setup_call_cleanup(with_mutex('$load_file','$mt_start_load'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',(0x557035f2eb00),[expand(false),expand(true)])),'$mt_do_load'((0x557035f2eb00),'mt_03.pl','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',user,[expand(false),expand(true)]),'$mt_end_load'((0x557035f2eb00)))). 0m49m0m0m0m0m1m92m49m10m no(clause) 0m49m0m21m0m (14)$0m0m94m49m15m[system]0m49m0m0m0m0m2m37m40m16m '$c_call_prolog'. 0m49m39m0m0m0m1m92m49m10m no(clause) 0m49m0m21m0m (16)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m94m49m15m setup_call_catcher_cleanup(system:with_mutex('$load_file','$mt_start_load'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',(0x557035f2eb00),[expand(false),expand(true)])),system:'$mt_do_load'((0x557035f2eb00),'mt_03.pl','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',user,[expand(false),expand(true)]),A,system:'$mt_end_load'((0x557035f2eb00))). 0m49m0m0m0m % init.pl:646: (18)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m91m49m14m '$qdo_load_file'('mt_03.pl','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',user,[expand(false),expand(true)]). 0m49m0m0m0m % init.pl:2546: (21)$0m0m94m49m15m[system]0m49m0m0m0m#0m2m92m49m10m '$do_load_file_2'('mt_03.pl','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',user,compiled,[expand(false),expand(true)]). 0m49m0m0m0m % init.pl:2592: (25)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m94m49m15m setup_call_catcher_cleanup(system:'$start_consult'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',1632225690.4083154),system:'$load_file'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',A,[expand(false),expand(true)]),B,system:'$end_consult'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',lexstate(202,swi),user)). 0m49m0m0m0m % init.pl:646: (26)$0m0m94m49m15m[system]0m49m0m0m0m#0m2m96m49m15m '$load_file'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',A,[expand(false),expand(true)]). 0m49m0m0m0m % init.pl:3007: (27)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m92m49m15m '$compile_term'((:-clause_u(modA:codeB,A)),B,'* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl '). 0m49m0m0m0m % init.pl:3074: (28)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m92m49m15m '$compile_term'((:-clause_u(modA:codeB,A)),B,'* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',-). 0m49m0m0m0m % init.pl:3084: (29)$0m0m94m49m15m[system]0m49m0m0m0m#0m2m97m40m14m '$execute_directive'(clause_u(modA:codeB,A),'* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl '). 0m49m0m0m0m % init.pl:3549: (30)$0m0m94m49m15m[system]0m49m0m0m0m#0m1m95m49m13m '$execute_directive_2'(clause_u(modA:codeB,A),'* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl '). 0m49m0m21m0m % init.pl:3571: (31)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m96m49m10m '$execute_directive_3'(clause_u(modA:codeB,A)). 0m49m0m0m0m % init.pl:3574: (32)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m94m49m15m catch(myMt:clause_u(modA:codeB,A),error(B,C),system:'$exception_in_directive'(error(B,C))). 0m49m0m0m0m % init.pl:546: (33)0m0m39m49m10m[myMt]0m49m39m0m0m#0m1m96m49m10m pfc_lib:clause_u(modA:codeB,A). 0m49m0m21m0m % mpred_core.pl:4331: (34)$0m0m39m49m10m[myMt]0m49m39m0m0m0m1m96m49m10m pfc_lib:log_failure(failed_mpred_test(clause_u(modA:codeB,A))). 0m49m0m21m0m % mpred_core.pl:4209: (35)$0m0m91m49m11m[rtrace]0m49m0m0m0m0m0m39m49m10m rtrace:quietly(myMt:(log_lines(red,failure+failed_mpred_test(clause_u(modA:codeB,A))),maybe_mpred_break(failed_mpred_test(clause_u(modA:codeB,A))),log_failure_red)). 0m49m39m0m0m % rtrace.pl:217: (36)$0m0m39m49m10m[myMt]0m49m39m0m0m0m0m39m49m10m ''(myMt:(log_lines(red,failure+failed_mpred_test(clause_u(modA:codeB,A))),maybe_mpred_break(failed_mpred_test(clause_u(modA:codeB,A))),log_failure_red)). 0m49m39m0m0m0m1m92m49m10m no(clause) 0m49m0m21m0m (37)0m0m39m49m10m[myMt]0m49m39m0m0m0m1m96m49m10m pfc_lib:maybe_mpred_break(failed_mpred_test(clause_u(modA:codeB,A))). 0m49m0m21m0m % mpred_core.pl:4229: (38)$0m0m39m49m10m[myMt]0m49m39m0m0m0m2m39m49m14m pfc_lib:break_ex. 0m49m39m0m0m % mpred_core.pl:4226: (39)$0m0m91m49m11m[rtrace]0m49m0m0m0m0m0m39m49m10m rtrace:quietly(myMt:(log_failure_red,dumpST,log_failure_red)). 0m49m39m0m0m % rtrace.pl:217: (40)$0m0m39m49m10m[myMt]0m49m39m0m0m0m0m39m49m10m ''(myMt:(log_failure_red,dumpST,log_failure_red)). 0m49m39m0m0m0m1m92m49m10m no(clause) 0m49m0m21m0m (41)0m0m39m49m10m[myMt]0m49m39m0m0m0m0m35m49m17m dumpst:dumpST. 0m49m39m0m0m % dumpst.pl:150: %~ FILE: * https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl#L56 31msmart_format("%%%%%%%%%%%%%%%%%%%%%%%%%%% (~w) ~w %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%\n",[red,failure]) 39m %~ DUMP_BREAK/0 %~ message_hook(unhandled_exception(abort),error,['Unhandled exception: ','~p'-[abort]]) Unhandled exception: abort ERROR: Unhandled exception: abort ~*/ /*~ ~*/ /* % % PFC is codeA language extension for prolog. % % It adds codeA new type of module inheritance % % Dec 13, 2035 % Douglas Miles */ % was_module(header_sane,[]). :- include(library(logicmoo_test_header)). %:- add_import_module(header_sane,baseKB,end). /*~ running(-), %~ reload_of_test_header. %~ %~ Reset DB complete for myMt %~ %~ Reset DB complete for myMt %~ this_test_might_need( :-( expects_dialect(pfc))) %~ this_test_might_need( :-( use_module( library(logicmoo_plarkc)))) ~*/ %:- add_import_module(header_sane,baseKB,end). :- set_defaultAssertMt(myMt). /*~ ~*/ :- expects_dialect(pfc). /*~ ~*/ :- mpred_trace_exec. /*~ ~*/ mtProlog(modA). /*~ No source location!? %~ message_hook( %~ error( %~ permission_error(redefine,imported_procedure,baseKB:mtProlog/1), %~ context(system:'$record_clause'/3,Context_Kw)), %~ error, %~ [ 'No permission to ~w ~w `~p\'' - [ redefine, %~ imported_procedure, %~ baseKB : mtProlog/1]]) No permission to redefine imported_procedure `baseKB:(mtProlog/1)' ERROR: No permission to redefine imported_procedure `baseKB:(mtProlog/1)' ~*/ mtProlog(modB). /*~ No source location!? %~ message_hook( %~ error( %~ permission_error(redefine,imported_procedure,baseKB:mtProlog/1), %~ context(system:'$record_clause'/3,Context_Kw)), %~ error, %~ [ 'No permission to ~w ~w `~p\'' - [ redefine, %~ imported_procedure, %~ baseKB : mtProlog/1]]) No permission to redefine imported_procedure `baseKB:(mtProlog/1)' ERROR: No permission to redefine imported_procedure `baseKB:(mtProlog/1)' ~*/ modA: (codeA:- printAll('$current_source_module'(_M)),codeB). /*~ No source location!? ~*/ modB: (codeB). %:- \+ modA:codeA. /*~ No source location!? ~*/ %:- \+ modA:codeA. genlMt(modA,modB). % before test, to make sure codeA was not accdently defined in modB /*~ ~*/ % before test, to make sure codeA was not accdently defined in modB :- sanity(\+ module_clause(modB:codeA,_)). /*~ %~ /var/lib/jenkins/workspace/logicmoo_workspace/packs_sys/pfc/t/sanity_base/mt_03.pl:37 %~ ?-( mpred_test( "Test_0006_Line_0000__naf_CodeA_in_modB_in_myMt", %~ myMt : \+( module_clause(modB:codeA,Clause_Kw)))). passed=info(why_was_true(myMt:(\+module_clause(modB:codeA,_94536)))) no_proof_for(\+module_clause(modB:codeA,Clause_Kw2)). no_proof_for(\+module_clause(modB:codeA,Clause_Kw2)). no_proof_for(\+module_clause(modB:codeA,Clause_Kw2)). name='logicmoo.pfc.test.sanity_base.MT_03-Test_0006_Line_0000__naf_CodeA_in_modB_in_myMt'. JUNIT_CLASSNAME='logicmoo.pfc.test.sanity_base.MT_03'. JUNIT_CMD='timeout --foreground --preserve-status -s SIGKILL -k 10s 10s swipl -x /var/lib/jenkins/workspace/logicmoo_workspace/bin/lmoo-clif -t "[\'mt_03.pl\']"'. % 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_MT_03_Test_0006_Line_0000_naf_CodeA_in_modB_in_myMt-junit.xml ~*/ :- sanity(\+ module_clause(modA:codeB,_)). /*~ %~ /var/lib/jenkins/workspace/logicmoo_workspace/packs_sys/pfc/t/sanity_base/mt_03.pl:38 %~ ?-( mpred_test( "Test_0007_Line_0000__naf_CodeB_in_modA_in_myMt", %~ myMt : \+( module_clause(modA:codeB,Clause_Kw)))). passed=info(why_was_true(myMt:(\+module_clause(modA:codeB,_222636)))) no_proof_for(\+module_clause(modA:codeB,Clause_Kw2)). no_proof_for(\+module_clause(modA:codeB,Clause_Kw2)). no_proof_for(\+module_clause(modA:codeB,Clause_Kw2)). name='logicmoo.pfc.test.sanity_base.MT_03-Test_0007_Line_0000__naf_CodeB_in_modA_in_myMt'. JUNIT_CLASSNAME='logicmoo.pfc.test.sanity_base.MT_03'. JUNIT_CMD='timeout --foreground --preserve-status -s SIGKILL -k 10s 10s swipl -x /var/lib/jenkins/workspace/logicmoo_workspace/bin/lmoo-clif -t "[\'mt_03.pl\']"'. % 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_MT_03_Test_0007_Line_0000_naf_CodeB_in_modA_in_myMt-junit.xml ~*/ :- sanity( module_clause(modA:codeA,_)). /*~ %~ ?-( mpred_test("Test_0008_Line_0000__CodeA_in_modA_in_myMt",myMt:module_clause(modA:codeA,Clause_Kw))). passed=info(why_was_true(myMt:module_clause(modA:codeA,(printAll('$current_source_module'(_10682)),codeB)))) no_proof_for(module_clause(modA:codeA,(printAll($current_source_module(Module)),codeB))). no_proof_for(module_clause(modA:codeA,(printAll($current_source_module(Module)),codeB))). no_proof_for(module_clause(modA:codeA,(printAll($current_source_module(Module)),codeB))). name='logicmoo.pfc.test.sanity_base.MT_03-Test_0008_Line_0000__CodeA_in_modA_in_myMt'. JUNIT_CLASSNAME='logicmoo.pfc.test.sanity_base.MT_03'. JUNIT_CMD='timeout --foreground --preserve-status -s SIGKILL -k 10s 10s swipl -x /var/lib/jenkins/workspace/logicmoo_workspace/bin/lmoo-clif -t "[\'mt_03.pl\']"'. % 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_MT_03_Test_0008_Line_0000_CodeA_in_modA_in_myMt-junit.xml ~*/ :- sanity( module_clause(modB:codeB,_)). % before test, genlMt makes the rule available and should not corrupt the modA module /*~ %~ /var/lib/jenkins/workspace/logicmoo_workspace/packs_sys/pfc/t/sanity_base/mt_03.pl:41 %~ ?-( mpred_test("Test_0009_Line_0000__CodeB_in_modB_in_myMt",myMt:module_clause(modB:codeB,Clause_Kw))). passed=info(why_was_true(myMt:module_clause(modB:codeB,true))) no_proof_for(module_clause(modB:codeB,true)). no_proof_for(module_clause(modB:codeB,true)). no_proof_for(module_clause(modB:codeB,true)). name='logicmoo.pfc.test.sanity_base.MT_03-Test_0009_Line_0000__CodeB_in_modB_in_myMt'. JUNIT_CLASSNAME='logicmoo.pfc.test.sanity_base.MT_03'. JUNIT_CMD='timeout --foreground --preserve-status -s SIGKILL -k 10s 10s swipl -x /var/lib/jenkins/workspace/logicmoo_workspace/bin/lmoo-clif -t "[\'mt_03.pl\']"'. % 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_MT_03_Test_0009_Line_0000_CodeB_in_modB_in_myMt-junit.xml ~*/ % before test, genlMt makes the rule available and should not corrupt the modA module :- warn_fail_TODO(clause_u(modA:codeB,_)). % make sure genlMt didnt unassert /*~ %~ :-( warn_fail_TODO( clause_u(modA:codeB,Kw))). ~*/ % make sure genlMt didnt unassert :- sanity(clause_u(modB:codeB,_)). % run the test /*~ %~ /var/lib/jenkins/workspace/logicmoo_workspace/packs_sys/pfc/t/sanity_base/mt_03.pl:47 %~ ?-( mpred_test("Test_0010_Line_0000__CodeB_in_modB_in_myMt",myMt:clause_u(modB:codeB,Kw))). passed=info(why_was_true(myMt:clause_u(modB:codeB,true))) no_proof_for(clause_u(modB:codeB,true)). no_proof_for(clause_u(modB:codeB,true)). no_proof_for(clause_u(modB:codeB,true)). name='logicmoo.pfc.test.sanity_base.MT_03-Test_0010_Line_0000__CodeB_in_modB_in_myMt'. JUNIT_CLASSNAME='logicmoo.pfc.test.sanity_base.MT_03'. JUNIT_CMD='timeout --foreground --preserve-status -s SIGKILL -k 10s 10s swipl -x /var/lib/jenkins/workspace/logicmoo_workspace/bin/lmoo-clif -t "[\'mt_03.pl\']"'. % 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_MT_03_Test_0010_Line_0000_CodeB_in_modB_in_myMt-junit.xml ~*/ % run the test modA: (:- codeA). % to make codeB sure is available in modA /*~ No source location!? ~*/ % to make codeB sure is available in modA :- mpred_must( clause_u(modA:codeB,_)). % to make sure codeA does not get accdently defined in modB /*~ %~ FIlE: * https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl#L56 31msmart_format("%%%%%%%%%%%%%%%%%%%%%%%%%%% (~w) ~w %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%\n",[red,failure+failed_mpred_test(clause_u(modA:codeB,_485876))]) 39m %~ failed_mpred_test( clause_u(modA:codeB,Kw)) %~ FILE: * https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl#L56 31msmart_format("%%%%%%%%%%%%%%%%%%%%%%%%%%% (~w) ~w %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%\n",[red,failure]) 39m %~ FIlE: * https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl#L56 (0)$0m0m94m49m15m[system]0m49m0m0m0m0m2m37m40m16m '$c_call_prolog'. 0m49m39m0m0m0m1m92m49m10m no(clause) 0m49m0m21m0m (1)$0m0m39m49m13m[$toplevel]0m49m39m0m0m0m0m39m49m13m '$toplevel'. 0m49m39m0m0m % toplevel.pl:701: (2)$0m0m39m49m13m[$toplevel]0m49m39m0m0m0m0m32m49m12m '$runtoplevel'. 0m49m39m0m0m % toplevel.pl:713: (10)$0m0m94m49m15m[system]0m49m0m0m0m0m2m96m49m15m '$load_file'('mt_03.pl',user,[expand(false),expand(true)]). 0m49m0m0m0m % init.pl:2353: (13)$0m0m94m49m15m[system]0m49m0m0m0m#0m2m96m49m15m '$sig_atomic'(setup_call_cleanup(with_mutex('$load_file','$mt_start_load'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',(0x557035f2e780),[expand(false),expand(true)])),'$mt_do_load'((0x557035f2e780),'mt_03.pl','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',user,[expand(false),expand(true)]),'$mt_end_load'((0x557035f2e780)))). 0m49m0m0m0m0m1m92m49m10m no(clause) 0m49m0m21m0m (14)$0m0m94m49m15m[system]0m49m0m0m0m0m2m37m40m16m '$c_call_prolog'. 0m49m39m0m0m0m1m92m49m10m no(clause) 0m49m0m21m0m (16)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m94m49m15m setup_call_catcher_cleanup(system:with_mutex('$load_file','$mt_start_load'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',(0x557035f2e780),[expand(false),expand(true)])),system:'$mt_do_load'((0x557035f2e780),'mt_03.pl','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',user,[expand(false),expand(true)]),A,system:'$mt_end_load'((0x557035f2e780))). 0m49m0m0m0m % init.pl:646: (18)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m91m49m14m '$qdo_load_file'('mt_03.pl','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',user,[expand(false),expand(true)]). 0m49m0m0m0m % init.pl:2546: (21)$0m0m94m49m15m[system]0m49m0m0m0m#0m2m92m49m10m '$do_load_file_2'('mt_03.pl','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',user,compiled,[expand(false),expand(true)]). 0m49m0m0m0m % init.pl:2592: (25)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m94m49m15m setup_call_catcher_cleanup(system:'$start_consult'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',1632225690.4083154),system:'$load_file'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',A,[expand(false),expand(true)]),B,system:'$end_consult'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',lexstate(202,swi),user)). 0m49m0m0m0m % init.pl:646: (26)$0m0m94m49m15m[system]0m49m0m0m0m#0m2m96m49m15m '$load_file'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',A,[expand(false),expand(true)]). 0m49m0m0m0m % init.pl:3007: (31)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m96m49m10m '$execute_directive_3'(clause_u(modA:codeB,A)). 0m49m0m0m0m % init.pl:3574: (32)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m94m49m15m catch(myMt:clause_u(modA:codeB,A),error(B,C),system:'$exception_in_directive'(error(B,C))). 0m49m0m0m0m % init.pl:546: (33)0m0m39m49m10m[myMt]0m49m39m0m0m#0m1m96m49m10m pfc_lib:clause_u(modA:codeB,A). 0m49m0m21m0m % mpred_core.pl:4331: (35)0m0m91m49m11m[rtrace]0m49m0m0m0m0m0m39m49m10m rtrace:quietly(myMt:(log_lines(red,failure+failed_mpred_test(clause_u(modA:codeB,A))),maybe_mpred_break(failed_mpred_test(clause_u(modA:codeB,A))),log_failure_red)). 0m49m39m0m0m % rtrace.pl:217: (36)$0m0m39m49m10m[myMt]0m49m39m0m0m0m0m39m49m10m ''(myMt:(log_lines(red,failure+failed_mpred_test(clause_u(modA:codeB,A))),maybe_mpred_break(failed_mpred_test(clause_u(modA:codeB,A))),log_failure_red)). 0m49m39m0m0m0m1m92m49m10m no(clause) 0m49m0m21m0m (38)0m0m39m49m10m[myMt]0m49m39m0m0m0m2m39m49m14m pfc_lib:break_ex. 0m49m39m0m0m % mpred_core.pl:4226: (39)$0m0m91m49m11m[rtrace]0m49m0m0m0m0m0m39m49m10m rtrace:quietly(myMt:(log_failure_red,dumpST,log_failure_red)). 0m49m39m0m0m % rtrace.pl:217: (40)$0m0m39m49m10m[myMt]0m49m39m0m0m0m0m39m49m10m ''(myMt:(log_failure_red,dumpST,log_failure_red)). 0m49m39m0m0m0m1m92m49m10m no(clause) 0m49m0m21m0m (43)0m0m91m49m17m[butterfly]0m49m0m0m0m0m0m39m49m10m butterfly:in_bfly(f,myMt:zotrace(with_all_dmsg((b_setval('$dump_frame',500),dumpST1)))). 0m49m39m0m0m % butterfly_console.pl:226: %~ FILE: * https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl#L56 31msmart_format("%%%%%%%%%%%%%%%%%%%%%%%%%%% (~w) ~w %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%\n",[red,failure]) 39m %~ DUMP_BREAK/0 %~ message_hook(unhandled_exception(abort),error,['Unhandled exception: ','~p'-[abort]]) Unhandled exception: abort ERROR: Unhandled exception: abort ~*/ /*~ ~*/ /* % % PFC is codeA language extension for prolog. % % It adds codeA new type of module inheritance % % Dec 13, 2035 % Douglas Miles */ % was_module(header_sane,[]). :- include(library(logicmoo_test_header)). %:- add_import_module(header_sane,baseKB,end). /*~ running(-), %~ /var/lib/jenkins/.local/share/swi-prolog/pack/logicmoo_utils/prolog/logicmoo_test_header.pl:59 %~ reload_of_test_header. %~ %~ Reset DB complete for myMt %~ %~ Reset DB complete for myMt %~ this_test_might_need( :-( expects_dialect(pfc))) %~ this_test_might_need( :-( use_module( library(logicmoo_plarkc)))) ~*/ %:- add_import_module(header_sane,baseKB,end). :- set_defaultAssertMt(myMt). /*~ ~*/ :- expects_dialect(pfc). /*~ ~*/ :- mpred_trace_exec. /*~ ~*/ mtProlog(modA). /*~ No source location!? %~ message_hook( %~ error( %~ permission_error(redefine,imported_procedure,baseKB:mtProlog/1), %~ context(system:'$record_clause'/3,Context_Kw)), %~ error, %~ [ 'No permission to ~w ~w `~p\'' - [ redefine, %~ imported_procedure, %~ baseKB : mtProlog/1]]) No permission to redefine imported_procedure `baseKB:(mtProlog/1)' ERROR: No permission to redefine imported_procedure `baseKB:(mtProlog/1)' ~*/ mtProlog(modB). /*~ No source location!? %~ message_hook( %~ error( %~ permission_error(redefine,imported_procedure,baseKB:mtProlog/1), %~ context(system:'$record_clause'/3,Context_Kw)), %~ error, %~ [ 'No permission to ~w ~w `~p\'' - [ redefine, %~ imported_procedure, %~ baseKB : mtProlog/1]]) No permission to redefine imported_procedure `baseKB:(mtProlog/1)' ERROR: No permission to redefine imported_procedure `baseKB:(mtProlog/1)' ~*/ modA: (codeA:- printAll('$current_source_module'(_M)),codeB). /*~ No source location!? ~*/ modB: (codeB). %:- \+ modA:codeA. /*~ No source location!? ~*/ %:- \+ modA:codeA. genlMt(modA,modB). % before test, to make sure codeA was not accdently defined in modB /*~ ~*/ % before test, to make sure codeA was not accdently defined in modB :- sanity(\+ module_clause(modB:codeA,_)). /*~ %~ ?-( mpred_test( "Test_0011_Line_0000__naf_CodeA_in_modB_in_myMt", %~ myMt : \+( module_clause(modB:codeA,Clause_Kw)))). passed=info(why_was_true(myMt:(\+module_clause(modB:codeA,_93006)))) no_proof_for(\+module_clause(modB:codeA,Clause_Kw2)). no_proof_for(\+module_clause(modB:codeA,Clause_Kw2)). no_proof_for(\+module_clause(modB:codeA,Clause_Kw2)). name='logicmoo.pfc.test.sanity_base.MT_03-Test_0011_Line_0000__naf_CodeA_in_modB_in_myMt'. JUNIT_CLASSNAME='logicmoo.pfc.test.sanity_base.MT_03'. JUNIT_CMD='timeout --foreground --preserve-status -s SIGKILL -k 10s 10s swipl -x /var/lib/jenkins/workspace/logicmoo_workspace/bin/lmoo-clif -t "[\'mt_03.pl\']"'. % 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_MT_03_Test_0011_Line_0000_naf_CodeA_in_modB_in_myMt-junit.xml ~*/ :- sanity(\+ module_clause(modA:codeB,_)). /*~ %~ ?-( mpred_test( "Test_0012_Line_0000__naf_CodeB_in_modA_in_myMt", %~ myMt : \+( module_clause(modA:codeB,Clause_Kw)))). passed=info(why_was_true(myMt:(\+module_clause(modA:codeB,_288152)))) no_proof_for(\+module_clause(modA:codeB,Clause_Kw2)). no_proof_for(\+module_clause(modA:codeB,Clause_Kw2)). no_proof_for(\+module_clause(modA:codeB,Clause_Kw2)). name='logicmoo.pfc.test.sanity_base.MT_03-Test_0012_Line_0000__naf_CodeB_in_modA_in_myMt'. JUNIT_CLASSNAME='logicmoo.pfc.test.sanity_base.MT_03'. JUNIT_CMD='timeout --foreground --preserve-status -s SIGKILL -k 10s 10s swipl -x /var/lib/jenkins/workspace/logicmoo_workspace/bin/lmoo-clif -t "[\'mt_03.pl\']"'. % 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_MT_03_Test_0012_Line_0000_naf_CodeB_in_modA_in_myMt-junit.xml ~*/ :- sanity( module_clause(modA:codeA,_)). /*~ %~ /var/lib/jenkins/workspace/logicmoo_workspace/packs_sys/pfc/t/sanity_base/mt_03.pl:40 %~ ?-( mpred_test("Test_0013_Line_0000__CodeA_in_modA_in_myMt",myMt:module_clause(modA:codeA,Clause_Kw))). passed=info(why_was_true(myMt:module_clause(modA:codeA,(printAll('$current_source_module'(_812622)),codeB)))) no_proof_for(module_clause(modA:codeA,(printAll($current_source_module(Module)),codeB))). no_proof_for(module_clause(modA:codeA,(printAll($current_source_module(Module)),codeB))). no_proof_for(module_clause(modA:codeA,(printAll($current_source_module(Module)),codeB))). name='logicmoo.pfc.test.sanity_base.MT_03-Test_0013_Line_0000__CodeA_in_modA_in_myMt'. JUNIT_CLASSNAME='logicmoo.pfc.test.sanity_base.MT_03'. JUNIT_CMD='timeout --foreground --preserve-status -s SIGKILL -k 10s 10s swipl -x /var/lib/jenkins/workspace/logicmoo_workspace/bin/lmoo-clif -t "[\'mt_03.pl\']"'. % 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_MT_03_Test_0013_Line_0000_CodeA_in_modA_in_myMt-junit.xml ~*/ :- sanity( module_clause(modB:codeB,_)). % before test, genlMt makes the rule available and should not corrupt the modA module /*~ %~ /var/lib/jenkins/workspace/logicmoo_workspace/packs_sys/pfc/t/sanity_base/mt_03.pl:41 %~ ?-( mpred_test("Test_0014_Line_0000__CodeB_in_modB_in_myMt",myMt:module_clause(modB:codeB,Clause_Kw))). passed=info(why_was_true(myMt:module_clause(modB:codeB,true))) no_proof_for(module_clause(modB:codeB,true)). no_proof_for(module_clause(modB:codeB,true)). no_proof_for(module_clause(modB:codeB,true)). name='logicmoo.pfc.test.sanity_base.MT_03-Test_0014_Line_0000__CodeB_in_modB_in_myMt'. JUNIT_CLASSNAME='logicmoo.pfc.test.sanity_base.MT_03'. JUNIT_CMD='timeout --foreground --preserve-status -s SIGKILL -k 10s 10s swipl -x /var/lib/jenkins/workspace/logicmoo_workspace/bin/lmoo-clif -t "[\'mt_03.pl\']"'. % 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_MT_03_Test_0014_Line_0000_CodeB_in_modB_in_myMt-junit.xml ~*/ % before test, genlMt makes the rule available and should not corrupt the modA module :- warn_fail_TODO(clause_u(modA:codeB,_)). % make sure genlMt didnt unassert /*~ %~ /var/lib/jenkins/workspace/logicmoo_workspace/packs_sys/pfc/t/sanity_base/mt_03.pl:44 %~ :-( warn_fail_TODO( clause_u(modA:codeB,Kw))). ~*/ % make sure genlMt didnt unassert :- sanity(clause_u(modB:codeB,_)). % run the test /*~ %~ ?-( mpred_test("Test_0015_Line_0000__CodeB_in_modB_in_myMt",myMt:clause_u(modB:codeB,Kw))). passed=info(why_was_true(myMt:clause_u(modB:codeB,true))) no_proof_for(clause_u(modB:codeB,true)). no_proof_for(clause_u(modB:codeB,true)). no_proof_for(clause_u(modB:codeB,true)). name='logicmoo.pfc.test.sanity_base.MT_03-Test_0015_Line_0000__CodeB_in_modB_in_myMt'. JUNIT_CLASSNAME='logicmoo.pfc.test.sanity_base.MT_03'. JUNIT_CMD='timeout --foreground --preserve-status -s SIGKILL -k 10s 10s swipl -x /var/lib/jenkins/workspace/logicmoo_workspace/bin/lmoo-clif -t "[\'mt_03.pl\']"'. % 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_MT_03_Test_0015_Line_0000_CodeB_in_modB_in_myMt-junit.xml ~*/ % run the test modA: (:- codeA). % to make codeB sure is available in modA /*~ No source location!? ~*/ % to make codeB sure is available in modA :- mpred_must( clause_u(modA:codeB,_)). % to make sure codeA does not get accdently defined in modB /*~ %~ FIlE: * https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl#L56 31msmart_format("%%%%%%%%%%%%%%%%%%%%%%%%%%% (~w) ~w %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%\n",[red,failure+failed_mpred_test(clause_u(modA:codeB,_533152))]) 39m %~ /var/lib/jenkins/workspace/logicmoo_workspace/packs_sys/pfc/t/sanity_base/mt_03.pl:56 %~ failed_mpred_test( clause_u(modA:codeB,Kw)) %~ FILE: * https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl#L56 31msmart_format("%%%%%%%%%%%%%%%%%%%%%%%%%%% (~w) ~w %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%\n",[red,failure]) 39m %~ FIlE: * https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl#L56 (0)$0m0m94m49m15m[system]0m49m0m0m0m0m2m37m40m16m '$c_call_prolog'. 0m49m39m0m0m0m1m92m49m10m no(clause) 0m49m0m21m0m (1)$0m0m39m49m13m[$toplevel]0m49m39m0m0m0m0m39m49m13m '$toplevel'. 0m49m39m0m0m % toplevel.pl:701: (2)$0m0m39m49m13m[$toplevel]0m49m39m0m0m0m0m32m49m12m '$runtoplevel'. 0m49m39m0m0m % toplevel.pl:713: (10)$0m0m94m49m15m[system]0m49m0m0m0m0m2m96m49m15m '$load_file'('mt_03.pl',user,[expand(false),expand(true)]). 0m49m0m0m0m % init.pl:2353: (13)$0m0m94m49m15m[system]0m49m0m0m0m#0m2m96m49m15m '$sig_atomic'(setup_call_cleanup(with_mutex('$load_file','$mt_start_load'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',(0x557035f2f200),[expand(false),expand(true)])),'$mt_do_load'((0x557035f2f200),'mt_03.pl','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',user,[expand(false),expand(true)]),'$mt_end_load'((0x557035f2f200)))). 0m49m0m0m0m0m1m92m49m10m no(clause) 0m49m0m21m0m (14)$0m0m94m49m15m[system]0m49m0m0m0m0m2m37m40m16m '$c_call_prolog'. 0m49m39m0m0m0m1m92m49m10m no(clause) 0m49m0m21m0m (16)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m94m49m15m setup_call_catcher_cleanup(system:with_mutex('$load_file','$mt_start_load'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',(0x557035f2f200),[expand(false),expand(true)])),system:'$mt_do_load'((0x557035f2f200),'mt_03.pl','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',user,[expand(false),expand(true)]),A,system:'$mt_end_load'((0x557035f2f200))). 0m49m0m0m0m % init.pl:646: (18)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m91m49m14m '$qdo_load_file'('mt_03.pl','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',user,[expand(false),expand(true)]). 0m49m0m0m0m % init.pl:2546: (21)$0m0m94m49m15m[system]0m49m0m0m0m#0m2m92m49m10m '$do_load_file_2'('mt_03.pl','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',user,compiled,[expand(false),expand(true)]). 0m49m0m0m0m % init.pl:2592: (25)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m94m49m15m setup_call_catcher_cleanup(system:'$start_consult'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',1632225690.4083154),system:'$load_file'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',A,[expand(false),expand(true)]),B,system:'$end_consult'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',lexstate(202,swi),user)). 0m49m0m0m0m % init.pl:646: (26)$0m0m94m49m15m[system]0m49m0m0m0m#0m2m96m49m15m '$load_file'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',A,[expand(false),expand(true)]). 0m49m0m0m0m % init.pl:3007: (31)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m96m49m10m '$execute_directive_3'(clause_u(modA:codeB,A)). 0m49m0m0m0m % init.pl:3574: (32)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m94m49m15m catch(myMt:clause_u(modA:codeB,A),error(B,C),system:'$exception_in_directive'(error(B,C))). 0m49m0m0m0m % init.pl:546: (33)0m0m39m49m10m[myMt]0m49m39m0m0m#0m1m96m49m10m pfc_lib:clause_u(modA:codeB,A). 0m49m0m21m0m % mpred_core.pl:4331: (35)0m0m91m49m11m[rtrace]0m49m0m0m0m0m0m39m49m10m rtrace:quietly(myMt:(log_lines(red,failure+failed_mpred_test(clause_u(modA:codeB,A))),maybe_mpred_break(failed_mpred_test(clause_u(modA:codeB,A))),log_failure_red)). 0m49m39m0m0m % rtrace.pl:217: (36)$0m0m39m49m10m[myMt]0m49m39m0m0m0m0m39m49m10m ''(myMt:(log_lines(red,failure+failed_mpred_test(clause_u(modA:codeB,A))),maybe_mpred_break(failed_mpred_test(clause_u(modA:codeB,A))),log_failure_red)). 0m49m39m0m0m0m1m92m49m10m no(clause) 0m49m0m21m0m (38)0m0m39m49m10m[myMt]0m49m39m0m0m0m2m39m49m14m pfc_lib:break_ex. 0m49m39m0m0m % mpred_core.pl:4226: (39)$0m0m91m49m11m[rtrace]0m49m0m0m0m0m0m39m49m10m rtrace:quietly(myMt:(log_failure_red,dumpST,log_failure_red)). 0m49m39m0m0m % rtrace.pl:217: (40)$0m0m39m49m10m[myMt]0m49m39m0m0m0m0m39m49m10m ''(myMt:(log_failure_red,dumpST,log_failure_red)). 0m49m39m0m0m0m1m92m49m10m no(clause) 0m49m0m21m0m (43)0m0m91m49m17m[butterfly]0m49m0m0m0m0m0m39m49m10m butterfly:in_bfly(f,myMt:zotrace(with_all_dmsg((b_setval('$dump_frame',500),dumpST1)))). 0m49m39m0m0m % butterfly_console.pl:226: %~ FILE: * https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl#L56 31msmart_format("%%%%%%%%%%%%%%%%%%%%%%%%%%% (~w) ~w %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%\n",[red,failure]) 39m %~ DUMP_BREAK/0 %~ message_hook(unhandled_exception(abort),error,['Unhandled exception: ','~p'-[abort]]) Unhandled exception: abort ERROR: Unhandled exception: abort ~*/ /*~ ~*/ /* % % PFC is codeA language extension for prolog. % % It adds codeA new type of module inheritance % % Dec 13, 2035 % Douglas Miles */ % was_module(header_sane,[]). :- include(library(logicmoo_test_header)). %:- add_import_module(header_sane,baseKB,end). /*~ running(-), %~ /var/lib/jenkins/.local/share/swi-prolog/pack/logicmoo_utils/prolog/logicmoo_test_header.pl:59 %~ reload_of_test_header. %~ %~ Reset DB complete for myMt %~ %~ Reset DB complete for myMt %~ this_test_might_need( :-( expects_dialect(pfc))) %~ this_test_might_need( :-( use_module( library(logicmoo_plarkc)))) ~*/ %:- add_import_module(header_sane,baseKB,end). :- set_defaultAssertMt(myMt). /*~ ~*/ :- expects_dialect(pfc). /*~ ~*/ :- mpred_trace_exec. /*~ ~*/ mtProlog(modA). /*~ No source location!? %~ message_hook( %~ error( %~ permission_error(redefine,imported_procedure,baseKB:mtProlog/1), %~ context(system:'$record_clause'/3,Context_Kw)), %~ error, %~ [ 'No permission to ~w ~w `~p\'' - [ redefine, %~ imported_procedure, %~ baseKB : mtProlog/1]]) No permission to redefine imported_procedure `baseKB:(mtProlog/1)' ERROR: No permission to redefine imported_procedure `baseKB:(mtProlog/1)' ~*/ mtProlog(modB). /*~ No source location!? %~ message_hook( %~ error( %~ permission_error(redefine,imported_procedure,baseKB:mtProlog/1), %~ context(system:'$record_clause'/3,Context_Kw)), %~ error, %~ [ 'No permission to ~w ~w `~p\'' - [ redefine, %~ imported_procedure, %~ baseKB : mtProlog/1]]) No permission to redefine imported_procedure `baseKB:(mtProlog/1)' ERROR: No permission to redefine imported_procedure `baseKB:(mtProlog/1)' ~*/ modA: (codeA:- printAll('$current_source_module'(_M)),codeB). /*~ No source location!? ~*/ modB: (codeB). %:- \+ modA:codeA. /*~ No source location!? ~*/ %:- \+ modA:codeA. genlMt(modA,modB). % before test, to make sure codeA was not accdently defined in modB /*~ ~*/ % before test, to make sure codeA was not accdently defined in modB :- sanity(\+ module_clause(modB:codeA,_)). /*~ %~ ?-( mpred_test( "Test_0016_Line_0000__naf_CodeA_in_modB_in_myMt", %~ myMt : \+( module_clause(modB:codeA,Clause_Kw)))). passed=info(why_was_true(myMt:(\+module_clause(modB:codeA,_93728)))) no_proof_for(\+module_clause(modB:codeA,Clause_Kw2)). no_proof_for(\+module_clause(modB:codeA,Clause_Kw2)). no_proof_for(\+module_clause(modB:codeA,Clause_Kw2)). name='logicmoo.pfc.test.sanity_base.MT_03-Test_0016_Line_0000__naf_CodeA_in_modB_in_myMt'. JUNIT_CLASSNAME='logicmoo.pfc.test.sanity_base.MT_03'. JUNIT_CMD='timeout --foreground --preserve-status -s SIGKILL -k 10s 10s swipl -x /var/lib/jenkins/workspace/logicmoo_workspace/bin/lmoo-clif -t "[\'mt_03.pl\']"'. % 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_MT_03_Test_0016_Line_0000_naf_CodeA_in_modB_in_myMt-junit.xml ~*/ :- sanity(\+ module_clause(modA:codeB,_)). /*~ %~ ?-( mpred_test( "Test_0017_Line_0000__naf_CodeB_in_modA_in_myMt", %~ myMt : \+( module_clause(modA:codeB,Clause_Kw)))). passed=info(why_was_true(myMt:(\+module_clause(modA:codeB,_825430)))) no_proof_for(\+module_clause(modA:codeB,Clause_Kw2)). no_proof_for(\+module_clause(modA:codeB,Clause_Kw2)). no_proof_for(\+module_clause(modA:codeB,Clause_Kw2)). name='logicmoo.pfc.test.sanity_base.MT_03-Test_0017_Line_0000__naf_CodeB_in_modA_in_myMt'. JUNIT_CLASSNAME='logicmoo.pfc.test.sanity_base.MT_03'. JUNIT_CMD='timeout --foreground --preserve-status -s SIGKILL -k 10s 10s swipl -x /var/lib/jenkins/workspace/logicmoo_workspace/bin/lmoo-clif -t "[\'mt_03.pl\']"'. % 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_MT_03_Test_0017_Line_0000_naf_CodeB_in_modA_in_myMt-junit.xml ~*/ :- sanity( module_clause(modA:codeA,_)). /*~ %~ ?-( mpred_test("Test_0018_Line_0000__CodeA_in_modA_in_myMt",myMt:module_clause(modA:codeA,Clause_Kw))). passed=info(why_was_true(myMt:module_clause(modA:codeA,(printAll('$current_source_module'(_647004)),codeB)))) no_proof_for(module_clause(modA:codeA,(printAll($current_source_module(Module)),codeB))). no_proof_for(module_clause(modA:codeA,(printAll($current_source_module(Module)),codeB))). no_proof_for(module_clause(modA:codeA,(printAll($current_source_module(Module)),codeB))). name='logicmoo.pfc.test.sanity_base.MT_03-Test_0018_Line_0000__CodeA_in_modA_in_myMt'. JUNIT_CLASSNAME='logicmoo.pfc.test.sanity_base.MT_03'. JUNIT_CMD='timeout --foreground --preserve-status -s SIGKILL -k 10s 10s swipl -x /var/lib/jenkins/workspace/logicmoo_workspace/bin/lmoo-clif -t "[\'mt_03.pl\']"'. % 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_MT_03_Test_0018_Line_0000_CodeA_in_modA_in_myMt-junit.xml ~*/ :- sanity( module_clause(modB:codeB,_)). % before test, genlMt makes the rule available and should not corrupt the modA module /*~ %~ ?-( mpred_test("Test_0019_Line_0000__CodeB_in_modB_in_myMt",myMt:module_clause(modB:codeB,Clause_Kw))). passed=info(why_was_true(myMt:module_clause(modB:codeB,true))) no_proof_for(module_clause(modB:codeB,true)). no_proof_for(module_clause(modB:codeB,true)). no_proof_for(module_clause(modB:codeB,true)). name='logicmoo.pfc.test.sanity_base.MT_03-Test_0019_Line_0000__CodeB_in_modB_in_myMt'. JUNIT_CLASSNAME='logicmoo.pfc.test.sanity_base.MT_03'. JUNIT_CMD='timeout --foreground --preserve-status -s SIGKILL -k 10s 10s swipl -x /var/lib/jenkins/workspace/logicmoo_workspace/bin/lmoo-clif -t "[\'mt_03.pl\']"'. % 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_MT_03_Test_0019_Line_0000_CodeB_in_modB_in_myMt-junit.xml ~*/ % before test, genlMt makes the rule available and should not corrupt the modA module :- warn_fail_TODO(clause_u(modA:codeB,_)). % make sure genlMt didnt unassert /*~ %~ /var/lib/jenkins/workspace/logicmoo_workspace/packs_sys/pfc/t/sanity_base/mt_03.pl:44 %~ :-( warn_fail_TODO( clause_u(modA:codeB,Kw))). ~*/ % make sure genlMt didnt unassert :- sanity(clause_u(modB:codeB,_)). % run the test /*~ %~ ?-( mpred_test("Test_0020_Line_0000__CodeB_in_modB_in_myMt",myMt:clause_u(modB:codeB,Kw))). passed=info(why_was_true(myMt:clause_u(modB:codeB,true))) no_proof_for(clause_u(modB:codeB,true)). no_proof_for(clause_u(modB:codeB,true)). no_proof_for(clause_u(modB:codeB,true)). name='logicmoo.pfc.test.sanity_base.MT_03-Test_0020_Line_0000__CodeB_in_modB_in_myMt'. JUNIT_CLASSNAME='logicmoo.pfc.test.sanity_base.MT_03'. JUNIT_CMD='timeout --foreground --preserve-status -s SIGKILL -k 10s 10s swipl -x /var/lib/jenkins/workspace/logicmoo_workspace/bin/lmoo-clif -t "[\'mt_03.pl\']"'. % 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_MT_03_Test_0020_Line_0000_CodeB_in_modB_in_myMt-junit.xml ~*/ % run the test modA: (:- codeA). % to make codeB sure is available in modA /*~ No source location!? ~*/ % to make codeB sure is available in modA :- mpred_must( clause_u(modA:codeB,_)). % to make sure codeA does not get accdently defined in modB /*~ %~ FIlE: * https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl#L56 31msmart_format("%%%%%%%%%%%%%%%%%%%%%%%%%%% (~w) ~w %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%\n",[red,failure+failed_mpred_test(clause_u(modA:codeB,_677524))]) 39m %~ failed_mpred_test( clause_u(modA:codeB,Kw)) %~ FILE: * https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl#L56 31msmart_format("%%%%%%%%%%%%%%%%%%%%%%%%%%% (~w) ~w %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%\n",[red,failure]) 39m %~ FIlE: * https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl#L56 (0)$0m0m94m49m15m[system]0m49m0m0m0m0m2m37m40m16m '$c_call_prolog'. 0m49m39m0m0m0m1m92m49m10m no(clause) 0m49m0m21m0m (1)$0m0m39m49m13m[$toplevel]0m49m39m0m0m0m0m39m49m13m '$toplevel'. 0m49m39m0m0m % toplevel.pl:701: (2)$0m0m39m49m13m[$toplevel]0m49m39m0m0m0m0m32m49m12m '$runtoplevel'. 0m49m39m0m0m % toplevel.pl:713: (10)$0m0m94m49m15m[system]0m49m0m0m0m0m2m96m49m15m '$load_file'('mt_03.pl',user,[expand(false),expand(true)]). 0m49m0m0m0m % init.pl:2353: (13)$0m0m94m49m15m[system]0m49m0m0m0m#0m2m96m49m15m '$sig_atomic'(setup_call_cleanup(with_mutex('$load_file','$mt_start_load'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',(0x557035f2f280),[expand(false),expand(true)])),'$mt_do_load'((0x557035f2f280),'mt_03.pl','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',user,[expand(false),expand(true)]),'$mt_end_load'((0x557035f2f280)))). 0m49m0m0m0m0m1m92m49m10m no(clause) 0m49m0m21m0m (14)$0m0m94m49m15m[system]0m49m0m0m0m0m2m37m40m16m '$c_call_prolog'. 0m49m39m0m0m0m1m92m49m10m no(clause) 0m49m0m21m0m (16)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m94m49m15m setup_call_catcher_cleanup(system:with_mutex('$load_file','$mt_start_load'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',(0x557035f2f280),[expand(false),expand(true)])),system:'$mt_do_load'((0x557035f2f280),'mt_03.pl','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',user,[expand(false),expand(true)]),A,system:'$mt_end_load'((0x557035f2f280))). 0m49m0m0m0m % init.pl:646: (18)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m91m49m14m '$qdo_load_file'('mt_03.pl','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',user,[expand(false),expand(true)]). 0m49m0m0m0m % init.pl:2546: (21)$0m0m94m49m15m[system]0m49m0m0m0m#0m2m92m49m10m '$do_load_file_2'('mt_03.pl','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',user,compiled,[expand(false),expand(true)]). 0m49m0m0m0m % init.pl:2592: (25)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m94m49m15m setup_call_catcher_cleanup(system:'$start_consult'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',1632225690.4083154),system:'$load_file'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',A,[expand(false),expand(true)]),B,system:'$end_consult'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',lexstate(202,swi),user)). 0m49m0m0m0m % init.pl:646: (26)$0m0m94m49m15m[system]0m49m0m0m0m#0m2m96m49m15m '$load_file'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',A,[expand(false),expand(true)]). 0m49m0m0m0m % init.pl:3007: (31)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m96m49m10m '$execute_directive_3'(clause_u(modA:codeB,A)). 0m49m0m0m0m % init.pl:3574: (32)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m94m49m15m catch(myMt:clause_u(modA:codeB,A),error(B,C),system:'$exception_in_directive'(error(B,C))). 0m49m0m0m0m % init.pl:546: (33)0m0m39m49m10m[myMt]0m49m39m0m0m#0m1m96m49m10m pfc_lib:clause_u(modA:codeB,A). 0m49m0m21m0m % mpred_core.pl:4331: (35)0m0m91m49m11m[rtrace]0m49m0m0m0m0m0m39m49m10m rtrace:quietly(myMt:(log_lines(red,failure+failed_mpred_test(clause_u(modA:codeB,A))),maybe_mpred_break(failed_mpred_test(clause_u(modA:codeB,A))),log_failure_red)). 0m49m39m0m0m % rtrace.pl:217: (36)$0m0m39m49m10m[myMt]0m49m39m0m0m0m0m39m49m10m ''(myMt:(log_lines(red,failure+failed_mpred_test(clause_u(modA:codeB,A))),maybe_mpred_break(failed_mpred_test(clause_u(modA:codeB,A))),log_failure_red)). 0m49m39m0m0m0m1m92m49m10m no(clause) 0m49m0m21m0m (38)0m0m39m49m10m[myMt]0m49m39m0m0m0m2m39m49m14m pfc_lib:break_ex. 0m49m39m0m0m % mpred_core.pl:4226: (39)$0m0m91m49m11m[rtrace]0m49m0m0m0m0m0m39m49m10m rtrace:quietly(myMt:(log_failure_red,dumpST,log_failure_red)). 0m49m39m0m0m % rtrace.pl:217: (40)$0m0m39m49m10m[myMt]0m49m39m0m0m0m0m39m49m10m ''(myMt:(log_failure_red,dumpST,log_failure_red)). 0m49m39m0m0m0m1m92m49m10m no(clause) 0m49m0m21m0m (43)0m0m91m49m17m[butterfly]0m49m0m0m0m0m0m39m49m10m butterfly:in_bfly(f,myMt:zotrace(with_all_dmsg((b_setval('$dump_frame',500),dumpST1)))). 0m49m39m0m0m % butterfly_console.pl:226: %~ FILE: * https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl#L56 31msmart_format("%%%%%%%%%%%%%%%%%%%%%%%%%%% (~w) ~w %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%\n",[red,failure]) 39m %~ DUMP_BREAK/0 %~ message_hook(unhandled_exception(abort),error,['Unhandled exception: ','~p'-[abort]]) Unhandled exception: abort ERROR: Unhandled exception: abort ~*/ /*~ ~*/ /* % % PFC is codeA language extension for prolog. % % It adds codeA new type of module inheritance % % Dec 13, 2035 % Douglas Miles */ % was_module(header_sane,[]). :- include(library(logicmoo_test_header)). %:- add_import_module(header_sane,baseKB,end). /*~ running(-), %~ reload_of_test_header. %~ %~ Reset DB complete for myMt %~ %~ Reset DB complete for myMt %~ this_test_might_need( :-( expects_dialect(pfc))) %~ this_test_might_need( :-( use_module( library(logicmoo_plarkc)))) ~*/ %:- add_import_module(header_sane,baseKB,end). :- set_defaultAssertMt(myMt). /*~ ~*/ :- expects_dialect(pfc). /*~ ~*/ :- mpred_trace_exec. /*~ ~*/ mtProlog(modA). /*~ No source location!? %~ message_hook( %~ error( %~ permission_error(redefine,imported_procedure,baseKB:mtProlog/1), %~ context(system:'$record_clause'/3,Context_Kw)), %~ error, %~ [ 'No permission to ~w ~w `~p\'' - [ redefine, %~ imported_procedure, %~ baseKB : mtProlog/1]]) No permission to redefine imported_procedure `baseKB:(mtProlog/1)' ERROR: No permission to redefine imported_procedure `baseKB:(mtProlog/1)' ~*/ mtProlog(modB). /*~ No source location!? %~ message_hook( %~ error( %~ permission_error(redefine,imported_procedure,baseKB:mtProlog/1), %~ context(system:'$record_clause'/3,Context_Kw)), %~ error, %~ [ 'No permission to ~w ~w `~p\'' - [ redefine, %~ imported_procedure, %~ baseKB : mtProlog/1]]) No permission to redefine imported_procedure `baseKB:(mtProlog/1)' ERROR: No permission to redefine imported_procedure `baseKB:(mtProlog/1)' ~*/ modA: (codeA:- printAll('$current_source_module'(_M)),codeB). /*~ No source location!? ~*/ modB: (codeB). %:- \+ modA:codeA. /*~ No source location!? ~*/ %:- \+ modA:codeA. genlMt(modA,modB). % before test, to make sure codeA was not accdently defined in modB /*~ ~*/ % before test, to make sure codeA was not accdently defined in modB :- sanity(\+ module_clause(modB:codeA,_)). /*~ %~ ?-( mpred_test( "Test_0021_Line_0000__naf_CodeA_in_modB_in_myMt", %~ myMt : \+( module_clause(modB:codeA,Clause_Kw)))). passed=info(why_was_true(myMt:(\+module_clause(modB:codeA,_94182)))) no_proof_for(\+module_clause(modB:codeA,Clause_Kw2)). no_proof_for(\+module_clause(modB:codeA,Clause_Kw2)). no_proof_for(\+module_clause(modB:codeA,Clause_Kw2)). name='logicmoo.pfc.test.sanity_base.MT_03-Test_0021_Line_0000__naf_CodeA_in_modB_in_myMt'. JUNIT_CLASSNAME='logicmoo.pfc.test.sanity_base.MT_03'. JUNIT_CMD='timeout --foreground --preserve-status -s SIGKILL -k 10s 10s swipl -x /var/lib/jenkins/workspace/logicmoo_workspace/bin/lmoo-clif -t "[\'mt_03.pl\']"'. % 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_MT_03_Test_0021_Line_0000_naf_CodeA_in_modB_in_myMt-junit.xml ~*/ :- sanity(\+ module_clause(modA:codeB,_)). /*~ %~ ?-( mpred_test( "Test_0022_Line_0000__naf_CodeB_in_modA_in_myMt", %~ myMt : \+( module_clause(modA:codeB,Clause_Kw)))). passed=info(why_was_true(myMt:(\+module_clause(modA:codeB,_995398)))) no_proof_for(\+module_clause(modA:codeB,Clause_Kw2)). no_proof_for(\+module_clause(modA:codeB,Clause_Kw2)). no_proof_for(\+module_clause(modA:codeB,Clause_Kw2)). name='logicmoo.pfc.test.sanity_base.MT_03-Test_0022_Line_0000__naf_CodeB_in_modA_in_myMt'. JUNIT_CLASSNAME='logicmoo.pfc.test.sanity_base.MT_03'. JUNIT_CMD='timeout --foreground --preserve-status -s SIGKILL -k 10s 10s swipl -x /var/lib/jenkins/workspace/logicmoo_workspace/bin/lmoo-clif -t "[\'mt_03.pl\']"'. % 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_MT_03_Test_0022_Line_0000_naf_CodeB_in_modA_in_myMt-junit.xml ~*/ :- sanity( module_clause(modA:codeA,_)). /*~ %~ /var/lib/jenkins/workspace/logicmoo_workspace/packs_sys/pfc/t/sanity_base/mt_03.pl:40 %~ ?-( mpred_test("Test_0023_Line_0000__CodeA_in_modA_in_myMt",myMt:module_clause(modA:codeA,Clause_Kw))). passed=info(why_was_true(myMt:module_clause(modA:codeA,(printAll('$current_source_module'(_951274)),codeB)))) no_proof_for(module_clause(modA:codeA,(printAll($current_source_module(Module)),codeB))). no_proof_for(module_clause(modA:codeA,(printAll($current_source_module(Module)),codeB))). no_proof_for(module_clause(modA:codeA,(printAll($current_source_module(Module)),codeB))). name='logicmoo.pfc.test.sanity_base.MT_03-Test_0023_Line_0000__CodeA_in_modA_in_myMt'. JUNIT_CLASSNAME='logicmoo.pfc.test.sanity_base.MT_03'. JUNIT_CMD='timeout --foreground --preserve-status -s SIGKILL -k 10s 10s swipl -x /var/lib/jenkins/workspace/logicmoo_workspace/bin/lmoo-clif -t "[\'mt_03.pl\']"'. % 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_MT_03_Test_0023_Line_0000_CodeA_in_modA_in_myMt-junit.xml ~*/ :- sanity( module_clause(modB:codeB,_)). % before test, genlMt makes the rule available and should not corrupt the modA module /*~ %~ /var/lib/jenkins/workspace/logicmoo_workspace/packs_sys/pfc/t/sanity_base/mt_03.pl:41 %~ ?-( mpred_test("Test_0024_Line_0000__CodeB_in_modB_in_myMt",myMt:module_clause(modB:codeB,Clause_Kw))). passed=info(why_was_true(myMt:module_clause(modB:codeB,true))) no_proof_for(module_clause(modB:codeB,true)). no_proof_for(module_clause(modB:codeB,true)). no_proof_for(module_clause(modB:codeB,true)). name='logicmoo.pfc.test.sanity_base.MT_03-Test_0024_Line_0000__CodeB_in_modB_in_myMt'. JUNIT_CLASSNAME='logicmoo.pfc.test.sanity_base.MT_03'. JUNIT_CMD='timeout --foreground --preserve-status -s SIGKILL -k 10s 10s swipl -x /var/lib/jenkins/workspace/logicmoo_workspace/bin/lmoo-clif -t "[\'mt_03.pl\']"'. % 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_MT_03_Test_0024_Line_0000_CodeB_in_modB_in_myMt-junit.xml ~*/ % before test, genlMt makes the rule available and should not corrupt the modA module :- warn_fail_TODO(clause_u(modA:codeB,_)). % make sure genlMt didnt unassert /*~ %~ :-( warn_fail_TODO( clause_u(modA:codeB,Kw))). ~*/ % make sure genlMt didnt unassert :- sanity(clause_u(modB:codeB,_)). % run the test /*~ %~ /var/lib/jenkins/workspace/logicmoo_workspace/packs_sys/pfc/t/sanity_base/mt_03.pl:47 %~ ?-( mpred_test("Test_0025_Line_0000__CodeB_in_modB_in_myMt",myMt:clause_u(modB:codeB,Kw))). passed=info(why_was_true(myMt:clause_u(modB:codeB,true))) no_proof_for(clause_u(modB:codeB,true)). no_proof_for(clause_u(modB:codeB,true)). no_proof_for(clause_u(modB:codeB,true)). name='logicmoo.pfc.test.sanity_base.MT_03-Test_0025_Line_0000__CodeB_in_modB_in_myMt'. JUNIT_CLASSNAME='logicmoo.pfc.test.sanity_base.MT_03'. JUNIT_CMD='timeout --foreground --preserve-status -s SIGKILL -k 10s 10s swipl -x /var/lib/jenkins/workspace/logicmoo_workspace/bin/lmoo-clif -t "[\'mt_03.pl\']"'. % 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_MT_03_Test_0025_Line_0000_CodeB_in_modB_in_myMt-junit.xml ~*/ % run the test modA: (:- codeA). % to make codeB sure is available in modA /*~ No source location!? ~*/ % to make codeB sure is available in modA :- mpred_must( clause_u(modA:codeB,_)). % to make sure codeA does not get accdently defined in modB /*~ %~ FIlE: * https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl#L56 31msmart_format("%%%%%%%%%%%%%%%%%%%%%%%%%%% (~w) ~w %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%\n",[red,failure+failed_mpred_test(clause_u(modA:codeB,_827820))]) 39m %~ failed_mpred_test( clause_u(modA:codeB,Kw)) %~ FILE: * https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl#L56 31msmart_format("%%%%%%%%%%%%%%%%%%%%%%%%%%% (~w) ~w %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%\n",[red,failure]) 39m %~ FIlE: * https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl#L56 (0)$0m0m94m49m15m[system]0m49m0m0m0m0m2m37m40m16m '$c_call_prolog'. 0m49m39m0m0m0m1m92m49m10m no(clause) 0m49m0m21m0m (1)$0m0m39m49m13m[$toplevel]0m49m39m0m0m0m0m39m49m13m '$toplevel'. 0m49m39m0m0m % toplevel.pl:701: (2)$0m0m39m49m13m[$toplevel]0m49m39m0m0m0m0m32m49m12m '$runtoplevel'. 0m49m39m0m0m % toplevel.pl:713: (10)$0m0m94m49m15m[system]0m49m0m0m0m0m2m96m49m15m '$load_file'('mt_03.pl',user,[expand(false),expand(true)]). 0m49m0m0m0m % init.pl:2353: (13)$0m0m94m49m15m[system]0m49m0m0m0m#0m2m96m49m15m '$sig_atomic'(setup_call_cleanup(with_mutex('$load_file','$mt_start_load'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',(0x557035f2eb00),[expand(false),expand(true)])),'$mt_do_load'((0x557035f2eb00),'mt_03.pl','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',user,[expand(false),expand(true)]),'$mt_end_load'((0x557035f2eb00)))). 0m49m0m0m0m0m1m92m49m10m no(clause) 0m49m0m21m0m (14)$0m0m94m49m15m[system]0m49m0m0m0m0m2m37m40m16m '$c_call_prolog'. 0m49m39m0m0m0m1m92m49m10m no(clause) 0m49m0m21m0m (16)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m94m49m15m setup_call_catcher_cleanup(system:with_mutex('$load_file','$mt_start_load'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',(0x557035f2eb00),[expand(false),expand(true)])),system:'$mt_do_load'((0x557035f2eb00),'mt_03.pl','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',user,[expand(false),expand(true)]),A,system:'$mt_end_load'((0x557035f2eb00))). 0m49m0m0m0m % init.pl:646: (18)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m91m49m14m '$qdo_load_file'('mt_03.pl','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',user,[expand(false),expand(true)]). 0m49m0m0m0m % init.pl:2546: (21)$0m0m94m49m15m[system]0m49m0m0m0m#0m2m92m49m10m '$do_load_file_2'('mt_03.pl','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',user,compiled,[expand(false),expand(true)]). 0m49m0m0m0m % init.pl:2592: (25)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m94m49m15m setup_call_catcher_cleanup(system:'$start_consult'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',1632225690.4083154),system:'$load_file'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',A,[expand(false),expand(true)]),B,system:'$end_consult'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',lexstate(202,swi),user)). 0m49m0m0m0m % init.pl:646: (26)$0m0m94m49m15m[system]0m49m0m0m0m#0m2m96m49m15m '$load_file'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',A,[expand(false),expand(true)]). 0m49m0m0m0m % init.pl:3007: (31)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m96m49m10m '$execute_directive_3'(clause_u(modA:codeB,A)). 0m49m0m0m0m % init.pl:3574: (32)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m94m49m15m catch(myMt:clause_u(modA:codeB,A),error(B,C),system:'$exception_in_directive'(error(B,C))). 0m49m0m0m0m % init.pl:546: (33)0m0m39m49m10m[myMt]0m49m39m0m0m#0m1m96m49m10m pfc_lib:clause_u(modA:codeB,A). 0m49m0m21m0m % mpred_core.pl:4331: (35)0m0m91m49m11m[rtrace]0m49m0m0m0m0m0m39m49m10m rtrace:quietly(myMt:(log_lines(red,failure+failed_mpred_test(clause_u(modA:codeB,A))),maybe_mpred_break(failed_mpred_test(clause_u(modA:codeB,A))),log_failure_red)). 0m49m39m0m0m % rtrace.pl:217: (36)$0m0m39m49m10m[myMt]0m49m39m0m0m0m0m39m49m10m ''(myMt:(log_lines(red,failure+failed_mpred_test(clause_u(modA:codeB,A))),maybe_mpred_break(failed_mpred_test(clause_u(modA:codeB,A))),log_failure_red)). 0m49m39m0m0m0m1m92m49m10m no(clause) 0m49m0m21m0m (38)0m0m39m49m10m[myMt]0m49m39m0m0m0m2m39m49m14m pfc_lib:break_ex. 0m49m39m0m0m % mpred_core.pl:4226: (39)$0m0m91m49m11m[rtrace]0m49m0m0m0m0m0m39m49m10m rtrace:quietly(myMt:(log_failure_red,dumpST,log_failure_red)). 0m49m39m0m0m % rtrace.pl:217: (40)$0m0m39m49m10m[myMt]0m49m39m0m0m0m0m39m49m10m ''(myMt:(log_failure_red,dumpST,log_failure_red)). 0m49m39m0m0m0m1m92m49m10m no(clause) 0m49m0m21m0m (43)0m0m91m49m17m[butterfly]0m49m0m0m0m0m0m39m49m10m butterfly:in_bfly(f,myMt:zotrace(with_all_dmsg((b_setval('$dump_frame',500),dumpST1)))). 0m49m39m0m0m % butterfly_console.pl:226: %~ FILE: * https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl#L56 31msmart_format("%%%%%%%%%%%%%%%%%%%%%%%%%%% (~w) ~w %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%\n",[red,failure]) 39m %~ DUMP_BREAK/0 %~ message_hook(unhandled_exception(abort),error,['Unhandled exception: ','~p'-[abort]]) Unhandled exception: abort ERROR: Unhandled exception: abort ~*/ /*~ ~*/ /* % % PFC is codeA language extension for prolog. % % It adds codeA new type of module inheritance % % Dec 13, 2035 % Douglas Miles */ % was_module(header_sane,[]). :- include(library(logicmoo_test_header)). %:- add_import_module(header_sane,baseKB,end). /*~ running(-), %~ reload_of_test_header. %~ %~ Reset DB complete for myMt %~ %~ Reset DB complete for myMt %~ this_test_might_need( :-( expects_dialect(pfc))) %~ this_test_might_need( :-( use_module( library(logicmoo_plarkc)))) ~*/ %:- add_import_module(header_sane,baseKB,end). :- set_defaultAssertMt(myMt). /*~ ~*/ :- expects_dialect(pfc). /*~ ~*/ :- mpred_trace_exec. /*~ ~*/ mtProlog(modA). /*~ No source location!? %~ message_hook( %~ error( %~ permission_error(redefine,imported_procedure,baseKB:mtProlog/1), %~ context(system:'$record_clause'/3,Context_Kw)), %~ error, %~ [ 'No permission to ~w ~w `~p\'' - [ redefine, %~ imported_procedure, %~ baseKB : mtProlog/1]]) No permission to redefine imported_procedure `baseKB:(mtProlog/1)' ERROR: No permission to redefine imported_procedure `baseKB:(mtProlog/1)' ~*/ mtProlog(modB). /*~ No source location!? %~ message_hook( %~ error( %~ permission_error(redefine,imported_procedure,baseKB:mtProlog/1), %~ context(system:'$record_clause'/3,Context_Kw)), %~ error, %~ [ 'No permission to ~w ~w `~p\'' - [ redefine, %~ imported_procedure, %~ baseKB : mtProlog/1]]) No permission to redefine imported_procedure `baseKB:(mtProlog/1)' ERROR: No permission to redefine imported_procedure `baseKB:(mtProlog/1)' ~*/ modA: (codeA:- printAll('$current_source_module'(_M)),codeB). /*~ No source location!? ~*/ modB: (codeB). %:- \+ modA:codeA. /*~ No source location!? ~*/ %:- \+ modA:codeA. genlMt(modA,modB). % before test, to make sure codeA was not accdently defined in modB /*~ ~*/ % before test, to make sure codeA was not accdently defined in modB :- sanity(\+ module_clause(modB:codeA,_)). /*~ %~ ?-( mpred_test( "Test_0026_Line_0000__naf_CodeA_in_modB_in_myMt", %~ myMt : \+( module_clause(modB:codeA,Clause_Kw)))). passed=info(why_was_true(myMt:(\+module_clause(modB:codeA,_94902)))) no_proof_for(\+module_clause(modB:codeA,Clause_Kw2)). no_proof_for(\+module_clause(modB:codeA,Clause_Kw2)). no_proof_for(\+module_clause(modB:codeA,Clause_Kw2)). name='logicmoo.pfc.test.sanity_base.MT_03-Test_0026_Line_0000__naf_CodeA_in_modB_in_myMt'. JUNIT_CLASSNAME='logicmoo.pfc.test.sanity_base.MT_03'. JUNIT_CMD='timeout --foreground --preserve-status -s SIGKILL -k 10s 10s swipl -x /var/lib/jenkins/workspace/logicmoo_workspace/bin/lmoo-clif -t "[\'mt_03.pl\']"'. % 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_MT_03_Test_0026_Line_0000_naf_CodeA_in_modB_in_myMt-junit.xml ~*/ :- sanity(\+ module_clause(modA:codeB,_)). /*~ %~ ?-( mpred_test( "Test_0027_Line_0000__naf_CodeB_in_modA_in_myMt", %~ myMt : \+( module_clause(modA:codeB,Clause_Kw)))). passed=info(why_was_true(myMt:(\+module_clause(modA:codeB,_670174)))) no_proof_for(\+module_clause(modA:codeB,Clause_Kw2)). no_proof_for(\+module_clause(modA:codeB,Clause_Kw2)). no_proof_for(\+module_clause(modA:codeB,Clause_Kw2)). name='logicmoo.pfc.test.sanity_base.MT_03-Test_0027_Line_0000__naf_CodeB_in_modA_in_myMt'. JUNIT_CLASSNAME='logicmoo.pfc.test.sanity_base.MT_03'. JUNIT_CMD='timeout --foreground --preserve-status -s SIGKILL -k 10s 10s swipl -x /var/lib/jenkins/workspace/logicmoo_workspace/bin/lmoo-clif -t "[\'mt_03.pl\']"'. % 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_MT_03_Test_0027_Line_0000_naf_CodeB_in_modA_in_myMt-junit.xml ~*/ :- sanity( module_clause(modA:codeA,_)). /*~ %~ /var/lib/jenkins/workspace/logicmoo_workspace/packs_sys/pfc/t/sanity_base/mt_03.pl:40 %~ ?-( mpred_test("Test_0028_Line_0000__CodeA_in_modA_in_myMt",myMt:module_clause(modA:codeA,Clause_Kw))). passed=info(why_was_true(myMt:module_clause(modA:codeA,(printAll('$current_source_module'(_1819672)),codeB)))) no_proof_for(module_clause(modA:codeA,(printAll($current_source_module(Module)),codeB))). no_proof_for(module_clause(modA:codeA,(printAll($current_source_module(Module)),codeB))). no_proof_for(module_clause(modA:codeA,(printAll($current_source_module(Module)),codeB))). name='logicmoo.pfc.test.sanity_base.MT_03-Test_0028_Line_0000__CodeA_in_modA_in_myMt'. JUNIT_CLASSNAME='logicmoo.pfc.test.sanity_base.MT_03'. JUNIT_CMD='timeout --foreground --preserve-status -s SIGKILL -k 10s 10s swipl -x /var/lib/jenkins/workspace/logicmoo_workspace/bin/lmoo-clif -t "[\'mt_03.pl\']"'. % 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_MT_03_Test_0028_Line_0000_CodeA_in_modA_in_myMt-junit.xml ~*/ :- sanity( module_clause(modB:codeB,_)). % before test, genlMt makes the rule available and should not corrupt the modA module /*~ %~ ?-( mpred_test("Test_0029_Line_0000__CodeB_in_modB_in_myMt",myMt:module_clause(modB:codeB,Clause_Kw))). passed=info(why_was_true(myMt:module_clause(modB:codeB,true))) no_proof_for(module_clause(modB:codeB,true)). no_proof_for(module_clause(modB:codeB,true)). no_proof_for(module_clause(modB:codeB,true)). name='logicmoo.pfc.test.sanity_base.MT_03-Test_0029_Line_0000__CodeB_in_modB_in_myMt'. JUNIT_CLASSNAME='logicmoo.pfc.test.sanity_base.MT_03'. JUNIT_CMD='timeout --foreground --preserve-status -s SIGKILL -k 10s 10s swipl -x /var/lib/jenkins/workspace/logicmoo_workspace/bin/lmoo-clif -t "[\'mt_03.pl\']"'. % 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_MT_03_Test_0029_Line_0000_CodeB_in_modB_in_myMt-junit.xml ~*/ % before test, genlMt makes the rule available and should not corrupt the modA module :- warn_fail_TODO(clause_u(modA:codeB,_)). % make sure genlMt didnt unassert /*~ %~ /var/lib/jenkins/workspace/logicmoo_workspace/packs_sys/pfc/t/sanity_base/mt_03.pl:44 %~ :-( warn_fail_TODO( clause_u(modA:codeB,Kw))). ~*/ % make sure genlMt didnt unassert :- sanity(clause_u(modB:codeB,_)). % run the test /*~ %~ ?-( mpred_test("Test_0030_Line_0000__CodeB_in_modB_in_myMt",myMt:clause_u(modB:codeB,Kw))). passed=info(why_was_true(myMt:clause_u(modB:codeB,true))) no_proof_for(clause_u(modB:codeB,true)). no_proof_for(clause_u(modB:codeB,true)). no_proof_for(clause_u(modB:codeB,true)). name='logicmoo.pfc.test.sanity_base.MT_03-Test_0030_Line_0000__CodeB_in_modB_in_myMt'. JUNIT_CLASSNAME='logicmoo.pfc.test.sanity_base.MT_03'. JUNIT_CMD='timeout --foreground --preserve-status -s SIGKILL -k 10s 10s swipl -x /var/lib/jenkins/workspace/logicmoo_workspace/bin/lmoo-clif -t "[\'mt_03.pl\']"'. % 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_MT_03_Test_0030_Line_0000_CodeB_in_modB_in_myMt-junit.xml ~*/ % run the test modA: (:- codeA). % to make codeB sure is available in modA /*~ No source location!? ~*/ % to make codeB sure is available in modA :- mpred_must( clause_u(modA:codeB,_)). % to make sure codeA does not get accdently defined in modB /*~ %~ FIlE: * https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl#L56 31msmart_format("%%%%%%%%%%%%%%%%%%%%%%%%%%% (~w) ~w %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%\n",[red,failure+failed_mpred_test(clause_u(modA:codeB,_1826358))]) 39m %~ /var/lib/jenkins/workspace/logicmoo_workspace/packs_sys/pfc/t/sanity_base/mt_03.pl:56 %~ failed_mpred_test( clause_u(modA:codeB,Kw)) %~ FILE: * https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl#L56 31msmart_format("%%%%%%%%%%%%%%%%%%%%%%%%%%% (~w) ~w %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%\n",[red,failure]) 39m %~ FIlE: * https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl#L56 (0)$0m0m94m49m15m[system]0m49m0m0m0m0m2m37m40m16m '$c_call_prolog'. 0m49m39m0m0m0m1m92m49m10m no(clause) 0m49m0m21m0m (1)$0m0m39m49m13m[$toplevel]0m49m39m0m0m0m0m39m49m13m '$toplevel'. 0m49m39m0m0m % toplevel.pl:701: (2)$0m0m39m49m13m[$toplevel]0m49m39m0m0m0m0m32m49m12m '$runtoplevel'. 0m49m39m0m0m % toplevel.pl:713: (10)$0m0m94m49m15m[system]0m49m0m0m0m0m2m96m49m15m '$load_file'('mt_03.pl',user,[expand(false),expand(true)]). 0m49m0m0m0m % init.pl:2353: (13)$0m0m94m49m15m[system]0m49m0m0m0m#0m2m96m49m15m '$sig_atomic'(setup_call_cleanup(with_mutex('$load_file','$mt_start_load'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',(0x557035f2f900),[expand(false),expand(true)])),'$mt_do_load'((0x557035f2f900),'mt_03.pl','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',user,[expand(false),expand(true)]),'$mt_end_load'((0x557035f2f900)))). 0m49m0m0m0m0m1m92m49m10m no(clause) 0m49m0m21m0m (14)$0m0m94m49m15m[system]0m49m0m0m0m0m2m37m40m16m '$c_call_prolog'. 0m49m39m0m0m0m1m92m49m10m no(clause) 0m49m0m21m0m (16)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m94m49m15m setup_call_catcher_cleanup(system:with_mutex('$load_file','$mt_start_load'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',(0x557035f2f900),[expand(false),expand(true)])),system:'$mt_do_load'((0x557035f2f900),'mt_03.pl','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',user,[expand(false),expand(true)]),A,system:'$mt_end_load'((0x557035f2f900))). 0m49m0m0m0m % init.pl:646: (18)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m91m49m14m '$qdo_load_file'('mt_03.pl','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',user,[expand(false),expand(true)]). 0m49m0m0m0m % init.pl:2546: (21)$0m0m94m49m15m[system]0m49m0m0m0m#0m2m92m49m10m '$do_load_file_2'('mt_03.pl','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',user,compiled,[expand(false),expand(true)]). 0m49m0m0m0m % init.pl:2592: (25)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m94m49m15m setup_call_catcher_cleanup(system:'$start_consult'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',1632225690.4083154),system:'$load_file'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',A,[expand(false),expand(true)]),B,system:'$end_consult'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',lexstate(202,swi),user)). 0m49m0m0m0m % init.pl:646: (26)$0m0m94m49m15m[system]0m49m0m0m0m#0m2m96m49m15m '$load_file'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',A,[expand(false),expand(true)]). 0m49m0m0m0m % init.pl:3007: (31)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m96m49m10m '$execute_directive_3'(clause_u(modA:codeB,A)). 0m49m0m0m0m % init.pl:3574: (32)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m94m49m15m catch(myMt:clause_u(modA:codeB,A),error(B,C),system:'$exception_in_directive'(error(B,C))). 0m49m0m0m0m % init.pl:546: (33)0m0m39m49m10m[myMt]0m49m39m0m0m#0m1m96m49m10m pfc_lib:clause_u(modA:codeB,A). 0m49m0m21m0m % mpred_core.pl:4331: (35)0m0m91m49m11m[rtrace]0m49m0m0m0m0m0m39m49m10m rtrace:quietly(myMt:(log_lines(red,failure+failed_mpred_test(clause_u(modA:codeB,A))),maybe_mpred_break(failed_mpred_test(clause_u(modA:codeB,A))),log_failure_red)). 0m49m39m0m0m % rtrace.pl:217: (36)$0m0m39m49m10m[myMt]0m49m39m0m0m0m0m39m49m10m ''(myMt:(log_lines(red,failure+failed_mpred_test(clause_u(modA:codeB,A))),maybe_mpred_break(failed_mpred_test(clause_u(modA:codeB,A))),log_failure_red)). 0m49m39m0m0m0m1m92m49m10m no(clause) 0m49m0m21m0m (38)0m0m39m49m10m[myMt]0m49m39m0m0m0m2m39m49m14m pfc_lib:break_ex. 0m49m39m0m0m % mpred_core.pl:4226: (39)$0m0m91m49m11m[rtrace]0m49m0m0m0m0m0m39m49m10m rtrace:quietly(myMt:(log_failure_red,dumpST,log_failure_red)). 0m49m39m0m0m % rtrace.pl:217: (40)$0m0m39m49m10m[myMt]0m49m39m0m0m0m0m39m49m10m ''(myMt:(log_failure_red,dumpST,log_failure_red)). 0m49m39m0m0m0m1m92m49m10m no(clause) 0m49m0m21m0m (43)0m0m91m49m17m[butterfly]0m49m0m0m0m0m0m39m49m10m butterfly:in_bfly(f,myMt:zotrace(with_all_dmsg((b_setval('$dump_frame',500),dumpST1)))). 0m49m39m0m0m % butterfly_console.pl:226: %~ FILE: * https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl#L56 31msmart_format("%%%%%%%%%%%%%%%%%%%%%%%%%%% (~w) ~w %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%\n",[red,failure]) 39m %~ DUMP_BREAK/0 %~ message_hook(unhandled_exception(abort),error,['Unhandled exception: ','~p'-[abort]]) Unhandled exception: abort ERROR: Unhandled exception: abort ~*/ /*~ ~*/ /* % % PFC is codeA language extension for prolog. % % It adds codeA new type of module inheritance % % Dec 13, 2035 % Douglas Miles */ % was_module(header_sane,[]). :- include(library(logicmoo_test_header)). %:- add_import_module(header_sane,baseKB,end). /*~ running(-), %~ reload_of_test_header. %~ %~ Reset DB complete for myMt %~ %~ Reset DB complete for myMt %~ /var/lib/jenkins/.local/share/swi-prolog/pack/logicmoo_utils/prolog/logicmoo_test_header.pl:93 %~ this_test_might_need( :-( expects_dialect(pfc))) %~ this_test_might_need( :-( use_module( library(logicmoo_plarkc)))) ~*/ %:- add_import_module(header_sane,baseKB,end). :- set_defaultAssertMt(myMt). /*~ ~*/ :- expects_dialect(pfc). /*~ ~*/ :- mpred_trace_exec. /*~ ~*/ mtProlog(modA). /*~ No source location!? %~ message_hook( %~ error( %~ permission_error(redefine,imported_procedure,baseKB:mtProlog/1), %~ context(system:'$record_clause'/3,Context_Kw)), %~ error, %~ [ 'No permission to ~w ~w `~p\'' - [ redefine, %~ imported_procedure, %~ baseKB : mtProlog/1]]) No permission to redefine imported_procedure `baseKB:(mtProlog/1)' ERROR: No permission to redefine imported_procedure `baseKB:(mtProlog/1)' ~*/ mtProlog(modB). /*~ No source location!? %~ message_hook( %~ error( %~ permission_error(redefine,imported_procedure,baseKB:mtProlog/1), %~ context(system:'$record_clause'/3,Context_Kw)), %~ error, %~ [ 'No permission to ~w ~w `~p\'' - [ redefine, %~ imported_procedure, %~ baseKB : mtProlog/1]]) No permission to redefine imported_procedure `baseKB:(mtProlog/1)' ERROR: No permission to redefine imported_procedure `baseKB:(mtProlog/1)' ~*/ modA: (codeA:- printAll('$current_source_module'(_M)),codeB). /*~ No source location!? ~*/ modB: (codeB). %:- \+ modA:codeA. /*~ No source location!? ~*/ %:- \+ modA:codeA. genlMt(modA,modB). % before test, to make sure codeA was not accdently defined in modB /*~ ~*/ % before test, to make sure codeA was not accdently defined in modB :- sanity(\+ module_clause(modB:codeA,_)). /*~ %~ ?-( mpred_test( "Test_0031_Line_0000__naf_CodeA_in_modB_in_myMt", %~ myMt : \+( module_clause(modB:codeA,Clause_Kw)))). passed=info(why_was_true(myMt:(\+module_clause(modB:codeA,_95892)))) no_proof_for(\+module_clause(modB:codeA,Clause_Kw2)). no_proof_for(\+module_clause(modB:codeA,Clause_Kw2)). no_proof_for(\+module_clause(modB:codeA,Clause_Kw2)). name='logicmoo.pfc.test.sanity_base.MT_03-Test_0031_Line_0000__naf_CodeA_in_modB_in_myMt'. JUNIT_CLASSNAME='logicmoo.pfc.test.sanity_base.MT_03'. JUNIT_CMD='timeout --foreground --preserve-status -s SIGKILL -k 10s 10s swipl -x /var/lib/jenkins/workspace/logicmoo_workspace/bin/lmoo-clif -t "[\'mt_03.pl\']"'. % 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_MT_03_Test_0031_Line_0000_naf_CodeA_in_modB_in_myMt-junit.xml ~*/ :- sanity(\+ module_clause(modA:codeB,_)). /*~ %~ /var/lib/jenkins/workspace/logicmoo_workspace/packs_sys/pfc/t/sanity_base/mt_03.pl:38 %~ ?-( mpred_test( "Test_0032_Line_0000__naf_CodeB_in_modA_in_myMt", %~ myMt : \+( module_clause(modA:codeB,Clause_Kw)))). passed=info(why_was_true(myMt:(\+module_clause(modA:codeB,_1451554)))) no_proof_for(\+module_clause(modA:codeB,Clause_Kw2)). no_proof_for(\+module_clause(modA:codeB,Clause_Kw2)). no_proof_for(\+module_clause(modA:codeB,Clause_Kw2)). name='logicmoo.pfc.test.sanity_base.MT_03-Test_0032_Line_0000__naf_CodeB_in_modA_in_myMt'. JUNIT_CLASSNAME='logicmoo.pfc.test.sanity_base.MT_03'. JUNIT_CMD='timeout --foreground --preserve-status -s SIGKILL -k 10s 10s swipl -x /var/lib/jenkins/workspace/logicmoo_workspace/bin/lmoo-clif -t "[\'mt_03.pl\']"'. % 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_MT_03_Test_0032_Line_0000_naf_CodeB_in_modA_in_myMt-junit.xml ~*/ :- sanity( module_clause(modA:codeA,_)). /*~ %~ ?-( mpred_test("Test_0033_Line_0000__CodeA_in_modA_in_myMt",myMt:module_clause(modA:codeA,Clause_Kw))). passed=info(why_was_true(myMt:module_clause(modA:codeA,(printAll('$current_source_module'(_1202516)),codeB)))) no_proof_for(module_clause(modA:codeA,(printAll($current_source_module(Module)),codeB))). no_proof_for(module_clause(modA:codeA,(printAll($current_source_module(Module)),codeB))). no_proof_for(module_clause(modA:codeA,(printAll($current_source_module(Module)),codeB))). name='logicmoo.pfc.test.sanity_base.MT_03-Test_0033_Line_0000__CodeA_in_modA_in_myMt'. JUNIT_CLASSNAME='logicmoo.pfc.test.sanity_base.MT_03'. JUNIT_CMD='timeout --foreground --preserve-status -s SIGKILL -k 10s 10s swipl -x /var/lib/jenkins/workspace/logicmoo_workspace/bin/lmoo-clif -t "[\'mt_03.pl\']"'. % 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_MT_03_Test_0033_Line_0000_CodeA_in_modA_in_myMt-junit.xml ~*/ :- sanity( module_clause(modB:codeB,_)). % before test, genlMt makes the rule available and should not corrupt the modA module /*~ %~ ?-( mpred_test("Test_0034_Line_0000__CodeB_in_modB_in_myMt",myMt:module_clause(modB:codeB,Clause_Kw))). passed=info(why_was_true(myMt:module_clause(modB:codeB,true))) no_proof_for(module_clause(modB:codeB,true)). no_proof_for(module_clause(modB:codeB,true)). no_proof_for(module_clause(modB:codeB,true)). name='logicmoo.pfc.test.sanity_base.MT_03-Test_0034_Line_0000__CodeB_in_modB_in_myMt'. JUNIT_CLASSNAME='logicmoo.pfc.test.sanity_base.MT_03'. JUNIT_CMD='timeout --foreground --preserve-status -s SIGKILL -k 10s 10s swipl -x /var/lib/jenkins/workspace/logicmoo_workspace/bin/lmoo-clif -t "[\'mt_03.pl\']"'. % 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_MT_03_Test_0034_Line_0000_CodeB_in_modB_in_myMt-junit.xml ~*/ % before test, genlMt makes the rule available and should not corrupt the modA module :- warn_fail_TODO(clause_u(modA:codeB,_)). % make sure genlMt didnt unassert /*~ %~ /var/lib/jenkins/workspace/logicmoo_workspace/packs_sys/pfc/t/sanity_base/mt_03.pl:44 %~ :-( warn_fail_TODO( clause_u(modA:codeB,Kw))). ~*/ % make sure genlMt didnt unassert :- sanity(clause_u(modB:codeB,_)). % run the test /*~ %~ /var/lib/jenkins/workspace/logicmoo_workspace/packs_sys/pfc/t/sanity_base/mt_03.pl:47 %~ ?-( mpred_test("Test_0035_Line_0000__CodeB_in_modB_in_myMt",myMt:clause_u(modB:codeB,Kw))). passed=info(why_was_true(myMt:clause_u(modB:codeB,true))) no_proof_for(clause_u(modB:codeB,true)). no_proof_for(clause_u(modB:codeB,true)). no_proof_for(clause_u(modB:codeB,true)). name='logicmoo.pfc.test.sanity_base.MT_03-Test_0035_Line_0000__CodeB_in_modB_in_myMt'. JUNIT_CLASSNAME='logicmoo.pfc.test.sanity_base.MT_03'. JUNIT_CMD='timeout --foreground --preserve-status -s SIGKILL -k 10s 10s swipl -x /var/lib/jenkins/workspace/logicmoo_workspace/bin/lmoo-clif -t "[\'mt_03.pl\']"'. % 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_MT_03_Test_0035_Line_0000_CodeB_in_modB_in_myMt-junit.xml ~*/ % run the test modA: (:- codeA). % to make codeB sure is available in modA /*~ No source location!? ~*/ % to make codeB sure is available in modA :- mpred_must( clause_u(modA:codeB,_)). % to make sure codeA does not get accdently defined in modB /*~ %~ FIlE: * https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl#L56 31msmart_format("%%%%%%%%%%%%%%%%%%%%%%%%%%% (~w) ~w %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%\n",[red,failure+failed_mpred_test(clause_u(modA:codeB,_853278))]) 39m %~ /var/lib/jenkins/workspace/logicmoo_workspace/packs_sys/pfc/t/sanity_base/mt_03.pl:56 %~ failed_mpred_test( clause_u(modA:codeB,Kw)) %~ FILE: * https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl#L56 31msmart_format("%%%%%%%%%%%%%%%%%%%%%%%%%%% (~w) ~w %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%\n",[red,failure]) 39m %~ FIlE: * https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl#L56 (0)$0m0m94m49m15m[system]0m49m0m0m0m0m2m37m40m16m '$c_call_prolog'. 0m49m39m0m0m0m1m92m49m10m no(clause) 0m49m0m21m0m (1)$0m0m39m49m13m[$toplevel]0m49m39m0m0m0m0m39m49m13m '$toplevel'. 0m49m39m0m0m % toplevel.pl:701: (2)$0m0m39m49m13m[$toplevel]0m49m39m0m0m0m0m32m49m12m '$runtoplevel'. 0m49m39m0m0m % toplevel.pl:713: (10)$0m0m94m49m15m[system]0m49m0m0m0m0m2m96m49m15m '$load_file'('mt_03.pl',user,[expand(false),expand(true)]). 0m49m0m0m0m % init.pl:2353: (13)$0m0m94m49m15m[system]0m49m0m0m0m#0m2m96m49m15m '$sig_atomic'(setup_call_cleanup(with_mutex('$load_file','$mt_start_load'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',(0x557035f2f580),[expand(false),expand(true)])),'$mt_do_load'((0x557035f2f580),'mt_03.pl','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',user,[expand(false),expand(true)]),'$mt_end_load'((0x557035f2f580)))). 0m49m0m0m0m0m1m92m49m10m no(clause) 0m49m0m21m0m (14)$0m0m94m49m15m[system]0m49m0m0m0m0m2m37m40m16m '$c_call_prolog'. 0m49m39m0m0m0m1m92m49m10m no(clause) 0m49m0m21m0m (16)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m94m49m15m setup_call_catcher_cleanup(system:with_mutex('$load_file','$mt_start_load'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',(0x557035f2f580),[expand(false),expand(true)])),system:'$mt_do_load'((0x557035f2f580),'mt_03.pl','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',user,[expand(false),expand(true)]),A,system:'$mt_end_load'((0x557035f2f580))). 0m49m0m0m0m % init.pl:646: (18)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m91m49m14m '$qdo_load_file'('mt_03.pl','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',user,[expand(false),expand(true)]). 0m49m0m0m0m % init.pl:2546: (21)$0m0m94m49m15m[system]0m49m0m0m0m#0m2m92m49m10m '$do_load_file_2'('mt_03.pl','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',user,compiled,[expand(false),expand(true)]). 0m49m0m0m0m % init.pl:2592: (25)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m94m49m15m setup_call_catcher_cleanup(system:'$start_consult'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',1632225690.4083154),system:'$load_file'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',A,[expand(false),expand(true)]),B,system:'$end_consult'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',lexstate(202,swi),user)). 0m49m0m0m0m % init.pl:646: (26)$0m0m94m49m15m[system]0m49m0m0m0m#0m2m96m49m15m '$load_file'('* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ','* https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl ',A,[expand(false),expand(true)]). 0m49m0m0m0m % init.pl:3007: (31)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m96m49m10m '$execute_directive_3'(clause_u(modA:codeB,A)). 0m49m0m0m0m % init.pl:3574: (32)$0m0m94m49m15m[system]0m49m0m0m0m#0m0m94m49m15m catch(myMt:clause_u(modA:codeB,A),error(B,C),system:'$exception_in_directive'(error(B,C))). 0m49m0m0m0m % init.pl:546: (33)0m0m39m49m10m[myMt]0m49m39m0m0m#0m1m96m49m10m pfc_lib:clause_u(modA:codeB,A). 0m49m0m21m0m % mpred_core.pl:4331: (35)0m0m91m49m11m[rtrace]0m49m0m0m0m0m0m39m49m10m rtrace:quietly(myMt:(log_lines(red,failure+failed_mpred_test(clause_u(modA:codeB,A))),maybe_mpred_break(failed_mpred_test(clause_u(modA:codeB,A))),log_failure_red)). 0m49m39m0m0m % rtrace.pl:217: (36)$0m0m39m49m10m[myMt]0m49m39m0m0m0m0m39m49m10m ''(myMt:(log_lines(red,failure+failed_mpred_test(clause_u(modA:codeB,A))),maybe_mpred_break(failed_mpred_test(clause_u(modA:codeB,A))),log_failure_red)). 0m49m39m0m0m0m1m92m49m10m no(clause) 0m49m0m21m0m (38)0m0m39m49m10m[myMt]0m49m39m0m0m0m2m39m49m14m pfc_lib:break_ex. 0m49m39m0m0m % mpred_core.pl:4226: (39)$0m0m91m49m11m[rtrace]0m49m0m0m0m0m0m39m49m10m rtrace:quietly(myMt:(log_failure_red,dumpST,log_failure_red)). 0m49m39m0m0m % rtrace.pl:217: (40)$0m0m39m49m10m[myMt]0m49m39m0m0m0m0m39m49m10m ''(myMt:(log_failure_red,dumpST,log_failure_red)). 0m49m39m0m0m0m1m92m49m10m no(clause) 0m49m0m21m0m (43)0m0m91m49m17m[butterfly]0m49m0m0m0m0m0m39m49m10m butterfly:in_bfly(f,myMt:zotrace(with_all_dmsg((b_setval('$dump_frame',500),dumpST1)))). 0m49m39m0m0m % butterfly_console.pl:226: %~ FILE: * https://logicmoo.org:2082/gitlab/logicmoo/logicmoo_workspace/-/edit/master/packs_sys/pfc/t/sanity_base/mt_03.pl#L56 31msmart_format("%%%%%%%%%%%%%%%%%%%%%%%%%%% (~w) ~w %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%\n",[red,failure]) 39m %~ DUMP_BREAK/0 %~ message_hook(unhandled_exception(abort),error,['Unhandled exception: ','~p'-[abort]]) Unhandled exception: abort ERROR: Unhandled exception: abort ~*/ /*~ ~*/ /* % % PFC is codeA language extension for prolog. % % It adds codeA new type of module inheritance % % Dec 13, 2035 % Douglas Miles */ % was_module(header_sane,[]). :- include(library(logicmoo_test_header)). %:- add_import_module(header_sane,baseKB,end). /*~ running(-), %~ reload_of_test_header. %~ %~ Reset DB complete for myMt %~ %~ Reset DB complete for myMt %~ this_test_might_need( :-( expects_dialect(pfc))) %~ this_test_might_need( :-( use_module( library(logicmoo_plarkc)))) ~*/ %:- add_import_module(header_sane,baseKB,end). :- set_defaultAssertMt(myMt). /*~ ~*/ :- expects_dialect(pfc). /*~ ~*/ :- mpred_trace_exec. /*~ ~*/ mtProlog(modA). /*~ No source location!? %~ message_hook( %~ error( %~ permission_error(redefine,imported_procedure,baseKB:mtProlog/1), %~ context(system:'$record_clause'/3,Context_Kw)), %~ error, %~ [ 'No permission to ~w ~w `~p\'' - [ redefine, %~ imported_procedure, %~ baseKB : mtProlog/1]]) No permission to redefine imported_procedure `baseKB:(mtProlog/1)' ERROR: No permission to redefine imported_procedure `baseKB:(mtProlog/1)' ~*/ mtProlog(modB). /*~ No source location!? %~ message_hook( %~ error( %~ permission_error(redefine,imported_procedure,baseKB:mtProlog/1), %~ context(system:'$record_clause'/3,Context_Kw)), %~ error, %~ [ 'No permission to ~w ~w `~p\'' - [ redefine, %~ imported_procedure, %~ baseKB : mtProlog/1]]) No permission to redefine imported_procedure `baseKB:(mtProlog/1)' ERROR: No permission to redefine imported_procedure `baseKB:(mtProlog/1)' ~*/ modA: (codeA:- printAll('$current_source_module'(_M)),codeB). /*~ No source location!? ~*/ modB: (codeB). %:- \+ modA:codeA. /*~ No source location!? ~*/ %:- \+ modA:codeA. genlMt(modA,modB). % before test, to make sure codeA was not accdently defined in modB /*~ ~*/ % before test, to make sure codeA was not accdently defined in modB :- sanity(\+ module_clause(modB:codeA,_)). /*~ %~ ?-( mpred_test( "Test_0036_Line_0000__naf_CodeA_in_modB_in_myMt", %~ myMt : \+( module_clause(modB:codeA,Clause_Kw)))). passed=info(why_was_true(myMt:(\+module_clause(modB:codeA,_1095598)))) no_proof_for(\+module_clause(modB:codeA,Clause_Kw2)). no_proof_for(\+module_clause(modB:codeA,Clause_Kw2)). no_proof_for(\+module_clause(modB:codeA,Clause_Kw2)). name='logicmoo.pfc.test.sanity_base.MT_03-Test_0036_Line_0000__naf_CodeA_in_modB_in_myMt'. JUNIT_CLASSNAME='logicmoo.pfc.test.sanity_base.MT_03'. JUNIT_CMD='timeout --foreground --preserve-status -s SIGKILL -k 10s 10s swipl -x /var/lib/jenkins/workspace/logicmoo_workspace/bin/lmoo-clif -t "[\'mt_03.pl\']"'. % 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-Logicm goal=myMt:module_clause(modB:codeB,_963544). time=0.00012254714965820312. passed=passed=info(why_was_true(myMt:module_clause(modB:codeB,true))) no_proof_for(module_clause(modB:codeB,true)). no_proof_for(module_clause(modB:codeB,true)). no_proof_for(module_clause(modB:codeB,true)). result=passed. ]]>