summaryrefslogtreecommitdiff
path: root/test/pptx/code.native
diff options
context:
space:
mode:
authorEmily Bourke <undergroundquizscene@protonmail.com>2021-08-25 14:35:19 +0100
committerJohn MacFarlane <jgm@berkeley.edu>2021-09-01 07:16:17 -0700
commit8dbea4909211ef7b2acc677288be7c5f10cbb40e (patch)
tree4300a31d7358a2277b4c583217e6ba0c9d484707 /test/pptx/code.native
parent0617d3a88bb1f84622b8a94bd3366c7c8c9e8f8a (diff)
pptx: Restructure tests
- Use dashes consistently rather than underscores - Make a folder for each set of tests - List test files explicitly (Cabal doesn’t support ** until version 2.4)
Diffstat (limited to 'test/pptx/code.native')
-rw-r--r--test/pptx/code.native21
1 files changed, 0 insertions, 21 deletions
diff --git a/test/pptx/code.native b/test/pptx/code.native
deleted file mode 100644
index be7f512f7..000000000
--- a/test/pptx/code.native
+++ /dev/null
@@ -1,21 +0,0 @@
-[Header 1 ("header-with-inline-code",[],[]) [Str "Header",Space,Str "with",Space,Code ("",[],[]) "inline code"]
-,CodeBlock ("",[],[]) "Code at level 0"
-,BulletList
- [[Para [Str "Bullet",Space,Str "item",Space,Str "with",Space,Code ("",[],[]) "inline code"]
- ,CodeBlock ("",[],[]) "Code block at level 1"
- ,BulletList
- [[Para [Str "with",Space,Code ("",[],[]) "nested"]
- ,CodeBlock ("",[],[]) "lvl2\nlvl2\nlvl2"
- ,Header 2 ("second-heading-level-with-code",[],[]) [Str "Second",Space,Str "heading",Space,Str "level",Space,Str "with",Space,Code ("",[],[]) "code"]]]]]
-,Header 1 ("syntax-highlighting",[],[]) [Str "Syntax",Space,Str "highlighting"]
-,CodeBlock ("",["haskell"],[]) "id :: a -> a\nid x = x"
-,BulletList
- [[Para [Str "Nested"]
- ,CodeBlock ("",["haskell"],[]) "g :: Int -> Int\ng x = x * 3"]]
-,Header 1 ("two-column-slide",[],[]) [Str "Two",Space,Str "column",Space,Str "slide"]
-,Div ("",["columns"],[])
- [Div ("",["column"],[("width","50%")])
- [BulletList
- [[Plain [Str "A",Space,Str "total",Space,Str "alternative",Space,Str "for",Space,Code ("",[],[]) "head"]]]]
- ,Div ("",["column"],[("width","50%")])
- [CodeBlock ("",[],[]) "safeHead :: [a] -> Maybe a\nsafeHead [] = Nothing\nsafeHead (x:_) = Just x"]]]