From 3c07b1d9b64d0da0da32d87abe29a2db27d894fa Mon Sep 17 00:00:00 2001 From: Albert Krewinkel Date: Mon, 31 Aug 2020 21:22:03 +0200 Subject: Fix tests for skylighting 0.10 --- test/lhs-test.html+lhs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'test/lhs-test.html+lhs') diff --git a/test/lhs-test.html+lhs b/test/lhs-test.html+lhs index b55556ef3..980fd83b8 100644 --- a/test/lhs-test.html+lhs +++ b/test/lhs-test.html+lhs @@ -84,9 +84,9 @@

lhs test

unsplit is an arrow that takes a pair of values and combines them to return a single value:

-
> unsplit :: (Arrow a) => (b -> c -> d) -> a (b, c) d
-> unsplit = arr . uncurry
->           -- arr (\op (x,y) -> x `op` y)
+
> unsplit :: (Arrow a) => (b -> c -> d) -> a (b, c) d
+> unsplit = arr . uncurry
+>           -- arr (\op (x,y) -> x `op` y)

(***) combines two arrows into a new arrow by running the two arrows on a pair of values (one arrow on the first item of the pair and one arrow on the second item of the pair).

-- cgit v1.2.3