about summary refs log tree commit diff stats
diff options
context:
space:
mode:
-rw-r--r--README.md4
-rw-r--r--jonesforth.f2
2 files changed, 4 insertions, 2 deletions
diff --git a/README.md b/README.md
index 4cab30e..2aadeb4 100644
--- a/README.md
+++ b/README.md
@@ -1,4 +1,4 @@
-*JonesForth ARM64 with APL symbols*
+# JonesForth ARM64 with APL symbols
 
 This is an ARMv8 AArch64 version of Richard W.M. Jones' original x86 JonesForth.
 I have added a few things including:
@@ -11,6 +11,7 @@ Also I have used the APL character set.
 
 The pizza is in the examples dir but by way of garlic bread:
 
+```
 ∇ ε ( ⌈⌊ ⊤ - ↑ ∥) ↓ ∇   / Define ε as Euclid's algorithm /          
 
 ∇ λ ◁ , ▷ @ ⍎ ∇         / A defining word λ which names anonymous functions /
@@ -18,6 +19,7 @@ The pizza is in the examples dir but by way of garlic bread:
 3 ⊂ ↑ ⊃ ⊂ + ⊃ cat ⍎     / Double three using the cat combinator /
 
 1 2 3 4 ⊂ × ⟦ + - ⊃ ⟧ ⍎ / Capture '+ -' in a delimited continuation with ⟦ ⟧ /
+```
 
 ASCII equivalents for APL-character words are defined in ascii.f (they are the
 corresponding Forth words where applicable so ascii.f makes a handy glossary).
diff --git a/jonesforth.f b/jonesforth.f
index 91af0d8..0d45f84 100644
--- a/jonesforth.f
+++ b/jonesforth.f
@@ -122,7 +122,7 @@
 
 ∇ .D 13 ∇ ∇ .R 14 ∇ ∇ .I 15 ∇ ∇ .J 16 ∇ / Register numbers for D,R,I,J pointers /
 
-∇ NEXT .J .I 8 ldr post ,, 0 .J 0 ldr ,, D61F0000 ,, ALIGN ∇ / Code for NEXT (hex opcode is for the branch b 0) /
+∇ NEXT .J .I 8 ldr post ,, 0 .J 0 ldr ,, D61F0000 ,, ALIGN ∇ / Code for NEXT (hex opcode is for the branch br x0) /
 
 / Example defining 7+ with the assembler /
 ∆ 7+ 0 .D pop ,, 0 0 7 addi ,, 0 .D push ,, NEXT