Path: csiph.com!v102.xanadu-bbs.net!xanadu-bbs.net!nntp.club.cc.cmu.edu!feeder.erje.net!eu.feeder.erje.net!news2.arglkargh.de!news.ecp.fr!aioe.org!.POSTED!not-for-mail From: "Rod Pemberton" Newsgroups: comp.lang.forth Subject: Re: Compiler Tricks Date: Thu, 05 Jun 2014 17:30:56 -0400 Organization: Aioe.org NNTP Server Lines: 20 Message-ID: References: <00ef6f4f-1814-4d62-acfe-e971e714622f@googlegroups.com> NNTP-Posting-Host: CNsg4fVcCsvs3UaOgZtQCw.user.speranza.aioe.org Mime-Version: 1.0 Content-Type: text/plain; charset=iso-8859-1; format=flowed; delsp=yes Content-Transfer-Encoding: 7bit X-Complaints-To: abuse@aioe.org User-Agent: Opera Mail/12.16 (Linux) X-Notice: Filtered by postfilter v. 0.8.2 Xref: csiph.com comp.lang.forth:31223 On Thu, 05 Jun 2014 16:48:42 -0400, Jason Damisch wrote: > On Thursday, June 5, 2014 12:36:23 PM UTC-7, Rod Pemberton wrote: > >> If not, are you asking for something closer to: >> : STRINGIFY" :NONAME POSTPONE ." POSTPONE ; ; > > This returns an XT which when executed displays the string. > I wanted an XT which when executed places the cstr on the stack. > Then I can COUNT TYPE it or whatever. Ok, what about this? Closer? : STRINGIFY" :NONAME POSTPONE S" POSTPONE ; ; No need to COUNT though, just EXECUTE and TYPE . Rod Pemberton