Re: [CREATE text source]

From: Jeff Massung <jma_at_mfire.com>
Date: Tue, 16 Sep 2003 10:02:34 -0600

Chuck,

Doing a LOCATE EVALUATE gives some ideas. I've never
really tried it, before, but it certainly looks simple
to do:

: string-create ( -- ) =

#tib 2! 0 >in ! -1 'source-id ! create ;

: my-create ( c-addr u -- )
save-input n>r string-create nr> restore-input drop ;

You may also want to copy the portions of EVALUATE that =

catch and throw exceptions.

Jeff

<chuck_at_sanna.com> wrote:

Hello,

I would like to use CREATE to create a definition whose name comes from a=

buffer instead of the current input stream. Or maybe I can push the name=

into the current input stream.

Ideas?

Thanks

Chuck

----------------------------------------------------------------------
sftalk_at_forth.com The SwiftForth programming discussion email list
To unsubscribe, send subject "unsubscribe" to sftalk-request_at_forth.com
For list command help, send subject "help" to sftalk-request_at_forth.com
Message archives are located at http://www.forth.com/archive/sftalk
----------------------------------------------------------------------
This list is a forum for SwiftForth users. For product support and bug =

reports, please send email to support_at_forth.com
----------------------------------------------------------------------

This archive was generated by hypermail 2.2.0 : Tue Dec 02 2008 - 03:04:33 PST