1:      1  1 CALL pred loopcheck.main/2-0 (det) loopcheck.m:17
mdb> echo on
Command echo enabled.
mdb> register --quiet
mdb> context nextline
Contexts will be printed on the next line.
mdb> break loopcheck.main
 0: + stop  interface pred loopcheck.main/2-0 (det)
mdb> break loopcheck.loop
 1: + stop  interface pred loopcheck.loop/1-0 (det)
mdb> finish
       2:      2  2 CALL pred loopcheck.loop/1-0 (det)
                         loopcheck.m:24 (from loopcheck.m:18)
       3:      3  3 CALL pred loopcheck.loop/1-0 (det)
                         loopcheck.m:24 (from loopcheck.m:25)
      12:      3  3 EXCP pred loopcheck.loop/1-0 (det)
                         loopcheck.m:25 (from loopcheck.m:25)
      13:      2  2 EXCP pred loopcheck.loop/1-0 (det)
                         loopcheck.m:25 (from loopcheck.m:18)
      14:      1  1 EXCP pred loopcheck.main/2-0 (det)
                         loopcheck.m:18
mdb> continue
Uncaught Mercury exception:
Software Error: detected infinite recursion in pred loopcheck.loop/1
Last trace event was event #137.
Last trace event before the unhandled exception was event #8.