math.complex: move malformed-complex and parse-complex to math.complex.
They were incorrectly defined in syntax vocabulary.master
parent
115b7b62df
commit
bc0789ca91
|
@ -33,13 +33,13 @@ M: complex sqrt >polar [ sqrt ] [ 2.0 / ] bi* polar> ; inline
|
|||
|
||||
PRIVATE>
|
||||
|
||||
IN: syntax
|
||||
|
||||
ERROR: malformed-complex obj ;
|
||||
|
||||
: parse-complex ( seq -- complex )
|
||||
dup length 2 = [ first2-unsafe rect> ] [ malformed-complex ] if ;
|
||||
|
||||
IN: syntax
|
||||
|
||||
SYNTAX: C{ \ } [ parse-complex ] parse-literal ;
|
||||
|
||||
USE: prettyprint.custom
|
||||
|
@ -47,3 +47,4 @@ USE: prettyprint.custom
|
|||
M: complex pprint* pprint-object ;
|
||||
M: complex pprint-delims drop \ C{ \ } ;
|
||||
M: complex >pprint-sequence >rect 2array ;
|
||||
|
||||
|
|
Loading…
Reference in New Issue