compiler.cfg.intrinsics.allot: fix inline byte array allocation on 32-bit platforms
parent
e1c365e69a
commit
3c4c05e915
|
@ -62,7 +62,7 @@ IN: compiler.cfg.intrinsics.allot
|
||||||
: bytes>cells ( m -- n ) cell align cell /i ;
|
: bytes>cells ( m -- n ) cell align cell /i ;
|
||||||
|
|
||||||
: ^^allot-byte-array ( n -- dst )
|
: ^^allot-byte-array ( n -- dst )
|
||||||
2 cells + byte-array ^^allot ;
|
16 + byte-array ^^allot ;
|
||||||
|
|
||||||
: emit-allot-byte-array ( len -- dst )
|
: emit-allot-byte-array ( len -- dst )
|
||||||
ds-drop
|
ds-drop
|
||||||
|
|
Loading…
Reference in New Issue