steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

math.complex: move malformed-complex and parse-complex to math.complex. 

They were incorrectly defined in syntax vocabulary.
master
John Benediktsson 2020-09-15 13:24:17 -07:00
parent 115b7b62df
commit bc0789ca91
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
basis/math/complex/complex.factor
View File

@ -33,13 +33,13 @@ M: complex sqrt >polar [ sqrt ] [ 2.0 / ] bi* polar> ; inline
PRIVATE> PRIVATE>
IN: syntax
ERROR: malformed-complex obj ; ERROR: malformed-complex obj ;
: parse-complex ( seq -- complex ) : parse-complex ( seq -- complex )
dup length 2 = [ first2-unsafe rect> ] [ malformed-complex ] if ; dup length 2 = [ first2-unsafe rect> ] [ malformed-complex ] if ;
IN: syntax
SYNTAX: C{ \ } [ parse-complex ] parse-literal ; SYNTAX: C{ \ } [ parse-complex ] parse-literal ;
USE: prettyprint.custom USE: prettyprint.custom
@ -47,3 +47,4 @@ USE: prettyprint.custom
M: complex pprint* pprint-object ; M: complex pprint* pprint-object ;
M: complex pprint-delims drop \ C{ \ } ; M: complex pprint-delims drop \ C{ \ } ;
M: complex >pprint-sequence >rect 2array ; M: complex >pprint-sequence >rect 2array ;