diff options
Diffstat (limited to 'stdlib/source/lux/data/number/complex.lux')
-rw-r--r-- | stdlib/source/lux/data/number/complex.lux | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/stdlib/source/lux/data/number/complex.lux b/stdlib/source/lux/data/number/complex.lux index 5f002e9df..94276e5f8 100644 --- a/stdlib/source/lux/data/number/complex.lux +++ b/stdlib/source/lux/data/number/complex.lux @@ -8,7 +8,7 @@ (data [number "r/" Number<Real> Codec<Text,Real>] [text "Text/" Monoid<Text>] text/format - error + ["R" result] maybe (coll [list "List/" Monad<List>])) [macro] @@ -322,7 +322,7 @@ (#;Left (Text/append "Wrong syntax for complex numbers: " input)) (#;Some [r' i']) - (do Monad<Error> + (do R;Monad<Result> [r (r/decode (text;trim r')) i (r/decode (text;trim i'))] (wrap {#real r |