db4
Slava Pestov 2008-07-12 13:12:45 -05:00
parent 3e082f21e3
commit 8160859c8b
2 changed files with 5 additions and 2 deletions

View File

@ -51,7 +51,7 @@ must-fail-with
[ error>> unexpected-eof? ]
must-fail-with
[ "IN: classes.tuple.parser.tests USE: generic.standard TUPLE: foo { slot no-method } ;" eval ]
[ "IN: classes.tuple.parser.tests USE: alien TUPLE: foo { slot dll } ;" eval ]
[ error>> no-initial-value? ]
must-fail-with

View File

@ -444,7 +444,10 @@ most-negative-fixnum most-positive-fixnum [a,b]
{ /f < > <= >= }
[ { real real } "input-classes" set-word-prop ] each
{ /i bitand bitor bitxor bitnot shift }
{ /i mod /mod }
[ { rational rational } "input-classes" set-word-prop ] each
{ bitand bitor bitxor bitnot shift }
[ { integer integer } "input-classes" set-word-prop ] each
{