version 1.6, 2004/12/31 13:23:56
|
version 1.8, 2007/12/31 17:34:58
|
Line 1
|
Line 1
|
\ stack cache setup |
\ stack cache setup |
|
|
\ Copyright (C) 2003,2004 Free Software Foundation, Inc. |
\ Copyright (C) 2003,2004,2007 Free Software Foundation, Inc. |
|
|
\ This file is part of Gforth. |
\ This file is part of Gforth. |
|
|
Line 29
|
Line 29
|
\ \E create regs spTOS , |
\ \E create regs spTOS , |
|
|
\E IPregs 1 0 stack-state IPss1 |
\E IPregs 1 0 stack-state IPss1 |
\E regs 3 cells + 0 -1 stack-state ss0 |
\E regs 3 th 0 -1 stack-state ss0 |
\E regs 2 cells + 1 0 stack-state ss1 |
\E regs 2 th 1 0 stack-state ss1 |
\E regs 1 cells + 2 1 stack-state ss2 |
\E regs 1 th 2 1 stack-state ss2 |
\ \E regs 0 cells + 3 2 stack-state ss3 |
\ \E regs 0 th 3 2 stack-state ss3 |
\ \E regs 1 cells + 0 -1 stack-state ss0 |
\ \E regs 1 th 0 -1 stack-state ss0 |
\ \E regs 1 0 stack-state ss1 |
\ \E regs 1 0 stack-state ss1 |
|
|
\ the first of these is the default state (for now) |
\ the first of these is the default state (for now) |