Forums before death by AOL, social media and spammers... "We can't have nice things"
|    comp.lang.forth    |    Forth programmers eat a lot of Bratwurst    |    117,927 messages    |
[   << oldest   |   < older   |   list   |   newer >   |   newest >>   ]
|    Message 117,004 of 117,927    |
|    Hans Bezemer to albert@spenarnc.xs4all.nl    |
|    Re: "Back & Forth" - Local variables    |
|    08 Jan 25 19:11:53    |
      From: the.beez.speaks@gmail.com              On 08-01-2025 17:27, albert@spenarnc.xs4all.nl wrote:              ( my CO variant, using the return address)              : LOCAL R> SWAP DUP >R @ >R EXECUTE R> R> ! ;              VARIABLE A       VARIABLE B              \ I'm paranoid :)              8 a !       7 b !              : divide        A LOCAL        B LOCAL        B ! A ! A @ B @ /        . CR                     15 3 divide a ? b ?       \ it doesn't mean they're not out to get you              Wow! This works! Can't say how solid it is.. but still!              Hans Bezemer              --- SoupGate-DOS v1.05        * Origin: you cannot sedate... all the things you hate (1:229/2)    |
[   << oldest   |   < older   |   list   |   newer >   |   newest >>   ]
(c) 1994, bbs@darkrealms.ca