mirror of
https://github.com/jgm/pandoc.git
synced 2026-08-28 17:20:47 +08:00
Albert Krewinkel
26 lines
911 B
Haskell
26 lines
911 B
Haskell
{- |
|
|
Module : PandocCLI.Lua
|
|
Copyright : © 2022-2023 Albert Krewinkel
|
|
License : GPL-2.0-or-later
|
|
Maintainer : Albert Krewinkel <albert@zeitkraut.de>
|
|
|
|
Placeholder values to be used when pandoc is compiled without support
|
|
for the Lua scripting engine.
|
|
-}
|
|
module PandocCLI.Lua (runLuaInterpreter, getEngine) where
|
|
|
|
import Control.Monad.IO.Class (MonadIO)
|
|
import Text.Pandoc.Error (PandocError (PandocNoScriptingEngine), handleError)
|
|
import Text.Pandoc.Scripting (ScriptingEngine, noEngine)
|
|
|
|
-- | Raises an error, reporting that the scripting engine is unavailable.
|
|
runLuaInterpreter :: String -- ^ Program name
|
|
-> [String] -- ^ Command line arguments
|
|
-> IO ()
|
|
runLuaInterpreter _progName _args = do
|
|
handleError (Left PandocNoScriptingEngine)
|
|
|
|
-- | Placeholder scripting engine.
|
|
getEngine :: MonadIO m => m ScriptingEngine
|
|
getEngine = pure noEngine
|