Forth like interpreter

[Samuel A. Falvo II]

In article
<425A5D00B0F916D1.7920112131B1A88A.D3428C8A56515B00 at lp.airnews.net>, Tres
Seaver wrote:

>Forth was the first "brain-bender" language I learned, and the one which
>caused me to learn assembler.  I still credit Forth with making me Lisp-
>impaired, via a kind of hysteresis.

Odd.  Forth is precisely what enabled me to learn Lisp.  Forth is a reverse
Lisp of sorts:

(defun cmpint (x y)
  (cond ((< x y) -1)
        ((= x y) 0)
	(T 1)))

: cmpint ( x y -- f )
  2DUP < IF
    2DROP -1
  ELSE
    = IF
      0
    ELSE
      1
    THEN
  THEN ;

-- 
KC5TJA/6, DM13, QRP-L #1447
Samuel A. Falvo II
Oceanside, CA