Gforth中CREATE指令是否会造成内存空间浪费？

你的理解有部分正确，但也存在误区——CREATE确实会默认分配1个单元（cell）的空间，但这个空间不一定是浪费，而且你可以通过特定写法避免它。

1. CREATE的默认行为 #

在Gforth中，单独执行CREATE a时，会完成两个核心操作：

• 在词典中创建一个新的词a，执行a时会将其关联的数据区起始地址压入栈。
• 默认分配1个cell的内存作为a的数据区，这就是你用来存储42的变量空间。

2. 你的TAMPON定义的空间情况 #

你写的代码：

: TAMPON CREATE 80 ALLOT DOES> + ;

执行流程是：CREATE先分配1个cell的空间，随后80 ALLOT在这个cell的后方再分配80字节。因此最终的数据区结构是「1个cell + 80字节缓冲区」。

这里的默认cell是否属于浪费，取决于你的需求：如果可以用这个cell存储缓冲区的长度、偏移量等元数据，那它就不是浪费；如果完全不需要这个cell，那确实会占用额外的内存（通常是4或8字节，取决于系统位数）。

3. 如何避免默认cell的空间占用 #

如果不需要CREATE默认分配的cell，可以通过调整数据指针（DP）来撤销这个分配，再创建纯粹的缓冲区：

: TAMPON CREATE CELLS - DP ! 80 ALLOT DOES> ;

• CELLS - DP ! 将数据指针回退1个cell的位置，抵消CREATE的默认分配。
• 后续80 ALLOT直接在词的数据区起始位置分配80字节，此时执行TAMPON定义的词时，会直接将缓冲区的起始地址压入栈。

内容的提问来源于stack exchange，提问作者user13736218