Path: utzoo!utgpu!news-server.csri.toronto.edu!clyde.concordia.ca!uunet!wuarchive!cs.utexas.edu!rutgers!rochester!pt.cs.cmu.edu!dsl.pitt.edu!pitt!willett!ForthNet
From: ForthNet@willett.pgh.pa.us (ForthNet articles from GEnie)
Newsgroups: comp.lang.forth
Subject: Mathematical routines
Message-ID: <1482.UUL1.3#5129@willett.pgh.pa.us>
Date: 8 Aug 90 01:58:44 GMT
Organization: String, Scotch tape, and Paperclips.  (in Pgh, PA)
Lines: 23


 Date: 08-06-90 (19:09)              Number: 1680 (Echo)
   To: ZAFAR ESSAK                   Refer#: NONE
 From: MIKE NEMETH                     Read: NO
 Subj: Count delimited convert       Status: PUBLIC MESSAGE

 Zafar, I could find the conference with your message so I put it here.
 RE: dconvert
 you ask how this would be handle in ANS forth?
 Well, currently there is a word in ext-core set that does most of what
 you want. It is :
 >number ( ud1 addr1 u1 -- ud2 addr2 u2
 where ud1 is a dnumber to "build" upon ( start it at 0 0)
 addr1 is string addr 
 u1 is len
 ud2 is the covert number ( maybe only the convertable part of string)
 addr2 is the addr of 1st non converable or just passed the end of strig
 u2 is the number not converted ( 0 if all coverted)

 : dconvert 0 0 2swap >number 0= if drop true else drop 2drop 0 0 0 then;
-----
This message came from GEnie via willett through a semi-automated process.
Report problems to: uunet!willett!dwp or dwp@willett.pgh.pa.us