1 files changed, 43 insertions, 0 deletions
diff --git a/lib/lua-repl/repl/plugins/keep_last_eval.lua b/lib/lua-repl/repl/plugins/keep_last_eval.lua
new file mode 100644
index 00000000..01a77946
--- /dev/null
+++ b/lib/lua-repl/repl/plugins/keep_last_eval.lua
@@ -0,0 +1,43 @@
+-- Copyright (c) 2011-2015 Rob Hoelz <rob@hoelz.ro>
+--
+-- Permission is hereby granted, free of charge, to any person obtaining a copy of
+-- this software and associated documentation files (the "Software"), to deal in
+-- the Software without restriction, including without limitation the rights to
+-- use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of
+-- the Software, and to permit persons to whom the Software is furnished to do so,
+-- subject to the following conditions:
+--
+-- The above copyright notice and this permission notice shall be included in all copies or substantial portions of the Software.
+--
+-- THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+-- IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS
+-- FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR
+-- COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER
+-- IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
+-- CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+
+-- A plugin that stores the results of the last evaluation in _G._
+
+local tostring = tostring
+
+function before:displayresults(results)
+  local context = self:getcontext()
+
+  if self._keep_eval_lastn then
+    context._ = nil
+
+    for i = 1, self._keep_eval_lastn do
+      context['_' .. tostring(i)] = nil
+    end
+  end
+
+  if results.n > 0 then
+    context._ = results[1]
+
+    for i = 1, results.n do
+      context['_' .. tostring(i)] = results[i]
+    end
+
+    self._keep_eval_lastn = results.n
+  end
+end