bootstrap.image.primitives: resize-byte-array can also use integer-array-capacity
parent
e19df707da
commit
0cbd0552b0
|
@ -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
|
||||
}
|
||||
}
|
||||
}
|
||||
|
|
|
@ -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
|
||||
|
|
Loading…
Reference in New Issue