bootstrap.image.primitives: resize-byte-array can also use integer-array-capacity

locals-and-roots
Björn Lindqvist 2016-05-24 14:20:46 +02:00
parent e19df707da
commit 0cbd0552b0
2 changed files with 6 additions and 1 deletions

View File

@ -177,7 +177,7 @@ CONSTANT: all-primitives {
{
"resize-byte-array" ( n byte-array -- new-byte-array )
"resize_byte_array"
{ integer byte-array } { byte-array } f
{ integer-array-capacity byte-array } { byte-array } f
}
}
}

View File

@ -45,6 +45,11 @@ IN: compiler.tree.propagation.tests
integer-array-capacity <class-info> =
] unit-test
{ t } [
[ dupd resize-byte-array drop ] final-info first
integer-array-capacity <class-info> =
] unit-test
! Strings
{ V{ 3 } } [
[ 3 f <string> length ] final-literals