diff options
Diffstat (limited to 'src/interp/g-opt.boot')
| -rw-r--r-- | src/interp/g-opt.boot | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/interp/g-opt.boot b/src/interp/g-opt.boot index 47c5ce92..9c4004ed 100644 --- a/src/interp/g-opt.boot +++ b/src/interp/g-opt.boot @@ -443,19 +443,19 @@ optSuchthat [.,:u] == ["SUCHTHAT",:u] optMINUS u == u is ['MINUS,v] => - NUMBERP v => -v + integer? v => -v u u optQSMINUS u == u is ['QSMINUS,v] => - NUMBERP v => -v + integer? v => -v u u opt_- u == u is ['_-,v] => - NUMBERP v => -v + integer? v => -v u u |