Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Path: utzoo!watmath!clyde!burl!mgnetp!ihnp4!zehntel!hplabs!sri-unix!BEC.SHAPIN@USC-ECL.ARPA
From: BEC.SHAPIN@USC-ECL.ARPA
Newsgroups: net.micro.pc
Subject: Catspaw and Other SNOBOLs
Message-ID: <12585@sri-arpa.UUCP>
Date: Fri, 17-Aug-84 13:21:54 EDT
Article-I.D.: sri-arpa.12585
Posted: Fri Aug 17 13:21:54 1984
Date-Received: Mon, 20-Aug-84 01:46:05 EDT
Lines: 19

From:  Ted Shapin 

After sending my question on the other SNOBOLs I found the references
in earlier INFO-IBMPC issues.

Here is the timing on Catspaw SNOBOL4+ for

LP I = I + 1
   LE(I,10000)  :s(LP)

Catspaw SNOBOL4+    74 seconds
Minnesota          144
Spitbol              7   (from earlier message)

By the way in FORTH-83 (available from Silicon Valley Computer Society 
on disks 70 and 71) the time is 1 second for  :test 10000 0 do 1 + loop ;

Ted.
-------