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

debugging

Browse Source
This commit is contained in:
Vitor Santos Costa 2018-02-07 23:18:43 +00:00
parent 8d6654d4cf
commit eee6760f96
2 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
pl/consult.yap
View File

@ -1414,6 +1414,7 @@ initialization(_G,_OPT).
OPT, initialization(G0,OPT)), OPT, initialization(G0,OPT)),
'$yap_strip_module'(G0,M,G1), '$yap_strip_module'(G0,M,G1),
'$expand_term'((M:G1), G), '$expand_term'((M:G1), G),
writeln(G),
( (
OPT == now OPT == now
-> ->

3
pl/debug.yap
View File

@ -924,7 +924,10 @@ be lost.
'$scan_number'(Nb) :- '$scan_number'(Nb) :-
readutil:read_line_to_codes( debugger_input, S), readutil:read_line_to_codes( debugger_input, S),
S = [_|_],
!,
number_codes(Nb,S). number_codes(Nb,S).
'$scan_number'(0).
'$print_deb_sterm'(G) :- '$print_deb_sterm'(G) :-
'$get_sterm_list'(L), !, '$get_sterm_list'(L), !,