| version 1.3, Tue Dec 8 22:03:13 1998 UTC | version 1.4, Mon May 17 15:07:05 1999 UTC | ||
|---|---|---|---|
|
|
||
| \ along with this program; if not, write to the Free Software | \ along with this program; if not, write to the Free Software | ||
| \ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. | \ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. | ||
| require ./io.fs | |||
| : accept ( adr len -- len ) | : accept ( adr len -- len ) | ||
| over + over ( start end pnt ) | over + over ( start end pnt ) | ||
| BEGIN | BEGIN |
|
||||||||
|
CVS Admin Powered by ViewCVS 1.0-dev |
ViewCVS and CVS Help |