trick math.vectors.simd into making nicer quotations

2009-11-25 20:24:09 -08:00 · 2009-11-25 20:24:09 -08:00 · 7da80f65e7
parent 4027002db7
commit 7da80f65e7
1 changed files with 2 additions and 2 deletions
--- a/basis/math/vectors/simd/simd.factor
+++ b/basis/math/vectors/simd/simd.factor
@ -234,8 +234,8 @@ SYNTAX: A{ \ } [ >A ] parse-literal ;
 c:<c-type>
    byte-array >>class
    A >>boxed-class
-    [ A-rep alien-vector A boa ] >>getter
-    [ [ underlying>> ] 2dip A-rep set-alien-vector ] >>setter
+    { A-rep alien-vector A boa } >quotation >>getter
+    { [ underlying>> ] 2dip A-rep set-alien-vector } >quotation >>setter
    16 >>size
    16 >>align
    A-rep >>rep