mirror of
https://github.com/Mercury-Language/mercury.git
synced 2026-04-17 18:33:58 +00:00
17ca99b27e
Estimated hours taken: 2 Branches: main Fix a bug in my recent diff to allow retries over predicates which are passed an io.state in their polymorphic arguments. The IO action number was not being reset if a retry was done over a predicate with an io.state in one of its polymorphic arguments. tests/debugger/Mercury.options: Enable io tabling on poly_io_retry. tests/debugger/poly_io_retry.exp: tests/debugger/poly_io_retry.inp: tests/debugger/poly_io_retry.m: Test the bug fix. Previously reexecuting the first call to polycall/3 would result in another "1" being displayed. trace/mercury_trace.c: Find the IO action number of the call being retried to if a polymorphic argument with an io.state value is found.
16 lines
118 B
Plaintext
16 lines
118 B
Plaintext
register --quiet
|
|
context none
|
|
echo on
|
|
table_io allow
|
|
table_io start
|
|
break polycall
|
|
*
|
|
c
|
|
f
|
|
retry -a
|
|
f
|
|
c
|
|
f
|
|
retry
|
|
quit -y
|