X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=jonesforth.f;h=58599e695e2c9d29769c7dd4e23504816fd3da63;hb=cea392870a443a3d773d18d1627fa94712387cf5;hp=82642f1d0ed874154a5869c5fe8afe5599c4371f;hpb=ac014bc0a927ca7ab4177636056fd267384a8f47;p=jonesforth.git diff --git a/jonesforth.f b/jonesforth.f index 82642f1..58599e6 100644 --- a/jonesforth.f +++ b/jonesforth.f @@ -2,7 +2,7 @@ \ A sometimes minimal FORTH compiler and tutorial for Linux / i386 systems. -*- asm -*- \ By Richard W.M. Jones http://annexia.org/forth \ This is PUBLIC DOMAIN (see public domain release statement below). -\ $Id: jonesforth.f,v 1.15 2007-10-11 07:39:51 rich Exp $ +\ $Id: jonesforth.f,v 1.16 2007-10-12 01:46:12 rich Exp $ \ \ The first part of this tutorial is in jonesforth.S. Get if from http://annexia.org/forth \ @@ -822,6 +822,10 @@ Notice that the parameters to DUMP (address, length) are compatible with string words such as WORD and S". + + You can dump out the raw code for the last word you defined by doing something like: + + LATEST @ 128 DUMP ) : DUMP ( addr len -- ) BASE @ ROT ( save the current BASE at the bottom of the stack )