rishi/scryer-prolog
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix arg_ bug.

Browse Source
This commit is contained in:
Mark Thom
2018-02-03 12:24:43 -07:00
parent 23f81946c5
commit b99f5064f0
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/prolog/builtins.rs
View File

@@ -240,7 +240,7 @@ fn get_builtins(atom_tbl: TabledData<Atom>) -> Code {
None), None),
set_constant!(atom!("integer_expected", atom_tbl))], set_constant!(atom!("integer_expected", atom_tbl))],
goto_execute!(59, 1), // goto throw/1. goto_execute!(59, 1), // goto throw/1.
try_me_else!(5), // arg_/3, 173. try_me_else!(5), // arg_/5, 173.
fact![get_value!(temp_v!(1), 2), fact![get_value!(temp_v!(1), 2),
get_value!(temp_v!(1), 3)], get_value!(temp_v!(1), 3)],
neck_cut!(), neck_cut!(),
@@ -273,7 +273,7 @@ fn get_builtins(atom_tbl: TabledData<Atom>) -> Code {
put_value!(perm_v!(3), 4), put_value!(perm_v!(3), 4),
put_value!(perm_v!(5), 5)], put_value!(perm_v!(5), 5)],
deallocate!(), deallocate!(),
goto_execute!(173, 3), // goto arg_/3. goto_execute!(173, 5), // goto arg_/5.
display!(), // display/1, 192. display!(), // display/1, 192.
proceed!(), proceed!(),
dynamic_is!(), // is/2, 194. dynamic_is!(), // is/2, 194.