; FORTH.ASM
; A Forth Interpreter for RETRO-NG
;-------------------------------------------------------------------
var '>in', tin, 0
var 'tp', tp, tib
var 'h', h, h0
var 'd', d, d0
var 'base', base, 10
var 'source', source, 0

section .text
	
%include "forth/parser"     ; ( Forth Parser and Special Functions )
%include "forth/compiler"   ; ( Minimal Compiler )
%include "forth/primitives" ; ( Primitives )
%include "forth/table"

SECTION .data
  flast dd forth_link
  mlast dd macro_link
  last dd flast
section .text
