projects
/
rrq
/
jonesforth.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (from parent 1:
508d77c
)
Some doc updates.
author
rich
<rich>
Sat, 8 Sep 2007 22:51:28 +0000
(22:51 +0000)
committer
rich
<rich>
Sat, 8 Sep 2007 22:51:28 +0000
(22:51 +0000)
jonesforth.S
patch
|
blob
|
history
diff --git
a/jonesforth.S
b/jonesforth.S
index 2d2b09a74a807bb8c7d39330b437339394b0bd5d..d86d0ec1673277f298828e70db2d79801808c472 100644
(file)
--- a/
jonesforth.S
+++ b/
jonesforth.S
@@
-1,11
+1,11
@@
/* A sometimes minimal FORTH compiler and tutorial for Linux / i386 systems. -*- asm -*-
By Richard W.M. Jones <rich@annexia.org> http://annexia.org/forth
This is PUBLIC DOMAIN (see public domain release statement below).
/* A sometimes minimal FORTH compiler and tutorial for Linux / i386 systems. -*- asm -*-
By Richard W.M. Jones <rich@annexia.org> http://annexia.org/forth
This is PUBLIC DOMAIN (see public domain release statement below).
- $Id: jonesforth.S,v 1.1
8 2007-09-08 22:23:16
rich Exp $
+ $Id: jonesforth.S,v 1.1
9 2007-09-08 22:51:28
rich Exp $
gcc -m32 -nostdlib -static -Wl,-Ttext,0 -o jonesforth jonesforth.S
*/
gcc -m32 -nostdlib -static -Wl,-Ttext,0 -o jonesforth jonesforth.S
*/
- .set JONES_VERSION,1
8
+ .set JONES_VERSION,1
9
/*
INTRODUCTION ----------------------------------------------------------------------
/*
INTRODUCTION ----------------------------------------------------------------------
@@
-1865,7
+1865,7
@@
interpret_is_lit:
.data
.align 4096
buffer:
.data
.align 4096
buffer:
- // Multi-line constant gives 'Warning: unterminated string; newline inserted' messages which you can ignore
+ // Multi-line constant gives 'Warning: unterminated string; newline inserted' messages which you can ignore
.
.ascii "\
\\ Define some character constants
: '\\n' 10 ;
.ascii "\
\\ Define some character constants
: '\\n' 10 ;
@@
-2026,7
+2026,7
@@
buffer:
\\ that the input buffer where the string comes from may be overwritten by the time we
\\ come round to running the function). We store the string in the compiled function
\\ like this:
\\ that the input buffer where the string comes from may be overwritten by the time we
\\ come round to running the function). We store the string in the compiled function
\\ like this:
-\\ LITSTRING, string length, string rounded up to 4 bytes, EMITSTRING, ...
+\\
...,
LITSTRING, string length, string rounded up to 4 bytes, EMITSTRING, ...
: .\" IMMEDIATE
STATE @ \\ compiling?
IF
: .\" IMMEDIATE
STATE @ \\ compiling?
IF