gforth/struct.fs - diff

Return to struct.fs CVS log

Up to [gforth] / gforth

version 1.22, 2003/03/22 10:04:07	version 1.24, 2007/12/31 17:34:58
Line 1	Line 1
\ data structures (like C structs)	\ data structures (like C structs)

\ Copyright (C) 1995,1997,2000,2003 Free Software Foundation, Inc.	\ Copyright (C) 1995,1997,2000,2003,2007 Free Software Foundation, Inc.

\ This file is part of Gforth.	\ This file is part of Gforth.

Line 102 cell% 2* 2constant double%	Line 102 cell% 2* 2constant double%
\g similar to @code{allocate}.	\g similar to @code{allocate}.
nip allocate ;	nip allocate ;

: %alloc ( size align -- addr ) \ gforth	: %alloc ( align size -- addr ) \ gforth
\g Allocate @var{size} address units with alignment @var{align},	\g Allocate @var{size} address units with alignment @var{align},
\g giving a data block at @var{addr}; @code{throw} an ior code	\g giving a data block at @var{addr}; @code{throw} an ior code
\g if not successful.	\g if not successful.