Path: utzoo!attcan!uunet!willett!ForthNet
From: ForthNet@willett.UUCP (ForthNet articles from GEnie)
Newsgroups: comp.lang.forth
Subject: HS/Forth
Message-ID: <702.UUL1.3#5129@willett.UUCP>
Date: 24 Mar 90 00:43:10 GMT
Organization: Latest link in the ForthNet chain.  (Pgh, PA)
Lines: 61


 Date: 03-23-90 (00:02)              Number: 59 (Echo)
   To: BILL MCCARTHY                 Refer#: 54
 From: BILL MCCARTHY                   Read: NO
 Subj: NEW RELEASE OF HS/FORTH       Status: PUBLIC MESSAGE

 Dear Mr. Noble,

 >> If Turbo Pascal and Turbo C can really come that close ...

 Well, Julian, here's a cleaned up screen dump of my Pascal code
 from the Turbo Debugger:

 PASTEST.56:  for i:=1 to 25000 do
   cs:00CB C70666000100   mov    word ptr [0066],0001
   cs:00D1 EB04           jmp    PASTEST.57 (00D7)
   cs:00D3 FF066600       inc    word ptr [0066]
                                         PASTEST.57:  a := (b+c) / (d+e);
   cs:00D7 CD372E0200     fld    tbyte ptr[0002]
   cs:00DC CD372E0C00     fld    tbyte ptr[000C]
   cs:00E1 CD3AC1         faddp  st(1),st
   cs:00E4 CD372E1600     fld    tbyte ptr[0016]
   cs:00E9 CD372E2000     fld    tbyte ptr[0020]
   cs:00EE CD3AC1         faddp  st(1),st
   cs:00F1 CD3AF9         fdivp  st(1),st
   cs:00F4 CD373E6800     fstp   tbyte ptr[0068]
   cs:00F9 CD3D           fwait
   cs:00FB 813E6600A861   cmp    word ptr [0066],61A8
   cs:0101 75D0           jne    00D3

 As you can see, it really does perform the loop 25,000 times
 and, except for the looping method (which would be much
 faster using the CX register), is very clean code.  Turbo C
 also executed the full workload.

 >> If you want to program in FORTRAN, get a FORTRAN compiler.

 I don't want to program in FORTRAN!  What I'd like to have is
 a capability to have an algebraic parsing capability.  I read
 the text of your upload and understood it to be pedagogical in
 nature rather than a blazing number cruncher.  However, I did
 expect the commercial product from Harvard Softworks to be on
 more of a par with the FLOATING package (yes, even with the
 hardware limit).

 I've been converting one of my old PL/I algebraic parsers to
 HS/Forth.  It won't be anywhere as flexible as your FORTE but
 it will give me the performance I'm seeking (since I don't
 need imaginary numbers and will support only temporary real,
 there is no need for a "smart" stack).

 BTW, the 387 manual from Intel seems to suggest that it has
 all the hooks for an extended virtual hardware stack.  Since
 I haven't heard of anyone implementing such an interrupt
 handler, I'm skeptical.

 Looking forward to your upgrades,
 Bill McCarthy
-----
This message came from GEnie via willett through a semi-automated process.
Report problems to: 'uunet!willett!dwp' or 'willett!dwp@gateway.sei.cmu.edu'