git.iko.soy/typeable/pandoc
on master help sign in
LHS test changes for new wrapping & highlighting-kate version.
commit71bedab81c012be50c6605ed0dbf4ef936cde05e authorJohn MacFarlane <jgm@berkeley.edu> dateThu 6 Jan 2011, 21:04 (16 years ago) parentc4c3364
8 files changed+69−34
tests/lhs-test.fragment.html+lhs+15−3 tests/lhs-test.html+14−2 tests/lhs-test.html+lhs+14−2 tests/lhs-test.latex+5−5 tests/lhs-test.latex+lhs+5−5 tests/lhs-test.markdown+lhs+6−5 tests/lhs-test.rst+5−6 tests/lhs-test.rst+lhs+5−6
tests/lhs-test.fragment.html+lhs+15−3
@@ -6,9 +6,21 @@
66 > is an arrow that takes a pair of values and combines them to return a single value:</p
77><pre class="sourceCode haskell"
88><code
9− >&gt; unsplit :: (<span class="dt"
9+ >&gt; <span class="ot"
10+ >unsplit </span
11+ ><span class="ot"
12+ >::</span
13+ > (<span class="dt"
1014 >Arrow</span
11− > a) =&gt; (b -&gt; c -&gt; d) -&gt; a (b, c) d<br
15+ > a) <span class="ot"
16+ >=&gt;</span
17+ > (b <span class="ot"
18+ >-&gt;</span
19+ > c <span class="ot"
20+ >-&gt;</span
21+ > d) <span class="ot"
22+ >-&gt;</span
23+ > a (b, c) d<br
1224 />&gt; unsplit <span class="fu"
1325 >=</span
1426 > arr <span class="fu"
@@ -36,4 +48,4 @@
3648><p
3749 >foo bar</p
3850 ></blockquote
39−>
51+>
tests/lhs-test.html+14−2
@@ -33,9 +33,21 @@ pre.sourceCode span.er { color: red; font-weight: bold; }
3333 > is an arrow that takes a pair of values and combines them to return a single value:</p
3434><pre class="sourceCode haskell"
3535><code
36− >unsplit :: (<span class="dt"
36+ ><span class="ot"
37+ >unsplit </span
38+ ><span class="ot"
39+ >::</span
40+ > (<span class="dt"
3741 >Arrow</span
38− > a) =&gt; (b -&gt; c -&gt; d) -&gt; a (b, c) d<br
42+ > a) <span class="ot"
43+ >=&gt;</span
44+ > (b <span class="ot"
45+ >-&gt;</span
46+ > c <span class="ot"
47+ >-&gt;</span
48+ > d) <span class="ot"
49+ >-&gt;</span
50+ > a (b, c) d<br
3951 />unsplit <span class="fu"
4052 >=</span
4153 > arr <span class="fu"
tests/lhs-test.html+lhs+14−2
@@ -33,9 +33,21 @@ pre.sourceCode span.er { color: red; font-weight: bold; }
3333 > is an arrow that takes a pair of values and combines them to return a single value:</p
3434><pre class="sourceCode haskell"
3535><code
36− >&gt; unsplit :: (<span class="dt"
36+ >&gt; <span class="ot"
37+ >unsplit </span
38+ ><span class="ot"
39+ >::</span
40+ > (<span class="dt"
3741 >Arrow</span
38− > a) =&gt; (b -&gt; c -&gt; d) -&gt; a (b, c) d<br
42+ > a) <span class="ot"
43+ >=&gt;</span
44+ > (b <span class="ot"
45+ >-&gt;</span
46+ > c <span class="ot"
47+ >-&gt;</span
48+ > d) <span class="ot"
49+ >-&gt;</span
50+ > a (b, c) d<br
3951 />&gt; unsplit <span class="fu"
4052 >=</span
4153 > arr <span class="fu"
tests/lhs-test.latex+5−5
@@ -12,17 +12,17 @@
1212
1313\section{lhs test}
1414
15−\verb!unsplit! is an arrow that takes a pair of values and combines
16−them to return a single value:
15+\verb!unsplit! is an arrow that takes a pair of values and combines them to
16+return a single value:
1717
1818\begin{verbatim}
1919unsplit :: (Arrow a) => (b -> c -> d) -> a (b, c) d
2020unsplit = arr . uncurry
2121 -- arr (\op (x,y) -> x `op` y)
2222\end{verbatim}
23−\verb!(***)! combines two arrows into a new arrow by running the
24−two arrows on a pair of values (one arrow on the first item of the
25−pair and one arrow on the second item of the pair).
23+\verb!(***)! combines two arrows into a new arrow by running the two arrows on
24+a pair of values (one arrow on the first item of the pair and one arrow on the
25+second item of the pair).
2626
2727\begin{verbatim}
2828f *** g = first f >>> second g
tests/lhs-test.latex+lhs+5−5
@@ -14,17 +14,17 @@
1414
1515\section{lhs test}
1616
17−\verb!unsplit! is an arrow that takes a pair of values and combines
18−them to return a single value:
17+\verb!unsplit! is an arrow that takes a pair of values and combines them to
18+return a single value:
1919
2020\begin{code}
2121unsplit :: (Arrow a) => (b -> c -> d) -> a (b, c) d
2222unsplit = arr . uncurry
2323 -- arr (\op (x,y) -> x `op` y)
2424\end{code}
25−\verb!(***)! combines two arrows into a new arrow by running the
26−two arrows on a pair of values (one arrow on the first item of the
27−pair and one arrow on the second item of the pair).
25+\verb!(***)! combines two arrows into a new arrow by running the two arrows on
26+a pair of values (one arrow on the first item of the pair and one arrow on the
27+second item of the pair).
2828
2929\begin{verbatim}
3030f *** g = first f >>> second g
tests/lhs-test.markdown+lhs+6−5
@@ -1,19 +1,20 @@
11lhs test
22========
33
4−`unsplit` is an arrow that takes a pair of values and combines them
5−to return a single value:
4+`unsplit` is an arrow that takes a pair of values and combines them to return
5+a single value:
66
77> unsplit :: (Arrow a) => (b -> c -> d) -> a (b, c) d
88> unsplit = arr . uncurry
99> -- arr (\op (x,y) -> x `op` y)
1010
11−`(***)` combines two arrows into a new arrow by running the two
12−arrows on a pair of values (one arrow on the first item of the pair
13−and one arrow on the second item of the pair).
11+`(***)` combines two arrows into a new arrow by running the two arrows on a
12+pair of values (one arrow on the first item of the pair and one arrow on the
13+second item of the pair).
1414
1515 f *** g = first f >>> second g
1616
1717Block quote:
1818
1919 > foo bar
20+
tests/lhs-test.rst+5−6
@@ -1,8 +1,8 @@
11lhs test
22========
33
4−``unsplit`` is an arrow that takes a pair of values and combines
5−them to return a single value:
4+``unsplit`` is an arrow that takes a pair of values and combines them to
5+return a single value:
66
77::
88
@@ -10,9 +10,9 @@ them to return a single value:
1010 unsplit = arr . uncurry
1111 -- arr (\op (x,y) -> x `op` y)
1212
13−``(***)`` combines two arrows into a new arrow by running the two
14−arrows on a pair of values (one arrow on the first item of the pair
15−and one arrow on the second item of the pair).
13+``(***)`` combines two arrows into a new arrow by running the two arrows on a
14+pair of values (one arrow on the first item of the pair and one arrow on the
15+second item of the pair).
1616
1717::
1818
@@ -21,4 +21,3 @@ and one arrow on the second item of the pair).
2121Block quote:
2222
2323 foo bar
24−
tests/lhs-test.rst+lhs+5−6
@@ -1,16 +1,16 @@
11lhs test
22========
33
4−``unsplit`` is an arrow that takes a pair of values and combines
5−them to return a single value:
4+``unsplit`` is an arrow that takes a pair of values and combines them to
5+return a single value:
66
77> unsplit :: (Arrow a) => (b -> c -> d) -> a (b, c) d
88> unsplit = arr . uncurry
99> -- arr (\op (x,y) -> x `op` y)
1010
11−``(***)`` combines two arrows into a new arrow by running the two
12−arrows on a pair of values (one arrow on the first item of the pair
13−and one arrow on the second item of the pair).
11+``(***)`` combines two arrows into a new arrow by running the two arrows on a
12+pair of values (one arrow on the first item of the pair and one arrow on the
13+second item of the pair).
1414
1515::
1616
@@ -19,4 +19,3 @@ and one arrow on the second item of the pair).
1919Block quote:
2020
2121 foo bar
22−