simplification

cvs
Slava Pestov 2005-12-11 01:08:47 +00:00
parent 44826cb0d7
commit 4cbf30669d
1 changed files with 1 additions and 2 deletions

View File

@ -111,8 +111,7 @@ M: %fixnum<< generate-node
! make a copy
0 scratch 1 input-operand MOV
! check for potential overflow
0 scratch 0 input shift-add ADD
0 scratch 0 input shift-add 2 * 1- CMP
0 scratch 0 input shift-add 2dup ADD 2 * 1- CMP
! is there going to be an overflow?
"no-overflow" get JBE
! there is going to be an overflow, make a bignum