From b38df089cc2c4694c542e97e9b990a6fda65643b Mon Sep 17 00:00:00 2001
From: Alexander Pickering <alex@cogarr.net>
Date: Fri, 21 Aug 2020 12:45:19 -0400
Subject: Add rockspec

Add a rockspec for easy packaging
---
 src/scope.lua | 148 +++++++++++++++++++++++++++++-----------------------------
 1 file changed, 74 insertions(+), 74 deletions(-)

(limited to 'src/scope.lua')

diff --git a/src/scope.lua b/src/scope.lua
index b5fd3c6..acf8eb5 100644
--- a/src/scope.lua
+++ b/src/scope.lua
@@ -1,74 +1,74 @@
---[[
-This module implements functions that handle scoping rules
-]]
-local scope = {}
-
-function scope.lineno (s, i)
-  if i == 1 then return 1, 1 end
-  local l, lastline = 0, ""
-  s = s:sub(1, i) .. "\n"
-  for line in s:gmatch("[^\n]*[\n]") do
-    l = l + 1
-    lastline = line
-  end
-  local c = lastline:len() - 1
-  return l, c ~= 0 and c or 1
-end
-
-function scope.new_scope (env)
-  if not env.scope then
-    env.scope = 0
-  else
-    env.scope = env.scope + 1
-  end
-  local scope = env.scope
-  env.maxscope = scope
-  env[scope] = {}
-  env[scope]["label"] = {}
-  env[scope]["local"] = {}
-  env[scope]["goto"] = {}
-end
-
-function scope.begin_scope (env)
-  env.scope = env.scope + 1
-end
-
-function scope.end_scope (env)
-  env.scope = env.scope - 1
-end
-
-function scope.new_function (env)
-  if not env.fscope then
-    env.fscope = 0
-  else
-    env.fscope = env.fscope + 1
-  end
-  local fscope = env.fscope
-  env["function"][fscope] = {}
-end
-
-function scope.begin_function (env)
-  env.fscope = env.fscope + 1
-end
-
-function scope.end_function (env)
-  env.fscope = env.fscope - 1
-end
-
-function scope.begin_loop (env)
-  if not env.loop then
-    env.loop = 1
-  else
-    env.loop = env.loop + 1
-  end
-end
-
-function scope.end_loop (env)
-  env.loop = env.loop - 1
-end
-
-function scope.insideloop (env)
-  return env.loop and env.loop > 0
-end
-
-return scope
+--[[
+This module implements functions that handle scoping rules
+]]
+local scope = {}
+
+function scope.lineno (s, i)
+  if i == 1 then return 1, 1 end
+  local l, lastline = 0, ""
+  s = s:sub(1, i) .. "\n"
+  for line in s:gmatch("[^\n]*[\n]") do
+    l = l + 1
+    lastline = line
+  end
+  local c = lastline:len() - 1
+  return l, c ~= 0 and c or 1
+end
+
+function scope.new_scope (env)
+  if not env.scope then
+    env.scope = 0
+  else
+    env.scope = env.scope + 1
+  end
+  local scope = env.scope
+  env.maxscope = scope
+  env[scope] = {}
+  env[scope]["label"] = {}
+  env[scope]["local"] = {}
+  env[scope]["goto"] = {}
+end
+
+function scope.begin_scope (env)
+  env.scope = env.scope + 1
+end
+
+function scope.end_scope (env)
+  env.scope = env.scope - 1
+end
+
+function scope.new_function (env)
+  if not env.fscope then
+    env.fscope = 0
+  else
+    env.fscope = env.fscope + 1
+  end
+  local fscope = env.fscope
+  env["function"][fscope] = {}
+end
+
+function scope.begin_function (env)
+  env.fscope = env.fscope + 1
+end
+
+function scope.end_function (env)
+  env.fscope = env.fscope - 1
+end
+
+function scope.begin_loop (env)
+  if not env.loop then
+    env.loop = 1
+  else
+    env.loop = env.loop + 1
+  end
+end
+
+function scope.end_loop (env)
+  env.loop = env.loop - 1
+end
+
+function scope.insideloop (env)
+  return env.loop and env.loop > 0
+end
+
+return scope
-- 
cgit v1.2.3-70-g09d2