Name: module_info/3
Module: module_information
assert_layout(File,Layout,NewPos) :- print('Layout:'),print(Layout),nl, retractall(current_context(_,_)), ( Layout = [NewPos|_] -> true ; otherwise -> NewPos = none), assert(current_context(File,NewPos)).
Calls:
Name: current_context/2
Name: assert/1
Name: =/2
Name: otherwise
Name: ->/2
Name: true
Name: ->/3
Name: retractall/1
Name: nl
Name: print/1
Called:
Name: logte/2
Dynamic: true
current_context(none,none).
Name: assert_layout/3
logte(_Term,Layout) :- prolog_load_context(file,File), current_context(Before,OldPos), assert_layout(File,Layout,NewPos), ( File=Before -> true ; otherwise -> print('### start: '), print(File),print('/'),print(NewPos), print(', was: '), print(Before),print('/'),print(OldPos),nl).
Name: prolog_load_context/2