From 91c0619657bcf2ac520e7dd2912188f66bbe2157 Mon Sep 17 00:00:00 2001 From: Eduardo Julian Date: Tue, 2 Jul 2019 23:36:02 -0400 Subject: Re-name "lux/data/error" to "lux/control/try". --- stdlib/source/spec/compositor/generation/reference.lux | 13 ++++++------- 1 file changed, 6 insertions(+), 7 deletions(-) (limited to 'stdlib/source/spec/compositor/generation/reference.lux') diff --git a/stdlib/source/spec/compositor/generation/reference.lux b/stdlib/source/spec/compositor/generation/reference.lux index 066b604dc..eb5e3bf92 100644 --- a/stdlib/source/spec/compositor/generation/reference.lux +++ b/stdlib/source/spec/compositor/generation/reference.lux @@ -4,9 +4,8 @@ [abstract [monad (#+ do)]] [control - [pipe (#+ case>)]] - [data - ["." error]] + [pipe (#+ case>)] + ["." try]] [tool [compiler ["." reference] @@ -28,10 +27,10 @@ expected r.safe-frac] (_.test "Definitions." (|> (define name (synthesis.f64 expected)) - (case> (#error.Success actual) + (case> (#try.Success actual) (f/= expected (:coerce Frac actual)) - (#error.Failure error) + (#try.Failure _) false))))) (def: (variable run) @@ -44,10 +43,10 @@ register (synthesis.variable/local register)]) (run "variable") - (case> (#error.Success actual) + (case> (#try.Success actual) (f/= expected (:coerce Frac actual)) - (#error.Failure error) + (#try.Failure _) false))))) (def: #export (spec runner definer) -- cgit v1.2.3