Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]

Groups > comp.lang.forth > #28581

Re: +TO in GForth

Show all headers | View raw

On Wednesday, February 19, 2014 9:08:36 AM UTC-6, Mark Wills wrote:
> How does one define +TO in GForth?

If these words followed ' ['] char [char] and friends, you could do this:

: +TO ( x "value" -- )
  ' >body +! ;

: [+TO] ( x "value" -- )
  ' >body postpone literal postpone +! ; immediate

But they don't, so you have to write a state-smart word or, in gforth, a dual-semantics word:

' +to
' [+to]
interpret/compile: +to ( x "value" -- )

See gforth's manual.


-- Julian

Back to comp.lang.forth | Previous | Next — Previous in thread | Next in thread | Find similar | Unroll thread

Thread

+TO in GForth Mark Wills <markrobertwills@yahoo.co.uk> - 2014-02-19 07:08 -0800
  Re: +TO in GForth Julian Fondren <julian.fondren@gmail.com> - 2014-02-19 07:31 -0800
  Re: +TO in GForth anton@mips.complang.tuwien.ac.at (Anton Ertl) - 2014-02-19 15:36 +0000
    Re: +TO in GForth hughaguilar96@yahoo.com - 2014-02-20 21:36 -0800
      Re: +TO in GForth Harold <hzrabbie@gmail.com> - 2014-02-21 10:39 -0800
      Re: +TO in GForth Julian Fondren <julian.fondren@gmail.com> - 2014-02-23 04:31 -0800
        Re: +TO in GForth Mark Wills <markwills1970@gmail.com> - 2014-02-23 15:10 -0800
  Re: +TO in GForth hughaguilar96@yahoo.com - 2014-02-19 22:44 -0800

csiph-web