diff options
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/lhs-test.fragment.html+lhs | 18 | ||||
| -rw-r--r-- | tests/lhs-test.html | 16 | ||||
| -rw-r--r-- | tests/lhs-test.html+lhs | 16 | ||||
| -rw-r--r-- | tests/lhs-test.latex | 10 | ||||
| -rw-r--r-- | tests/lhs-test.latex+lhs | 10 | ||||
| -rw-r--r-- | tests/lhs-test.markdown+lhs | 11 | ||||
| -rw-r--r-- | tests/lhs-test.rst | 11 | ||||
| -rw-r--r-- | tests/lhs-test.rst+lhs | 11 |
8 files changed, 69 insertions, 34 deletions
diff --git a/tests/lhs-test.fragment.html+lhs b/tests/lhs-test.fragment.html+lhs index 74180d5c1..64a235936 100644 --- a/tests/lhs-test.fragment.html+lhs +++ b/tests/lhs-test.fragment.html+lhs @@ -6,9 +6,21 @@ > is an arrow that takes a pair of values and combines them to return a single value:</p ><pre class="sourceCode haskell" ><code - >> unsplit :: (<span class="dt" + >> <span class="ot" + >unsplit </span + ><span class="ot" + >::</span + > (<span class="dt" >Arrow</span - > a) => (b -> c -> d) -> a (b, c) d<br + > a) <span class="ot" + >=></span + > (b <span class="ot" + >-></span + > c <span class="ot" + >-></span + > d) <span class="ot" + >-></span + > a (b, c) d<br />> unsplit <span class="fu" >=</span > arr <span class="fu" @@ -36,4 +48,4 @@ ><p >foo bar</p ></blockquote ->
\ No newline at end of file +> diff --git a/tests/lhs-test.html b/tests/lhs-test.html index 1cfcb199a..5a0f27af7 100644 --- a/tests/lhs-test.html +++ b/tests/lhs-test.html @@ -33,9 +33,21 @@ pre.sourceCode span.er { color: red; font-weight: bold; } > is an arrow that takes a pair of values and combines them to return a single value:</p ><pre class="sourceCode haskell" ><code - >unsplit :: (<span class="dt" + ><span class="ot" + >unsplit </span + ><span class="ot" + >::</span + > (<span class="dt" >Arrow</span - > a) => (b -> c -> d) -> a (b, c) d<br + > a) <span class="ot" + >=></span + > (b <span class="ot" + >-></span + > c <span class="ot" + >-></span + > d) <span class="ot" + >-></span + > a (b, c) d<br />unsplit <span class="fu" >=</span > arr <span class="fu" diff --git a/tests/lhs-test.html+lhs b/tests/lhs-test.html+lhs index a33bf83ce..d5a7b8196 100644 --- a/tests/lhs-test.html+lhs +++ b/tests/lhs-test.html+lhs @@ -33,9 +33,21 @@ pre.sourceCode span.er { color: red; font-weight: bold; } > is an arrow that takes a pair of values and combines them to return a single value:</p ><pre class="sourceCode haskell" ><code - >> unsplit :: (<span class="dt" + >> <span class="ot" + >unsplit </span + ><span class="ot" + >::</span + > (<span class="dt" >Arrow</span - > a) => (b -> c -> d) -> a (b, c) d<br + > a) <span class="ot" + >=></span + > (b <span class="ot" + >-></span + > c <span class="ot" + >-></span + > d) <span class="ot" + >-></span + > a (b, c) d<br />> unsplit <span class="fu" >=</span > arr <span class="fu" diff --git a/tests/lhs-test.latex b/tests/lhs-test.latex index 5603b391e..d34c21090 100644 --- a/tests/lhs-test.latex +++ b/tests/lhs-test.latex @@ -12,17 +12,17 @@ \section{lhs test} -\verb!unsplit! is an arrow that takes a pair of values and combines -them to return a single value: +\verb!unsplit! is an arrow that takes a pair of values and combines them to +return a single value: \begin{verbatim} unsplit :: (Arrow a) => (b -> c -> d) -> a (b, c) d unsplit = arr . uncurry -- arr (\op (x,y) -> x `op` y) \end{verbatim} -\verb!(***)! 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). +\verb!(***)! 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). \begin{verbatim} f *** g = first f >>> second g diff --git a/tests/lhs-test.latex+lhs b/tests/lhs-test.latex+lhs index 7ccdbb699..29237f820 100644 --- a/tests/lhs-test.latex+lhs +++ b/tests/lhs-test.latex+lhs @@ -14,17 +14,17 @@ \section{lhs test} -\verb!unsplit! is an arrow that takes a pair of values and combines -them to return a single value: +\verb!unsplit! is an arrow that takes a pair of values and combines them to +return a single value: \begin{code} unsplit :: (Arrow a) => (b -> c -> d) -> a (b, c) d unsplit = arr . uncurry -- arr (\op (x,y) -> x `op` y) \end{code} -\verb!(***)! 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). +\verb!(***)! 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). \begin{verbatim} f *** g = first f >>> second g diff --git a/tests/lhs-test.markdown+lhs b/tests/lhs-test.markdown+lhs index 187fa630f..7c691217e 100644 --- a/tests/lhs-test.markdown+lhs +++ b/tests/lhs-test.markdown+lhs @@ -1,19 +1,20 @@ lhs test ======== -`unsplit` is an arrow that takes a pair of values and combines them -to return a single value: +`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) -`(***)` 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). +`(***)` 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). f *** g = first f >>> second g Block quote: > foo bar + diff --git a/tests/lhs-test.rst b/tests/lhs-test.rst index 67f7b3984..37ad099af 100644 --- a/tests/lhs-test.rst +++ b/tests/lhs-test.rst @@ -1,8 +1,8 @@ lhs test ======== -``unsplit`` is an arrow that takes a pair of values and combines -them to return a single value: +``unsplit`` is an arrow that takes a pair of values and combines them to +return a single value: :: @@ -10,9 +10,9 @@ them to return a single value: 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). +``(***)`` 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). :: @@ -21,4 +21,3 @@ and one arrow on the second item of the pair). Block quote: foo bar - diff --git a/tests/lhs-test.rst+lhs b/tests/lhs-test.rst+lhs index 22d54e85e..6b6ffb860 100644 --- a/tests/lhs-test.rst+lhs +++ b/tests/lhs-test.rst+lhs @@ -1,16 +1,16 @@ lhs test ======== -``unsplit`` is an arrow that takes a pair of values and combines -them to return a single value: +``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) -``(***)`` 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). +``(***)`` 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). :: @@ -19,4 +19,3 @@ and one arrow on the second item of the pair). Block quote: foo bar - |