]> gitweb.factorcode.org Git - factor.git/commitdiff
math.complex: Fix PRIVATE>
authorDoug Coleman <doug.coleman@gmail.com>
Tue, 30 Jun 2015 15:57:20 +0000 (08:57 -0700)
committerDoug Coleman <doug.coleman@gmail.com>
Tue, 30 Jun 2015 15:58:12 +0000 (08:58 -0700)
There's an IN: in the middle of a PRIVATE> and that breaks things.

basis/math/complex/complex.factor

index c73315a8df10c31feb034a90beaa57426acbf6fc..f57523dd02137214f7e72b79b317bb5737c0058a 100644 (file)
@@ -31,6 +31,8 @@ M: complex /i [ /i ] complex/ ; inline
 M: complex abs absq sqrt ; inline
 M: complex sqrt >polar [ sqrt ] [ 2.0 / ] bi* polar> ; inline
 
+PRIVATE>
+
 IN: syntax
 
 ERROR: malformed-complex obj ;
@@ -45,5 +47,3 @@ USE: prettyprint.custom
 M: complex pprint* pprint-object ;
 M: complex pprint-delims drop \ C{ \ } ;
 M: complex >pprint-sequence >rect 2array ;
-
-PRIVATE>