From 65dc1f2196b46dbd527d49da113515bea825416d Mon Sep 17 00:00:00 2001
From: Bruce Hill <bitbucket@bruce-hill.com>
Date: Tue, 26 Jun 2018 15:52:38 -0700
Subject: Cleaning up metaprogramming a bit and fixing/adding test for
 recursion control flow.

---
 files.moon | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'files.moon')

diff --git a/files.moon b/files.moon
index 1d28e5c..fd8a417 100644
--- a/files.moon
+++ b/files.moon
@@ -117,4 +117,10 @@ files.get_line_number = (str, pos)->
         else lo = mid+1
     return hi
 
+files.get_line = (str, line_no)->
+    line_starts = files.get_line_starts(str)
+    return str\sub(line_starts[line_no] or 1, line_starts[line_no+1] or -1)
+
+files.get_lines = (str)-> get_lines\match(str)
+
 return files
-- 
cgit v1.2.3