nydp 0.0.4 → 0.0.5

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA1:
-  metadata.gz: e96bb2970aa18753721c5faa2c5aeec53a73245f
-  data.tar.gz: 151802fddd1bcdb72ecddc6fb2e882b11c3d2ea4
+  metadata.gz: 8c1432b7602bbe14e2c346f16068b7f8aea35317
+  data.tar.gz: 664df28016183708d50c31a000088176ba6fe38a
 SHA512:
-  metadata.gz: 437799e27e763566d9c6febf8ea154aea63bf66a7a9db57f6e8e8c033086646d9966c687d276578840dc0a974e5fdf7fb722ce9366bfb70d840f8e1b3906936f
-  data.tar.gz: da65be98312e0b821e9c7fe3b39ae6a8944b87fc6a7d20e56aaffe6a8673f632bda2c7daa6bbefe488243d156e933e81c8f33ee29909b55aa264f2afaa570a83
+  metadata.gz: 08fa70dd03b03b37e7427524502c216a3f7b82cdd12d9800282d91020d4d59e8faa2fdf860038299d66559f12367125913b9e699d24fe476f656599a1d49b9da
+  data.tar.gz: 40746bd05d453ab458c4e389c215546e9ffadb27e53455387a112539adc5ef189d762072f4e8988086d8813892cb9a29e53af2794fb1591e51df52bfb294f4ae

data/lib/lisp/boot.nydp

@@ -263,3 +263,16 @@
 
 (def build-keyword-args (pairs)
   (map (fn (ab) `(list (quote ,(car ab)) ,@(cdr ab))) pairs))
+
+(mac dynamic (name)
+  (let with-mac-name (sym "w/~name")
+    (w/uniq prev
+      `(do
+        (mac ,with-mac-name (new-value . body)
+             (w/uniq result
+                     `(let ,',prev (hash-get (thread-locals) ',',name)
+                           (hash-set (thread-locals) ',',name ,new-value)
+                           (let ,result (do ,@body)
+                             (hash-set (thread-locals) ',',name ,',prev)
+                             ,result))))
+           (def ,name () (hash-get (thread-locals) ',name))))))

data/lib/lisp/tests/boot-tests.nydp

@@ -22,8 +22,39 @@
 
 (register-test
  '(suite "Boot Tests"
+         (suite "list management"
+                ("'pair breaks a list into pairs"
+                 (pairs '(1 a 2 b 3 c))
+                 ((1 a) (2 b) (3 c)))
+
+                ("'flatten returns a flat list of things"
+                 (flatten '((poo (x) (* x x)) (1 2 3)))
+                 (poo x * x x 1 2 3)))
+
+         (suite "map"
+                ("maps a function over a list of numbers"
+                 (map (fn (x) (* x x)) '(1 2 3))
+                 (1 4 9)))
 
          (suite "quasiquote"
+                ("same as quote for standalone item"
+                 `a
+                 a)
+                ("same as quote for standalone list"
+                 `(a b c)
+                 (a b c))
+                ("substitutes single variables"
+                 (let b 10 `(a ,b c))
+                 (a 10 c))
+                ("substitutes a list"
+                 (let b '(1 2 3) `(a ,@b c))
+                 (a 1 2 3 c))
+                ("substitutes a list at the end of a given list"
+                 (let b '(1 2 3) `(a ,b ,@b))
+                 (a (1 2 3) 1 2 3))
+                ("more complicated substitution example"
+                 (with (d '(1 2 3) g '(x y z)) `(a (b c ,d (e f ,@g))))
+                 (a (b c (1 2 3) (e f x y z))))
                 ("peeks inside nested quotes"
                  `(a b '(c ,(+ 1 2)))
                  (a b '(c 3)))

data/lib/lisp/tests/dynamic-scope-test.nydp

@@ -0,0 +1,14 @@
+(dynamic foodynamic)
+
+(def listfoody ()
+     (list (foodynamic)
+           (+ 6 (foodynamic))
+           (+ 10 (foodynamic))))
+
+(register-test '(suite "dynamic scoping"
+       ("relies on thread-locals"
+        (list
+         (w/foodynamic 101 (listfoody))
+         (w/foodynamic 0   (listfoody))
+         (w/foodynamic 666 (listfoody)))
+        ((101 107 111) (0 6 10) (666 672 676)))))

data/lib/lisp/tests/foundation-test.nydp

@@ -16,7 +16,7 @@
         string)
 
       ("interpolates a string"
-        "foobar %%(+ 1 2) you know"
+        "foobar ~(+ 1 2) you know"
         "foobar 3 you know")
 
       ("returns 'string for an interpolated string"
@@ -40,6 +40,14 @@
           (type-of nil)
           nil))
 
+  (suite "Ensuring"
+    ("gets called on the way out"
+      (let x 10
+        (ensuring (fn () (assign x (+ x 11)))
+                  (fn () (assign x (+ x 22))))
+        x)
+      43))
+
   (suite "Lists"
     (suite "cons"
       ("cons creates a list"

data/lib/nydp.rb

@@ -8,7 +8,10 @@ module Nydp
   def self.testfiles;       PLUGINS.map(&:testfiles).flatten    ; end
   def self.plugin_names   ; PLUGINS.map(&:name)                 ; end
   def self.loadall vm, ns, files
-    files.each { |f| StreamRunner.new(vm, ns, File.new(f)).run }
+    files.each { |f|
+      reader = Nydp::StreamReader.new(File.new(f))
+      Nydp::Runner.new(vm, ns, reader).run
+    }
   end
 
   def self.repl
@@ -17,7 +20,8 @@ module Nydp
     setup(ns)
     vm = VM.new
     loadall vm, ns, loadfiles
-    Repl.new(vm, ns, $stdin).run
+    reader = Nydp::ReadlineReader.new $stdin, "nydp > "
+    Nydp::Runner.new(vm, ns, reader, $stdout).run
   end
 
   def self.tests *options
@@ -28,7 +32,8 @@ module Nydp
     vm = VM.new
     loadall vm, ns, loadfiles
     loadall vm, ns, testfiles
-    StreamRunner.new(vm, ns, "(run-all-tests #{verbose})").run
+    reader = Nydp::StringReader.new "(run-all-tests #{verbose})"
+    Nydp::Runner.new(vm, ns, reader).run
   end
 
 end

data/lib/nydp/builtin/ensuring.rb

@@ -0,0 +1,25 @@
+class Nydp::Builtin::Ensuring
+  include Nydp::Helper
+
+  class InvokeProtection
+    attr_reader :protection
+
+    def initialize protection
+      @protection = protection
+    end
+
+    def execute vm
+      protection.invoke vm, Nydp.NIL
+    end
+  end
+
+  def invoke vm, args
+    fn_ensure = args.car
+    fn_tricky = args.cdr.car
+
+    protection_instructions = Nydp::Pair.from_list [InvokeProtection.new(fn_ensure), Nydp::PopArg]
+    vm.push_instructions protection_instructions, vm.peek_context
+
+    fn_tricky.invoke vm, Nydp.NIL
+  end
+end

data/lib/nydp/builtin/eval.rb

@@ -4,7 +4,7 @@ class Nydp::Builtin::Eval
   end
 
   def invoke vm, args
-    evaluator = Nydp::Runner.new Nydp::VM.new, @ns
+    evaluator = Nydp::Evaluator.new Nydp::VM.new, @ns
     vm.push_arg evaluator.evaluate args.car
   end
 

data/lib/nydp/builtin/thread_locals.rb

@@ -0,0 +1,7 @@
+class Nydp::Builtin::ThreadLocals
+  include Nydp::Helper
+
+  def invoke vm, args
+    vm.push_arg vm.locals
+  end
+end

data/lib/nydp/core.rb

@@ -42,6 +42,7 @@ module Nydp
       Symbol.mk(:nil,   ns).assign Nydp.NIL
       Symbol.mk(:t,     ns).assign Nydp.T
       Symbol.mk(:sym,   ns).assign Nydp::Builtin::ToSym.new(ns)
+      Symbol.mk(:ensuring,      ns).assign(Nydp::Builtin::Ensuring.new)
       Symbol.mk(:inspect,       ns).assign(Nydp::Builtin::Inspect.new)
       Symbol.mk(:comment,       ns).assign(Nydp::Builtin::Comment.new)
       Symbol.mk(:millisecs,     ns).assign(Nydp::Builtin::Millisecs.new)
@@ -51,6 +52,7 @@ module Nydp
       Symbol.mk("string-pieces",ns).assign(Nydp::Builtin::StringPieces.new)
       Symbol.mk("string-replace", ns).assign(Nydp::Builtin::StringReplace.new)
       Symbol.mk("string-split"  , ns).assign(Nydp::Builtin::StringSplit.new  )
+      Symbol.mk("thread-locals" , ns).assign(Nydp::Builtin::ThreadLocals.new)
       Symbol.mk("type-of",      ns).assign(Nydp::Builtin::TypeOf.new(ns))
       Symbol.mk(:"eq?",         ns).assign(Nydp::Builtin::IsEqual.new)
       Symbol.mk(:"pair?",       ns).assign(Nydp::Builtin::IsPair.new)

data/lib/nydp/parser.rb

@@ -87,8 +87,6 @@ module Nydp
     def next_form token, token_stream
       return nil if token.nil?
       case token.first
-      when :embed_suffix
-        Nydp.NIL
       when :string_open_delim
         string token_stream, token.last, close_delimiter_for(token.last)
       when :left_paren

data/lib/nydp/readline_history.rb

@@ -0,0 +1,25 @@
+
+# with thanks to @liwp ( http://blog.lauripesonen.com/ ) at http://stackoverflow.com/questions/2065923/irb-history-not-working
+module Nydp
+  module ReadlineHistory
+    HISTFILE = "~/.nydp_history"
+    MAXHISTSIZE = 100
+
+    def setup_readline_history verbose=true
+      histfile = File::expand_path(HISTFILE)
+      begin
+        if File::exists?(histfile)
+          lines = IO::readlines(histfile).collect { |line| line.chomp }
+          Readline::HISTORY.push(*lines)
+        end
+        Kernel::at_exit do
+          lines = Readline::HISTORY.to_a.reverse.uniq.reverse
+          lines = lines[-MAXHISTSIZE, MAXHISTSIZE] if lines.size > MAXHISTSIZE
+          File::open(histfile, File::WRONLY|File::CREAT|File::TRUNC) { |io| io.puts lines.join("\n") }
+        end
+      rescue => e
+        puts "Error when configuring permanent history: #{e}" if verbose
+      end
+    end
+  end
+end

data/lib/nydp/runner.rb

@@ -1,5 +1,42 @@
+require 'readline'
+require 'nydp/readline_history'
+
 module Nydp
-  class Runner
+  class StringReader
+    def initialize string ; @string = string ; end
+    def nextline
+      s = @string ; @string = nil ; s
+    end
+  end
+
+  class StreamReader
+    def initialize stream ; @stream = stream ; end
+    def nextline
+      @stream.readline unless @stream.eof?
+    end
+  end
+
+  class ReadlineReader
+    include Nydp::ReadlineHistory
+
+    def initialize stream, prompt
+      @prompt = prompt
+      setup_readline_history
+    end
+
+    # with thanks to http://ruby-doc.org/stdlib-1.9.3/libdoc/readline/rdoc/Readline.html
+    # and http://bogojoker.com/readline/
+    def nextline
+      line = Readline.readline(@prompt, true)
+      return nil if line.nil?
+      if line =~ /^\s*$/ or Readline::HISTORY.to_a[-2] == line
+        Readline::HISTORY.pop
+      end
+      line
+    end
+  end
+
+  class Evaluator
     attr_accessor :vm, :ns
 
     def initialize vm, ns
@@ -30,37 +67,34 @@ module Nydp
     end
   end
 
-  class StreamRunner < Runner
-    attr_accessor :stream, :parser
-
-    def initialize vm, ns, stream
+  class Runner < Evaluator
+    def initialize vm, ns, stream, printer=nil
       super vm, ns
-      @stream = stream
-      @parser = Nydp::Parser.new(ns)
-      @tokens = Nydp::Tokeniser.new stream
+      @printer    = printer
+      @parser     = Nydp::Parser.new(ns)
+      @tokens     = Nydp::Tokeniser.new stream
     end
 
-    def prompt *_
+    def print val
+      @printer.puts val if @printer
     end
 
     def run
       res = Nydp.NIL
-      prompt
       while !@tokens.finished
-        expr = parser.expression(@tokens)
+        expr = @parser.expression(@tokens)
         unless expr.nil?
-          res = evaluate expr
-          prompt res
+          begin
+            print(res = evaluate(expr))
+          rescue Exception => e
+            puts e.message
+            e.backtrace.each do |b|
+              puts b
+            end
+          end
         end
       end
       res
     end
   end
-
-  class Repl < StreamRunner
-    def prompt val=nil
-      puts val if val
-      print "nydp > "
-    end
-  end
 end

data/lib/nydp/tokeniser.rb

@@ -4,15 +4,20 @@ module Nydp
   class Tokeniser
     attr_accessor :state, :finished
 
-    def initialize stream
-      @stream = stream.is_a?(String) ? nil : stream
-      @scanner = StringScanner.new(stream.is_a?(String) ? stream : "")
+    def initialize reader
+      @reader = reader
+      @scanner = StringScanner.new("")
       @state = :lisp
     end
 
     def no_more?
-      @scanner << @stream.readline if @scanner.eos? && @stream && !@stream.eof?
-      @scanner.eos?
+      if @scanner.eos?
+        nextline = @reader.nextline
+        return true if nextline.nil?
+        @scanner << nextline
+      end
+
+      false
     end
 
     def close_delimiter? scanner, delim
@@ -37,8 +42,8 @@ module Nydp
         elsif closer = close_delimiter?(s, close_delimiter)
           rep << closer
           return StringFragmentCloseToken.new(string, rep)
-        elsif embed_suffix = s.scan(/%%/)
-          rep << embed_suffix
+        elsif start_interpolation = s.scan(/~/)
+          rep << start_interpolation
           return StringFragmentToken.new(string, rep)
         else
           ch = s.getch
@@ -61,9 +66,6 @@ module Nydp
           tok = [:comment, comment[1..-1].strip]
         elsif open_str = s.scan(/"/)
           tok = [:string_open_delim, open_str]
-        elsif embed_suffix = s.scan(/\]#/)
-          self.state = :external_text
-          tok = [:embed_suffix, embed_suffix]
         elsif list_prefix = s.scan(/[^\s()]*\(/)
           tok = [:left_paren, list_prefix[0...-1]]
         elsif list_prefix = s.scan(/[^\s()]*\{/)

data/lib/nydp/version.rb

@@ -1,3 +1,3 @@
 module Nydp
-  VERSION = "0.0.4"
+  VERSION = "0.0.5"
 end

data/lib/nydp/vm.rb

@@ -1,12 +1,13 @@
 module Nydp
   class VM
     include Helper
-    attr_accessor :instructions, :args, :contexts, :current_context
+    attr_accessor :instructions, :args, :contexts, :current_context, :locals
 
     def initialize
       @instructions = []
-      @args = []
-      @contexts = []
+      @args         = []
+      @contexts     = []
+      @locals       = { }
     end
 
     def thread expr

data/spec/boot_spec.rb

@@ -6,7 +6,8 @@ describe Nydp do
   before {
     Nydp.setup ns
     boot_path = File.expand_path File.join File.expand_path(File.dirname(__FILE__)), '../lib/lisp/boot.nydp'
-    Nydp::StreamRunner.new(vm, ns, File.new(boot_path)).run
+    reader = Nydp::StreamReader.new(File.new(boot_path))
+    Nydp::Runner.new(vm, ns, reader).run
   }
 
   def list *things
@@ -23,45 +24,7 @@ describe Nydp do
   end
 
   def run txt
-    Nydp::StreamRunner.new(vm, ns, txt).run
-  end
-
-  it "should map a function over a list of numbers" do
-    expect(run "(map (fn (x) (* x x)) '(1 2 3))").to eq Nydp::Pair.from_list [1, 4, 9]
-  end
-
-  describe "quasiquote" do
-    it "should quasiquote a standalone item" do
-      expect(run "`a").to eq sym(:a)
-    end
-
-    it "should quasiquote a plain list" do
-      expect(run "`(a b c)").to eq list :a, :b, :c
-    end
-
-    it "should quasiquote a plain list with a variable substitution" do
-      expect(run "(assign b 10) `(a ,b c)").to eq list :a, 10, :c
-    end
-
-    it "should quasiquote a plain list with a list-variable substitution" do
-      expect(run "(assign b '(1 2 3)) `(a ,@b c)").to eq list :a, 1, 2, 3, :c
-    end
-
-    it "should quasiquote a plain list with a list-variable substitution at the end" do
-      expect(run "(assign b '(1 2 3)) `(a ,b ,@b)").to eq list :a, [1,2,3], 1, 2, 3
-    end
-
-    it "should quasiquote a plain list with a list-variable substitution at the end" do
-      expect(run "(assign d '(1 2 3)) (assign g '(x y z)) `(a (b c ,d (e f ,@g)))").to eq list :a, [:b, :c, [1, 2, 3], [:e, :f, :x, :y, :z]]
-    end
-  end
-
-  describe "pairs" do
-    it "should break a list into pairs" do
-      result   = run "(pairs '(1 a 2 b 3 c))"
-      expected = run "'((1 a) (2 b) (3 c))"
-      expect(result).to eq expected
-    end
+    Nydp::Runner.new(vm, ns, Nydp::StringReader.new(txt)).run
   end
 
   describe :let do
@@ -72,14 +35,6 @@ describe Nydp do
     end
   end
 
-  describe :flatten do
-    it "should return a flat list of things" do
-      lisp = "(flatten '((poo (x) (* x x)) (1 2 3)))"
-      result = run lisp
-      expect(result).to eq list :poo, :x, :"*", :x, :x, 1, 2, 3
-    end
-  end
-
   describe :and do
     it "should produce some nested conds" do
       result = run "(pre-compile '(and a b c))"

data/spec/embedded_spec.rb

@@ -20,7 +20,8 @@ describe Nydp::Parser do
   let(:colosyn)          { Nydp::Symbol.mk :"colon-syntax",       ns }
 
   def parse_string txt, open_delim, close_delim
-    Nydp::Parser.new(ns).string(Nydp::Tokeniser.new(txt), open_delim, close_delim)
+    reader = Nydp::StringReader.new txt
+    Nydp::Parser.new(ns).string(Nydp::Tokeniser.new(reader), open_delim, close_delim)
   end
 
   it "should parse empty string" do
@@ -44,14 +45,14 @@ describe Nydp::Parser do
 
   it "should parse a string with embedded code, delimited by eof" do
     x1 = sym('string-pieces')
-    x2 = Nydp::StringFragmentToken.new('a fluffy bunny! ',':a fluffy bunny! %%')
+    x2 = Nydp::StringFragmentToken.new('a fluffy bunny! ',':a fluffy bunny! ~')
     x2 = Nydp::StringAtom.new(x2.string, x2)
     x3 = sym('expr')
     x4 = Nydp::StringFragmentCloseToken.new(' a purple cow!',' a purple cow!')
     x4 = Nydp::StringAtom.new(x4.string, x4)
 
     expected = pair_list([x1,x2,x3,x4])
-    actual   = parse_string "a fluffy bunny! %%expr a purple cow!", ':', :eof
+    actual   = parse_string "a fluffy bunny! ~expr a purple cow!", ':', :eof
     expect(actual).to eq expected
   end
 
@@ -62,14 +63,14 @@ describe Nydp::Parser do
     n4 = sym(:zop)
 
     x1 = sym('string-pieces')
-    x2 = Nydp::StringFragmentToken.new('a fluffy bunny! ','------->a fluffy bunny! %%')
+    x2 = Nydp::StringFragmentToken.new('a fluffy bunny! ','------->a fluffy bunny! ~')
     x2 = Nydp::StringAtom.new(x2.string, x2)
     x3 = pair_list [n1, n2, n3, n4]
     x4 = Nydp::StringFragmentCloseToken.new(' a purple cow!',' a purple cow!')
     x4 = Nydp::StringAtom.new(x4.string, x4)
 
     expected = pair_list([x1,x2,x3,x4])
-    actual   = parse_string "a fluffy bunny! %%(foo bar \"an embedded bunny :)\" zop) a purple cow!", '------->', :eof
+    actual   = parse_string "a fluffy bunny! ~(foo bar \"an embedded bunny :)\" zop) a purple cow!", '------->', :eof
     expect(actual).to eq expected
   end
 
@@ -78,7 +79,7 @@ describe Nydp::Parser do
     e2 = sym(:bunny)
 
     s1 = sym('string-pieces')
-    s2 = Nydp::StringFragmentToken.new('a rather ','"a rather %%')
+    s2 = Nydp::StringFragmentToken.new('a rather ','"a rather ~')
     s2 = Nydp::StringAtom.new(s2.string, s2)
     s3 = pair_list [e1, e2]
     s4 = Nydp::StringFragmentCloseToken.new(' bunny :)',' bunny :)"')
@@ -90,14 +91,14 @@ describe Nydp::Parser do
     n4 = sym(:zop)
 
     x1 = sym('string-pieces')
-    x2 = Nydp::StringFragmentToken.new('a fluffy bunny! ','------->a fluffy bunny! %%')
+    x2 = Nydp::StringFragmentToken.new('a fluffy bunny! ','------->a fluffy bunny! ~')
     x2 = Nydp::StringAtom.new(x2.string, x2)
     x3 = pair_list [n1, n2, n3, n4]
     x4 = Nydp::StringFragmentCloseToken.new(' a purple cow!',' a purple cow!')
     x4 = Nydp::StringAtom.new(x4.string, x4)
 
     expected = pair_list([x1,x2,x3,x4])
-    actual   = parse_string "a fluffy bunny! %%(foo bar \"a rather %%(describe bunny) bunny :)\" zop) a purple cow!", '------->', :eof
+    actual   = parse_string "a fluffy bunny! ~(foo bar \"a rather ~(describe bunny) bunny :)\" zop) a purple cow!", '------->', :eof
     expect(actual).to eq expected
   end
 

data/spec/nypd_spec.rb

@@ -6,7 +6,7 @@ describe Nydp do
 
   def run txt
     Nydp.setup ns
-    Nydp::StreamRunner.new(vm, ns, txt).run
+    Nydp::Runner.new(vm, ns, Nydp::StringReader.new(txt)).run
   end
 
   it "should make a symbol from a string" do

data/spec/parser_spec.rb

@@ -20,12 +20,14 @@ describe Nydp::Parser do
   let(:colosyn)          { Nydp::Symbol.mk :"colon-syntax",       ns }
 
   it "should return a stream of tokens" do
-    t = Nydp::Tokeniser.new ""
+    reader = Nydp::StringReader.new ""
+    t = Nydp::Tokeniser.new reader
     expect(t.next_token).to eq nil
   end
 
   it "should return another stream of tokens" do
-    t = Nydp::Tokeniser.new "(a b c 1 2 3)"
+    reader = Nydp::StringReader.new "(a b c 1 2 3)"
+    t = Nydp::Tokeniser.new reader
     tt = []
     tok = t.next_token
     while tok

data/spec/spec_helper.rb

@@ -7,7 +7,8 @@ module SpecHelper
   end
 
   def parse txt
-    Nydp::Parser.new(ns).expression(Nydp::Tokeniser.new txt)
+    reader = Nydp::StringReader.new txt
+    Nydp::Parser.new(ns).expression(Nydp::Tokeniser.new reader)
   end
 
   def pair_list xs, last=Nydp.NIL

data/spec/thread_local_spec.rb

@@ -0,0 +1,27 @@
+require 'spec_helper'
+
+describe Nydp do
+  let(:parser)                { Nydp::Parser.new(ns) }
+
+  def run vm, txt
+    Nydp::Runner.new(vm, ns, Nydp::StringReader.new(txt)).run
+  end
+
+  it "should isolate threadlocal values" do
+    Nydp.setup ns
+
+    vm0 = Nydp::VM.new
+    vm1 = Nydp::VM.new
+
+
+    run vm0, "(hash-set (thread-locals) 'testing (+ 1 2 3))"
+    run vm1, "(hash-set (thread-locals) 'testing (+ 6 7 8))"
+
+    val0 = run vm0, "(hash-get (thread-locals) 'testing)"
+    val1 = run vm1, "(hash-get (thread-locals) 'testing)"
+
+    expect(val0).to eq 6
+    expect(val1).to eq 21
+  end
+
+end

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: nydp
 version: !ruby/object:Gem::Version
-  version: 0.0.4
+  version: 0.0.5
 platform: ruby
 authors:
 - Conan Dalton
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2015-03-05 00:00:00.000000000 Z
+date: 2015-05-15 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: bundler
@@ -86,6 +86,7 @@ files:
 - lib/lisp/boot.nydp
 - lib/lisp/test-runner.nydp
 - lib/lisp/tests/boot-tests.nydp
+- lib/lisp/tests/dynamic-scope-test.nydp
 - lib/lisp/tests/foundation-test.nydp
 - lib/nydp.rb
 - lib/nydp/assignment.rb
@@ -97,6 +98,7 @@ files:
 - lib/nydp/builtin/comment.rb
 - lib/nydp/builtin/cons.rb
 - lib/nydp/builtin/divide.rb
+- lib/nydp/builtin/ensuring.rb
 - lib/nydp/builtin/error.rb
 - lib/nydp/builtin/eval.rb
 - lib/nydp/builtin/greater_than.rb
@@ -114,6 +116,7 @@ files:
 - lib/nydp/builtin/random_string.rb
 - lib/nydp/builtin/string_replace.rb
 - lib/nydp/builtin/string_split.rb
+- lib/nydp/builtin/thread_locals.rb
 - lib/nydp/builtin/times.rb
 - lib/nydp/builtin/to_string.rb
 - lib/nydp/builtin/to_sym.rb
@@ -132,6 +135,7 @@ files:
 - lib/nydp/literal.rb
 - lib/nydp/pair.rb
 - lib/nydp/parser.rb
+- lib/nydp/readline_history.rb
 - lib/nydp/runner.rb
 - lib/nydp/string_atom.rb
 - lib/nydp/string_token.rb
@@ -151,6 +155,7 @@ files:
 - spec/spec_helper.rb
 - spec/string_token_spec.rb
 - spec/symbol_spec.rb
+- spec/thread_local_spec.rb
 homepage: http://github.com/conanite/nydp
 licenses:
 - MIT
@@ -184,3 +189,4 @@ test_files:
 - spec/spec_helper.rb
 - spec/string_token_spec.rb
 - spec/symbol_spec.rb
+- spec/thread_local_spec.rb