Tissevert/pandoc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 1
pandoc/tests/lhs-test.markdown
fiddlosopher 6033ea729c Updated test suites: regular paragraph before block quote. 
Note:  rst writer doesn't handle block quote after code block
properly.  Ideally it would insert an empty comment to reset
indentation.  But this is not desirable in general before
code blocks.


git-svn-id: https://pandoc.googlecode.com/svn/trunk@1540 788f1e2b-df1e-0410-8736-df70ead52e1b
2009-02-14 04:08:18 +00:00

488 B
Raw Blame History

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)

(***) 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