diff --git a/basis/compiler/cfg/intrinsics/allot/allot.factor b/basis/compiler/cfg/intrinsics/allot/allot.factor index 43747f88c9..9804244ecb 100644 --- a/basis/compiler/cfg/intrinsics/allot/allot.factor +++ b/basis/compiler/cfg/intrinsics/allot/allot.factor @@ -62,7 +62,7 @@ IN: compiler.cfg.intrinsics.allot : bytes>cells ( m -- n ) cell align cell /i ; : ^^allot-byte-array ( n -- dst ) - 2 cells + byte-array ^^allot ; + 16 + byte-array ^^allot ; : emit-allot-byte-array ( len -- dst ) ds-drop