# HG changeset patch
# User Richard Westhaver <ellis@rwest.io>
# Date 1720150657 14400
# Node ID f23bffbe2f4caf8aa3630ce2c20f39674e5f5e6a
# Parent  82bb06cbf137ef7f15aa0eaafdd2b23531bbdb9a
updates

diff -r 82bb06cbf137 -r f23bffbe2f4c draft/a-bit-of-risc.org
--- a/draft/a-bit-of-risc.org	Sat Jun 22 23:54:39 2024 -0400
+++ b/draft/a-bit-of-risc.org	Thu Jul 04 23:37:37 2024 -0400
@@ -129,7 +129,9 @@
   ;; (in-package :sb-x86-64-asm)
   ;; (in-readtable :std)
   (declaim (optimize (speed 3) (safety 1)))
-  (defconstant +word-size+ 32 "default word size and register length.")
+
+  (eval-always
+    (defconstant +word-size+ 32 "default word size and register length."))
 #+end_src
 
 #+name: vars