Updating code to use CONSTANT: instead of : foo 123 ; inline

[factor.git] / extra / nehe / 4 / 4.factor

diff --git a/extra/nehe/4/4.factor b/extra/nehe/4/4.factor
index fda22d2f1e3c610068578f421821cef0ebd961f7..00308277ea8c6cb933ca90ba03e01f4ff4d84847 100644 (file)
--- a/extra/nehe/4/4.factor
+++ b/extra/nehe/4/4.factor
@@ -5,8 +5,8 @@ IN: nehe.4
 
 TUPLE: nehe4-gadget < gadget rtri rquad thread quit? ;
 
-: width 256 ;
-: height 256 ;
+CONSTANT: width 256
+CONSTANT: height 256
 : redraw-interval ( -- dt ) 10 milliseconds ;
 
 : <nehe4-gadget> (  -- gadget )