Basic Html Rendering

bin/Djot.ipkg

@@ -0,0 +1,47 @@
+package Djot
+version = 0.1.0
+authors = "Nathan McCarty"
+-- maintainers =
+-- license =
+-- brief =
+-- readme =
+-- homepage =
+-- sourceloc =
+-- bugtracker =
+
+-- the Idris2 version required (e.g. langversion >= 0.5.1)
+-- langversion
+
+-- packages to add to search path
+depends = SSG
+
+-- modules to install
+-- modules =
+
+-- main file (i.e. file to load at REPL)
+main = Djot
+
+-- name of executable
+executable = "djot"
+-- opts =
+sourcedir = "src"
+-- builddir =
+-- outputdir =
+
+-- script to run before building
+-- prebuild =
+
+-- script to run after building
+-- postbuild =
+
+-- script to run after building, before installing
+-- preinstall =
+
+-- script to run after installing
+-- postinstall =
+
+-- script to run before cleaning
+-- preclean =
+
+-- script to run after cleaning
+-- postclean =

bin/src/Djot.idr

@@ -0,0 +1,21 @@
+module Djot
+
+import System
+import System.File
+
+import SSG.Djot
+import SSG.HTML
+
+main : IO ()
+main = do
+  args <- getArgs
+  case args of
+    [_, file] => do
+      Right contents <- readFile file
+        | Left err => printLn err
+      let parsed = djot contents
+      printLn parsed
+      putStr . render $ renderHtml parsed
+    _ => do
+      putStrLn "?"
+      exitFailure