From 5be9052f5fb7283372b3d5497bef499718a34992 Mon Sep 17 00:00:00 2001 From: Albert Krewinkel Date: Thu, 29 Sep 2022 17:24:31 +0200 Subject: [API Change] Extract Lua code into new package pandoc-lua-engine The flag 'lua53` must now be used with that package if pandoc is to be compiled against Lua 5.3. --- .../src/Text/Pandoc/Lua/Module/System.hs | 41 ++++++++++++++++++++++ 1 file changed, 41 insertions(+) create mode 100644 pandoc-lua-engine/src/Text/Pandoc/Lua/Module/System.hs (limited to 'pandoc-lua-engine/src/Text/Pandoc/Lua/Module/System.hs') diff --git a/pandoc-lua-engine/src/Text/Pandoc/Lua/Module/System.hs b/pandoc-lua-engine/src/Text/Pandoc/Lua/Module/System.hs new file mode 100644 index 000000000..70ef1b315 --- /dev/null +++ b/pandoc-lua-engine/src/Text/Pandoc/Lua/Module/System.hs @@ -0,0 +1,41 @@ +{-# LANGUAGE OverloadedStrings #-} +{-# LANGUAGE ScopedTypeVariables #-} +{- | + Module : Text.Pandoc.Lua.Module.System + Copyright : © 2019-2022 Albert Krewinkel + License : GNU GPL, version 2 or above + + Maintainer : Albert Krewinkel + Stability : alpha + +Pandoc's system Lua module. +-} +module Text.Pandoc.Lua.Module.System + ( documentedModule + ) where + +import HsLua +import HsLua.Module.System + (arch, env, getwd, ls, mkdir, os, rmdir, with_env, with_tmpdir, with_wd) + +-- | Push the pandoc.system module on the Lua stack. +documentedModule :: LuaError e => Module e +documentedModule = Module + { moduleName = "pandoc.system" + , moduleDescription = "system functions" + , moduleFields = + [ arch + , os + ] + , moduleFunctions = + [ setName "environment" env + , setName "get_working_directory" getwd + , setName "list_directory" ls + , setName "make_directory" mkdir + , setName "remove_directory" rmdir + , setName "with_environment" with_env + , setName "with_temporary_directory" with_tmpdir + , setName "with_working_directory" with_wd + ] + , moduleOperations = [] + } -- cgit v1.2.3