1- For exapmple, I can't use [']-a in a colon definition:
defer go
: go1 ..... ;
: use_go ['] go1 is go ;
doesn't work for me.
2- The forth word latest (gforth) is not defined in iForth:
I used latest in the definition of the forth word fact.
I modified the defintion of fact to get rid of latest.
3- The forth words place and +place are not defined in iForth:
I borrowed the definitions from gforth.
So I managed to get it working under: gforth, iForth, vfxForth anf-marcel
minforth (MF348).
Ahmed
On 1/5/2025 6:52 AM, ahmed wrote:
[..]
3- The forth words place and +place are not defined in iForth:
I borrowed the definitions from gforth.
place is called PACK , +PLACE is called PLACE+ .
On 13/07/2026 3:58 am, marcel hendrix wrote:
On 1/5/2025 6:52 AM, ahmed wrote:
[..]
3- The forth words place and +place are not defined in iForth:
I borrowed the definitions from gforth.
place is called PACK , +PLACE is called PLACE+ .
Presumably that's PACK DROP
Just about every forth has PLACE while hardly any have PACK. I have both
as PACK has proven too handy e.g.
: !fn ( a u handle -- a' u' )
>r -blanks max-path umin r> cell+ pack count 2dup upper ;
Have only seen PACK in the odd Euro forth. Anyone know its exact origin?
On 7/19/2026 7:37 AM, dxf wrote:
On 13/07/2026 3:58 am, marcel hendrix wrote:
On 1/5/2025 6:52 AM, ahmed wrote:
[..]
3- The forth words place and +place are not defined in iForth:
I borrowed the definitions from gforth.
place is called PACK , +PLACE is called PLACE+ .
Presumably that's PACK DROP
Just about every forth has PLACE while hardly any have PACK.-a I have both >> as PACK has proven too handy e.g.
-a-a : !fn ( a u handle -- a' u' )
-a-a-a-a >r-a -blanks-a max-path umin-a r> cell+ pack count-a 2dup upper ; >>
Have only seen PACK in the odd Euro forth.-a Anyone know its exact origin? >>
PACK ( drop ) was mentioned in the BASIS documents we tracked for the Dutch tForth project (transputer Forth).
I have learned not to use nice names for (as yet) unstandardized features because the name or functionality may change.
| Sysop: | Amessyroom |
|---|---|
| Location: | Fayetteville, NC |
| Users: | 74 |
| Nodes: | 6 (1 / 5) |
| Uptime: | 51:10:49 |
| Calls: | 1,101 |
| Calls today: | 1 |
| Files: | 1,339 |
| Messages: | 276,012 |