6.1.0890 CELLS CORE

( n₁ -- n₂ )

n₂ is the size in address units of n₁ cells.

See:

A.6.1.0880 CELL+, A.6.1.0890 CELLS.

Rationale:

Example:

CREATE NUMBERS 100 CELLS ALLOT

Allots space in the array NUMBERS for 100 cells of data.

Testing:

: BITS ( X -- U )
   0 SWAP BEGIN DUP WHILE
     DUP MSB AND IF >R 1+ R> THEN 2*
   REPEAT DROP ;

( CELLS >= 1 AU, INTEGRAL MULTIPLE OF CHAR SIZE, >= 16 BITS )
T{ 1 CELLS 1 <         -> <FALSE> }T
T{ 1 CELLS 1 CHARS MOD ->    0    }T
T{ 1S BITS 10 <        -> <FALSE> }T

6.1.0890 CELLS CORE

See:

Rationale:

Testing:

ContributeContributions