[Axiom-developer] breakmode handling bug ?

[Vanuxem Gregory]

Hello,

It is possible in Axiom to modify its behavior when an error is
encountered via

)set break something

But if you set it to 'query', Axiom will ask you if you want to return
to top level or enter a Lisp break loop. What I find strange is that
this not what Axiom has to do. The code is (g-error.boot):

=======================================================================

msgQ := 
 $cclSystem =>
   ['%l,'"   You have two options. Enter:",'%l,_
    '"    ",:bright '"top     ",'"  to return to top level, or",'%l,_
    '"    ",:bright '"break   ",'"  to enter a LISP break loop.",'%l,_
    '%l,'"   Please enter your choice now:"]
 ['%l,'"   You have three options. Enter:",'%l,_
  '"    ",:bright '"continue",'"  to continue processing,",'%l,_
  '"    ",:bright '"top     ",'"  to return to top level, or",'%l,_
  '"    ",:bright '"break   ",'"  to enter a LISP break loop.",'%l,_
  '%l,'"   Please enter your choice now:"]
x := STRING2ID_-N(queryUser msgQ,1)
x := 
  $cclSystem =>
    selectOptionLC(x,'(top break),NIL)
  selectOptionLC(x,'(top break continue),NIL)
null x =>
  sayBrightly bright '"  That was not one of your choices!"
========================================================================

>From the code (since $cclSystem is set to false) we have three options
and not two. On my machine I have only two choices. I added code to
PRINT the value of $cclSystem and $msgQ, something is wrong here
$cclSystem is set to false and msqQ holds the cclSystem message. I do
not have time right now to investigate further so I submit it here,
maybe you can understand what is going on here.

Is it a bug in GCL ? or in Axiom ?

Am I missing something ? 

Greg

PS : To test it issue a ')set break query' followed by a ')lisp ub' for
example.