kernel.private: add ERROR-OUT-OF-FIXNUM-RANGE on the Factor side

db4
Björn Lindqvist 2014-06-07 14:36:53 +02:00
parent 1300a27dca
commit 906f796094
2 changed files with 21 additions and 16 deletions

View File

@ -1,5 +1,6 @@
USING: accessors arrays kernel sequences sequences.private growable
tools.test vectors layouts system math vectors.private ;
USING: accessors arrays kernel kernel.private literals sequences
sequences.private growable tools.test vectors layouts system math
vectors.private ;
IN: arrays.tests
[ -2 { "a" "b" "c" } nth ] must-fail
@ -20,4 +21,7 @@ IN: arrays.tests
[ -1 f <array> ] must-fail
[ cell-bits cell log2 - 2^ f <array> ] must-fail
! To big for a fixnum #1045
[ 67 2^ 3 <array> ] must-fail
[ 67 2^ 3 <array> ] [
${ "kernel-error" ERROR-OUT-OF-FIXNUM-RANGE 147573952589676412928 f }
=
] must-fail-with

View File

@ -366,7 +366,7 @@ CONSTANT: CONTEXT-OBJ-IN-CALLBACK-P 3
! Runtime errors must be kept in sync with:
! vm/errors.hpp
CONSTANT: kernel-error-count 19
CONSTANT: kernel-error-count 20
CONSTANT: ERROR-EXPIRED 0
CONSTANT: ERROR-IO 1
@ -375,17 +375,18 @@ CONSTANT: ERROR-TYPE 3
CONSTANT: ERROR-DIVIDE-BY-ZERO 4
CONSTANT: ERROR-SIGNAL 5
CONSTANT: ERROR-ARRAY-SIZE 6
CONSTANT: ERROR-C-STRING 7
CONSTANT: ERROR-FFI 8
CONSTANT: ERROR-UNDEFINED-SYMBOL 9
CONSTANT: ERROR-DATASTACK-UNDERFLOW 10
CONSTANT: ERROR-DATASTACK-OVERFLOW 11
CONSTANT: ERROR-RETAINSTACK-UNDERFLOW 12
CONSTANT: ERROR-RETAINSTACK-OVERFLOW 13
CONSTANT: ERROR-CALLSTACK-UNDERFLOW 14
CONSTANT: ERROR-CALLSTACK-OVERFLOW 15
CONSTANT: ERROR-MEMORY 16
CONSTANT: ERROR-FP-TRAP 17
CONSTANT: ERROR-INTERRUPT 18
CONSTANT: ERROR-OUT-OF-FIXNUM-RANGE 7
CONSTANT: ERROR-C-STRING 8
CONSTANT: ERROR-FFI 9
CONSTANT: ERROR-UNDEFINED-SYMBOL 10
CONSTANT: ERROR-DATASTACK-UNDERFLOW 11
CONSTANT: ERROR-DATASTACK-OVERFLOW 12
CONSTANT: ERROR-RETAINSTACK-UNDERFLOW 13
CONSTANT: ERROR-RETAINSTACK-OVERFLOW 14
CONSTANT: ERROR-CALLSTACK-UNDERFLOW 15
CONSTANT: ERROR-CALLSTACK-OVERFLOW 16
CONSTANT: ERROR-MEMORY 17
CONSTANT: ERROR-FP-TRAP 18
CONSTANT: ERROR-INTERRUPT 19
PRIVATE>