Path: utzoo!attcan!uunet!lll-winken!ames!mailrus!wasatch!thomson
From: thomson@wasatch.UUCP (Rich Thomson)
Newsgroups: comp.lang.forth
Subject: Re: Public domain FORTH for VAX VMS or UNIX
Message-ID: <940@wasatch.UUCP>
Date: 20 Jan 89 07:29:35 GMT
References: <8901181831.AA09275@jade.berkeley.edu>
Reply-To: thomson@wasatch.utah.edu.UUCP (Rich Thomson)
Organization: Oasis Technologies
Lines: 34

In article <8901181831.AA09275@jade.berkeley.edu> Forth Interest Group
    International List <FIGI-L%SCFVM.bitnet@jade.berkeley.edu> writes:
>Does any one know of a public domain FORTH for VAX VMS or UNIX?

I have a vax assembly language FORTH (it's not very advanced, but it is a
good starting point and its free).  If you want a copy of it, send me
e-mail at one of the addresses listed below.  I've included the beginning
of the source file to give you an idea of what it's like.

						-- Rich
#
# Vforth--a 32 bit forth system using subroutine threading for
#	increased speed.
#
#	By Andy Valencia, 1984
#
# Registers with fixed uses:
#	PC - Since we're using direct threading, this operates as the actual
#		execution vector for each instruction.
#	SP - Maintains the return stack
#	R11 - The operand stack
#	R10 - Next open byte in the dictionary--"HERE"
#	R9  - Index into current input line
#	R8  - Points to last entry in the dictionary chain
#
# Assemble and load with :
#	as -o forth.o forth.vax
#	ld -N -o forth forth.o

-- 
Rich Thomson	thomson@cs.utah.edu  {bellcore,hplabs}!utah-cs!thomson
"Tyranny, like hell, is not easily conquered; yet we have this consolation with
us, that the harder the conflict, the more glorious the triumph. What we obtain
too cheap, we esteem too lightly." Thomas Paine, _The Crisis_, Dec. 23rd, 1776