Add binary for linux

Author: Simre1

Readme.md

@@ -4,10 +4,16 @@ Neorg Haskell Parser aims to be a complete implementation of the [Neorg markup s
 
 ## Installation
 
+### Using a precompiled binary
+
+I have added a compiled binary for linux in the `release` folder, which should work on most x86 linux systems.
+
+### Building from Source
+
 You will need ghc and cabal. Then you can build the project with:
 ```bash
 cabal build neorg-pandoc
-```
+``` 
 
 You can run the tests with:
 ```bash
@@ -16,14 +22,14 @@ cabal run test
 
 ## Usage
 
-After having built `neorg-pandoc`, you can use it to transform Neorg files into Pandoc json documents. `neorg-pandoc` expects exactly one parameter, which should be the file path to the Neorg file. If parsing was successful, the json document is printed to stdout.
+After having aquired a binary of `neorg-pandoc`, you can use it to transform Neorg files into Pandoc json documents. `neorg-pandoc` expects exactly one parameter, which should be the file path to the Neorg file. If parsing was successful, the json document is printed to stdout.
 
 An example usage might be:
 ```bash
-cabal exec neorg-pandoc -- testing/test.norg | pandoc -f json -o testing/out.pdf
+./neorg-pandoc-linux86 testing/test.norg | pandoc -f json -o testing/out.pdf
 ```
 
-Here, I have used the `exec` command of `cabal` to execute `neorg-pandoc` and pass it the filepath of my Neorg file. The result is then piped into pandoc to create a pdf.
+Here, I have used the `neorg-pandoc-linux86` binary to transform my `norg` file into the pandoc `json` format. The result is piped into pandoc to create a pdf. The `-f json` argument tells pandoc that the input is a `json` file  and `-o testing/out.pdf` is the location of the `pdf` file. It is also possible to transform your `norg` file into other formats; for example to markdown by replacing `-o testing/out.pdf` with `-o testing/out.md`. For further options refer to the `pandoc` documentation.
 
 ## Implementation status
 

generate_binary.sh

@@ -0,0 +1,4 @@
+cabal build -O2
+cp dist-newstyle/build/x86_64-linux/ghc-8.10.7/neorg-0.1.0.0/x/neorg-pandoc/build/neorg-pandoc/neorg-pandoc release/neorg-pandoc-linux86 &&
+strip release/neorg-pandoc-linux86 &&
+upx release/neorg-pandoc-linux86 

neorg.cabal

@@ -53,7 +53,7 @@ library
 
     -- LANGUAGE extensions used by modules in this package.
     -- other-extensions:
-    build-depends:    base ^>=4.14.2.0, text, vector, containers, bytestring, megaparsec, time, transformers, optics-core, optics-th
+    build-depends:    base ^>=4.14.2.0, text, vector, containers, megaparsec, time, transformers, optics-core, optics-th
     hs-source-dirs:   src
 
 executable neorg-pandoc

release/neorg-pandoc-linux86

@@ -1,12 +1,9 @@
 module Neorg where
 
 import Neorg.Document
+import Neorg.Document.Tag
+import Neorg.Parser
 
-import qualified Data.Text.IO as T
-import Data.Either
-
-import qualified Data.ByteString.Lazy as B
-import Text.Megaparsec (parse, errorBundlePretty)
 -- 
 -- 
 -- test :: IO ()

src/Neorg.hs

@@ -2,6 +2,7 @@
 {-# LANGUAGE DeriveFunctor #-}
 {-# LANGUAGE TemplateHaskell #-}
 
+
 module Neorg.Parser where
 
 import Control.Applicative
@@ -14,7 +15,7 @@ import Data.Char (isLetter)
 import Data.Foldable (foldl')
 import Data.Functor
 import Data.Functor.Identity
-import Data.Maybe (catMaybes)
+import Data.Maybe ( catMaybes )
 import qualified Data.Set as S
 import Data.Text (Text, pack, unpack)
 import qualified Data.Text as T
@@ -44,6 +45,7 @@ data InlineState = InlineState {_modifierInline :: ModifierInline, _delimitedAct
 
 data ModifierInline = NoModifier Inline | OpenModifier String Inline ModifierInline deriving (Show)
 
+hasModifier :: String -> ModifierInline -> Bool
 hasModifier c (NoModifier _) = False
 hasModifier c1 (OpenModifier c2 i b) = c1 == c2 || hasModifier c1 b
 
@@ -55,8 +57,10 @@ makeLenses ''InlineState
 
 makeLenses ''ModifierInline
 
+initialInlineState :: InlineState
 initialInlineState = InlineState (NoModifier (ConcatInline V.empty)) False
 
+defaultParserState :: ParserState
 defaultParserState = ParserState I0 emptyDocumentMeta
 
 parse :: GenerateTagParser tags => Text -> Text -> Either Text (Document tags)