git.iko.soy/typeable/pandoc
on master help sign in
Fixed tests for new skylighting.
commit58eb78c437a411ee796e2c90d7c4681fe78d8254 authorJohn MacFarlane <jgm@berkeley.edu> dateMon 8 Oct 2018, 23:16 (8 years ago) parent2e9a8d2
3 files changed+9−9
test/lhs-test.html+4−4 test/lhs-test.html+lhs+4−4 test/lhs-test.latex+1−1
test/lhs-test.html+4−4
@@ -29,7 +29,7 @@ a.sourceLine { text-indent: -1em; padding-left: 1em; }
2929pre.numberSource a.sourceLine
3030 { position: relative; left: -4em; }
3131pre.numberSource a.sourceLine::before
32− { content: attr(data-line-number);
32+ { content: attr(title);
3333 position: relative; left: -1em; text-align: right; vertical-align: baseline;
3434 border: none; pointer-events: all; display: inline-block;
3535 -webkit-touch-callout: none; -webkit-user-select: none;
@@ -82,9 +82,9 @@ code span.wa { color: #60a0b0; font-weight: bold; font-style: italic; } /* Warni
8282<h1 id="lhs-test">lhs test</h1>
8383<p><code>unsplit</code> is an arrow that takes a pair of values and combines them to
8484return a single value:</p>
85−<div class="sourceCode" id="cb1"><pre class="sourceCode literate haskell"><code class="sourceCode haskell"><a class="sourceLine" id="cb1-1" data-line-number="1"><span class="ot">unsplit ::</span> (<span class="dt">Arrow</span> a) <span class="ot">=&gt;</span> (b <span class="ot">-&gt;</span> c <span class="ot">-&gt;</span> d) <span class="ot">-&gt;</span> a (b, c) d</a>
86−<a class="sourceLine" id="cb1-2" data-line-number="2">unsplit <span class="fu">=</span> arr <span class="fu">.</span> uncurry</a>
87−<a class="sourceLine" id="cb1-3" data-line-number="3"> <span class="co">-- arr (\op (x,y) -&gt; x `op` y)</span></a></code></pre></div>
85+<div class="sourceCode" id="cb1"><pre class="sourceCode literate haskell"><code class="sourceCode haskell"><a class="sourceLine" id="cb1-1" title="1"><span class="ot">unsplit ::</span> (<span class="dt">Arrow</span> a) <span class="ot">=&gt;</span> (b <span class="ot">-&gt;</span> c <span class="ot">-&gt;</span> d) <span class="ot">-&gt;</span> a (b, c) d</a>
86+<a class="sourceLine" id="cb1-2" title="2">unsplit <span class="fu">=</span> arr <span class="fu">.</span> <span class="fu">uncurry</span></a>
87+<a class="sourceLine" id="cb1-3" title="3"> <span class="co">-- arr (\op (x,y) -&gt; x `op` y)</span></a></code></pre></div>
8888<p><code>(***)</code> combines two arrows into a new arrow by running the two arrows on a
8989pair of values (one arrow on the first item of the pair and one arrow on the
9090second item of the pair).</p>
test/lhs-test.html+lhs+4−4
@@ -29,7 +29,7 @@ a.sourceLine { text-indent: -1em; padding-left: 1em; }
2929pre.numberSource a.sourceLine
3030 { position: relative; left: -4em; }
3131pre.numberSource a.sourceLine::before
32− { content: attr(data-line-number);
32+ { content: attr(title);
3333 position: relative; left: -1em; text-align: right; vertical-align: baseline;
3434 border: none; pointer-events: all; display: inline-block;
3535 -webkit-touch-callout: none; -webkit-user-select: none;
@@ -82,9 +82,9 @@ code span.wa { color: #60a0b0; font-weight: bold; font-style: italic; } /* Warni
8282<h1 id="lhs-test">lhs test</h1>
8383<p><code>unsplit</code> is an arrow that takes a pair of values and combines them to
8484return a single value:</p>
85−<div class="sourceCode" id="cb1"><pre class="sourceCode literate literatehaskell"><code class="sourceCode literatehaskell"><a class="sourceLine" id="cb1-1" data-line-number="1"><span class="ot">&gt; unsplit ::</span> (<span class="dt">Arrow</span> a) <span class="ot">=&gt;</span> (b <span class="ot">-&gt;</span> c <span class="ot">-&gt;</span> d) <span class="ot">-&gt;</span> a (b, c) d</a>
86−<a class="sourceLine" id="cb1-2" data-line-number="2"><span class="ot">&gt;</span> unsplit <span class="fu">=</span> arr <span class="fu">.</span> uncurry</a>
87−<a class="sourceLine" id="cb1-3" data-line-number="3"><span class="ot">&gt;</span> <span class="co">-- arr (\op (x,y) -&gt; x `op` y)</span></a></code></pre></div>
85+<div class="sourceCode" id="cb1"><pre class="sourceCode literate literatehaskell"><code class="sourceCode literatehaskell"><a class="sourceLine" id="cb1-1" title="1"><span class="ot">&gt; unsplit ::</span> (<span class="dt">Arrow</span> a) <span class="ot">=&gt;</span> (b <span class="ot">-&gt;</span> c <span class="ot">-&gt;</span> d) <span class="ot">-&gt;</span> a (b, c) d</a>
86+<a class="sourceLine" id="cb1-2" title="2"><span class="ot">&gt;</span> unsplit <span class="fu">=</span> arr <span class="fu">.</span> <span class="fu">uncurry</span></a>
87+<a class="sourceLine" id="cb1-3" title="3"><span class="ot">&gt;</span> <span class="co">-- arr (\op (x,y) -&gt; x `op` y)</span></a></code></pre></div>
8888<p><code>(***)</code> combines two arrows into a new arrow by running the two arrows on a
8989pair of values (one arrow on the first item of the pair and one arrow on the
9090second item of the pair).</p>
test/lhs-test.latex+1−1
@@ -103,7 +103,7 @@ return a single value:
103103\begin{Shaded}
104104\begin{Highlighting}[]
105105\OtherTok{unsplit ::}\NormalTok{ (}\DataTypeTok{Arrow}\NormalTok{ a) }\OtherTok{=>}\NormalTok{ (b }\OtherTok{->}\NormalTok{ c }\OtherTok{->}\NormalTok{ d) }\OtherTok{->}\NormalTok{ a (b, c) d}
106−\NormalTok{unsplit }\FunctionTok{=}\NormalTok{ arr }\FunctionTok{.}\NormalTok{ uncurry}
106+\NormalTok{unsplit }\FunctionTok{=}\NormalTok{ arr }\FunctionTok{.} \FunctionTok{uncurry}
107107 \CommentTok{-- arr (\textbackslash{}op (x,y) -> x `op` y)}
108108\end{Highlighting}
109109\end{Shaded}