1:      1  1 CALL pred throw.main/2-0 (cc_multi) throw.m:10
mdb> echo on
Command echo enabled.
mdb> register --quiet
mdb> break p
 0: + stop  interface pred throw.p/1-0 (cc_nondet)
mdb> break q
 1: + stop  interface pred throw.q/1-0 (semidet)
mdb> continue
      13:      9  7 CALL pred throw.p/1-0 (cc_nondet) throw.m:20 (exception.m:NNNN)
mdb> finish
      70:      9  7 EXCP pred throw.p/1-0 (cc_nondet)
mdb> dd -d 3 -n 7
Call p(_)
Throws "Too big"
Expected? no
a(3)
Valid? yes
Call b(3, _)
Throws "Too big"
Expected? yes
Found unhandled or incorrect exception:
p(_)
"Too big"
Is this a bug? yes
      70:      9  7 EXCP pred throw.p/1-0 (cc_nondet)
mdb> continue
exception(univ_cons("Too big"))
    1210:    466  7 CALL pred throw.q/1-0 (semidet) throw.m:48 (exception.m:NNNN)
mdb> finish
    1267:    466  7 EXCP pred throw.q/1-0 (semidet)
mdb> dd -d 3 -n 7
Call q(_)
Throws "Too big"
Expected? no
a2(3)
Valid? yes
Call b2(3, _)
Throws "Too big"
Expected? yes
Found unhandled or incorrect exception:
q(_)
"Too big"
Is this a bug? yes
    1267:    466  7 EXCP pred throw.q/1-0 (semidet)
mdb> continue
exception(univ_cons("Too big"))