diff options
Diffstat (limited to '')
| -rw-r--r-- | stdlib/source/spec/compositor/analysis/type.lux | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/stdlib/source/spec/compositor/analysis/type.lux b/stdlib/source/spec/compositor/analysis/type.lux index a6105bbde..b2daee77a 100644 --- a/stdlib/source/spec/compositor/analysis/type.lux +++ b/stdlib/source/spec/compositor/analysis/type.lux @@ -6,9 +6,9 @@ [monad (#+ do)]] [control [pipe (#+ case>)] - ["." io]] + ["." io] + ["." try]] [data - ["." error] ["." bit ("#@." equivalence)] ["." text ("#@." equivalence)]] [math @@ -30,10 +30,10 @@ (analysis/type.with-type output-type (analysis.phase expander (` ((~ (code.text extension)) (~+ params)))))) (phase.run state) - (case> (#error.Success _) + (case> (#try.Success _) true - (#error.Failure error) + (#try.Failure _) false))) (def: check |