aboutsummaryrefslogtreecommitdiff
path: root/scripts/fnl
diff options
context:
space:
mode:
Diffstat (limited to 'scripts/fnl')
-rw-r--r--scripts/fnl/lib.fnl32
1 files changed, 0 insertions, 32 deletions
diff --git a/scripts/fnl/lib.fnl b/scripts/fnl/lib.fnl
deleted file mode 100644
index 100b447..0000000
--- a/scripts/fnl/lib.fnl
+++ /dev/null
@@ -1,32 +0,0 @@
-(local M {})
-
-(lambda M.contains? [tbl elem]
- (not= nil (table.index-of tbl elem)))
-
-(lambda M.index-of [tbl elem]
- (each [idx value (pairs tbl)]
- (when (= value elem) (lua "return idx")))
- nil)
-
-(lambda M.exec [cmd args]
- (var argstr "")
- (each [_ arg (ipairs args)]
- (set argstr (.. argstr " \"" (string.gsub arg "\"" "\\\"") "\"")))
- (local code (os.execute (.. cmd argstr))))
-
-(lambda M.read-lines [filepath]
- (local file (io.open filepath :r))
- (if file
- (do
- (local lines [])
- (each [line (file:lines)] (table.insert lines line))
- (file:close)
- lines)
- []))
-
-(lambda M.write-lines [filepath lines]
- (local file (io.open filepath :w))
- (file:write (table.concat lines "\n"))
- (file:close))
-
-M