aboutsummaryrefslogtreecommitdiff
path: root/tests/lhs-test.html
diff options
context:
space:
mode:
authorfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2009-07-03 03:05:29 +0000
committerfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2009-07-03 03:05:29 +0000
commit7e8ea0ae74bcb56b3b91cc461fb7bd38468fe31b (patch)
treeeda3b6f687ca4a4adfdf34e6642537d775debe4e /tests/lhs-test.html
parentc177c7095938e8db29044c0f8194e53c6a2be61f (diff)
downloadpandoc-7e8ea0ae74bcb56b3b91cc461fb7bd38468fe31b.tar.gz
Fixed lhs test cases.
+ Changed Setup.hs in accord with change in '--version' output. + Changed lhs test cases in accord with change in the way HTML headers are written (they are now put in divs, and the id is put on the div rather than the header itself). git-svn-id: https://pandoc.googlecode.com/svn/trunk@1588 788f1e2b-df1e-0410-8736-df70ead52e1b
Diffstat (limited to 'tests/lhs-test.html')
-rw-r--r--tests/lhs-test.html84
1 files changed, 43 insertions, 41 deletions
diff --git a/tests/lhs-test.html b/tests/lhs-test.html
index 2aa29edb2..5ab1ee102 100644
--- a/tests/lhs-test.html
+++ b/tests/lhs-test.html
@@ -29,48 +29,50 @@ pre.sourceCode span.Error { color: red; font-weight: bold; }
</style
></head
><body
- ><h1 id="lhs-test"
- >lhs test</h1
- ><p
- ><code
- >unsplit</code
- > is an arrow that takes a pair of values and combines them to return a single value:</p
- ><pre class="sourceCode haskell"
- ><code
- ><span class="Function FunctionDefinition"
- >unsplit ::</span
- ><span class="Normal NormalText"
- > (Arrow a) =&gt; (b -&gt; c -&gt; d) -&gt; a (b, c) d</span
- ><br
- /><span class="Normal NormalText"
- >unsplit = arr . </span
- ><span class="Function"
- >uncurry</span
- ><span class="Normal NormalText"
- > </span
- ><br
- /><span class="Normal NormalText"
- > </span
- ><span class="Comment"
- >-- arr (\op (x,y) -&gt; x `op` y) </span
- ><br
- /></code
- ></pre
- ><p
- ><code
- >(***)</code
- > 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).</p
- ><pre
- ><code
- >f *** g = first f &gt;&gt;&gt; second g
+ ><div id="lhs-test"
+ ><h1
+ >lhs test</h1
+ ><p
+ ><code
+ >unsplit</code
+ > is an arrow that takes a pair of values and combines them to return a single value:</p
+ ><pre class="sourceCode haskell"
+ ><code
+ ><span class="Function FunctionDefinition"
+ >unsplit ::</span
+ ><span class="Normal NormalText"
+ > (Arrow a) =&gt; (b -&gt; c -&gt; d) -&gt; a (b, c) d</span
+ ><br
+ /><span class="Normal NormalText"
+ >unsplit = arr . </span
+ ><span class="Function"
+ >uncurry</span
+ ><span class="Normal NormalText"
+ > </span
+ ><br
+ /><span class="Normal NormalText"
+ > </span
+ ><span class="Comment"
+ >-- arr (\op (x,y) -&gt; x `op` y) </span
+ ><br
+ /></code
+ ></pre
+ ><p
+ ><code
+ >(***)</code
+ > 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).</p
+ ><pre
+ ><code
+ >f *** g = first f &gt;&gt;&gt; second g
</code
- ></pre
- ><p
- >Block quote:</p
- ><blockquote
- ><p
- >foo bar</p
- ></blockquote
+ ></pre
+ ><p
+ >Block quote:</p
+ ><blockquote
+ ><p
+ >foo bar</p
+ ></blockquote
+ ></div
></body
></html
>