GH-5 Fix Life-1D read one past end of buffer.

SirWumpus · Jul 28, 2024 · 2a805bc · 2a805bc
1 parent 9e30415
commit 2a805bc
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/examples/life1d.p4 b/examples/life1d.p4
@@ -2,6 +2,9 @@
 \
 \ https://en.wikipedia.org/wiki/Cellular_automaton
 \
+\ Scientific America, Computer Recreations, May 1985, pg. 18-30
+\ Glider Gun Guidelines, Stephen Wolfram, March 1985
+\
 
 MARKER rm_life1d
 
@@ -47,7 +50,7 @@ CHAR . CONSTANT off
 ;
 
 : life1d_transition ( -- )
-	life1d_size 1 DO
+	life1d_size 1- 0 DO
 		I life1d_curr_state		\ value
 		I life1d_next_state		\ --
 	LOOP