rouge-lang 0.0.7 → 0.0.8

data/.gitignore

@@ -18,3 +18,4 @@ test/tmp
 test/version_tmp
 tmp
 .rvmrc
+*.swp

data/bin/rouge

@@ -4,25 +4,37 @@ $: << "#{File.dirname(__FILE__)}/../lib"
 require 'rouge'
 require 'optparse'
 
+# Boots Rouge and evaluates code in a new context. Prints non-nil results if
+# print is true.
+def evaluate(code, print = false)
+  Rouge.boot!
+  res = Rouge::Context.new(Rouge[:user]).readeval(code)
+
+  if print && res
+    puts Rouge.print(res, '')
+  end
+end
+
 options = {:backtrace => true}
 
 option_parser = OptionParser.new do |opts|
-  opts.banner = "rouge [switch] [filename]"
+  opts.banner = "Usage: rouge [switch] [filename]"
 
   opts.on('-v', '--version', 'Print version number') do
     puts "Rouge #{Rouge::VERSION}"
     exit 0
   end
 
-  opts.on('-e STR', '--eval STR', 'Evaluate the contents of STR') do |str|
-    Rouge.boot!
-    Rouge::Context.new(Rouge[:user]).readeval(str)
+  opts.on('-e STR', '--eval STR',
+          'Evaluate expressions in STR; print non-nil results') do |str|
+    evaluate(str, true)
     exit 0
   end
 
   opts.on('--time-startup', 'Report boot up time') do
+    start = Time.now
     Rouge.boot!
-    puts Time.now - Rouge.start
+    puts Time.now - start
     exit 0
   end
 
@@ -37,8 +49,20 @@ rescue OptionParser::MissingArgument => e
   puts "rouge: #{e}"
 end
 
-if ARGV.length == 1
-  file = ARGV[0]
+# Using a standalone '-', which traditionally is the switch for indicating
+# acceptance of standard input, causes some subtle issues with the
+# OptionParser.
+if ARGV.include?('-')
+  code = ''
+  while line = STDIN.gets
+    code << line
+  end
+  evaluate(code, true)
+  exit 0
+end
+
+if ARGV.length >= 1
+  file = ARGV.shift
 
   if File.file?(file)
     code = File.read(file)
@@ -52,13 +76,8 @@ if ARGV.length == 1
     code = code[code.index("\n") + 1..-1]
   end
 
-  Rouge.boot!
-  Rouge::Context.new(Rouge[:user]).readeval(code)
-
+  evaluate(code)
   exit 0
-elsif ARGV.length > 1
-  STDERR.puts option_parser.help
-  exit 1
 end
 
 Rouge.repl(options)

data/lib/rouge.rb

@@ -4,11 +4,6 @@ if RUBY_VERSION < "1.9"
   STDERR.puts "Rouge will probably not run on anything less than Ruby 1.9."
 end
 
-module Rouge; end
-
-start = Time.now
-Rouge.define_singleton_method :start, lambda {start}
-
 module Rouge
   require 'rouge/version'
   require 'rouge/wrappers'
@@ -36,6 +31,7 @@ module Rouge
 
     core = Rouge[:"rouge.core"]
     core.refer builtin
+    core.set_here(:"*command-line-args*", ARGV)
 
     user = Rouge[:user]
     user.refer builtin

data/lib/rouge/builtins.rb

@@ -245,8 +245,13 @@ class << Rouge::Builtins
 
   def ns(context, name, *args)
     ns = Rouge[name.name]
+    ns.refer Rouge[:"ruby"]
     ns.refer Rouge[:"rouge.builtin"]
 
+    unless name.name == :"rouge.core"
+      ns.refer Rouge[:"rouge.core"]
+    end
+
     args.each do |arg|
       kind, *params = arg.to_a
 

data/lib/rouge/context.rb

@@ -67,7 +67,7 @@ class Rouge::Context
     while true
       begin
         form = reader.lex
-      rescue Rouge::Reader::EndOfDataError
+      rescue Rouge::Reader::EOFError
         return r
       end
 

data/lib/rouge/printer.rb

@@ -8,6 +8,8 @@ module Rouge::Printer
     case form
     when Integer
       out << form.to_s
+    when Rational
+      out << "#{form.numerator}/#{form.denominator}"
     when Rouge::Symbol
       if form.ns_s
         out << form.ns_s

data/lib/rouge/reader.rb

@@ -3,7 +3,9 @@ require 'rouge/wrappers'
 
 class Rouge::Reader
   class UnexpectedCharacterError < StandardError; end
+  class NumberFormatError < StandardError; end
   class EndOfDataError < StandardError; end
+  class EOFError < StandardError; end
 
   attr_accessor :ns
 
@@ -17,54 +19,179 @@ class Rouge::Reader
   end
 
   def lex
-    r =
-      case peek
-      when MAYBE_NUMBER
-        number
-      when /:/
-        keyword
-      when /"/
-        string
-      when /\(/
-        Rouge::Seq::Cons[*list(')')]
-      when /\[/
-        list ']'
-      when /#/
-        dispatch
-      when SYMBOL
-        # SYMBOL after \[ and #, because it includes both
-        symbol_or_number
-      when /{/
-        map
-      when /'/
-        quotation
-      when /`/
-        syntaxquotation
-      when /~/
-        dequotation
-      when /\^/
-        metadata
-      when /@/
-        deref
-      when nil
-        reader_raise EndOfDataError, "in #lex"
+    case peek
+    when MAYBE_NUMBER
+      number
+    when /:/
+      keyword
+    when /"/
+      string
+    when /\(/
+      Rouge::Seq::Cons[*list(')')]
+    when /\[/
+      list ']'
+    when /#/
+      dispatch
+    when SYMBOL
+      # SYMBOL after \[ and #, because it includes both
+      symbol_or_number
+    when /{/
+      map
+    when /'/
+      quotation
+    when /`/
+      syntaxquotation
+    when /~/
+      dequotation
+    when /\^/
+      metadata
+    when /@/
+      deref
+    when nil
+      reader_raise EOFError, "in #lex"
+    else
+      reader_raise UnexpectedCharacterError, "#{peek.inspect} in #lex"
+    end
+  end
+
+  private
+
+  # Loose expression for a possible numeric literal.
+  MAYBE_NUMBER = /^[+\-]?\d[\da-fA-FxX._+\-\/]*/
+
+  # Ruby integer.
+  INT = /\d+(?:_\d+)*/
+
+  # Strict expression for a numeric literal.
+  NUMBER = /
+  [+\-]?
+  (?:
+    (?:#{INT}(?:(?:\.#{INT})?(?:[eE][+\-]?#{INT})?)?) (?# Integers and floats)
+  | (?:0
+      (?:
+        (?:[xX][\da-fA-F]+) (?# Hexadecimal integer)
+      | (?:[bB][01]+) (?# Binary integer)
+      | (?:[0-7]+) (?# Octal integer)
+      )?
+    )
+  )
+  /ox
+
+  RATIONAL = /#{NUMBER}\/#{NUMBER}/o
+
+  SYMBOL = /
+  ^(\.\[\])
+  |(\.?[-+]@)
+  |([a-zA-Z0-9\-_!&\?\*\/\.\+\|=%$<>#]+)
+  /x
+
+  # Advances the current character position by n characters and returns the
+  # updated character position.
+  def advance! n = 1
+    @n += n.abs
+  end
+
+  # Retracts the current character position by n characters and returns the
+  # updated character position.
+  def retract! n = 1
+    pos = @n - n.abs
+
+    if pos > 0
+      @n = pos
+    else
+      @n = 0
+    end
+  end
+
+  # Returns the character currently beneath the cursor.
+  def current_char
+    @src[@n]
+  end
+
+  # Returns the string of characters matching the regular expression re relative
+  # to the cursor position. The cursor position is then advanced by n characters
+  # where n is the length of the returned string.
+  def slurp re
+    re.match(@src[@n..-1])
+
+    if $&
+      advance!($&.length)
+      $&
+    else
+      reader_raise UnexpectedCharacterError, "#{current_char} in #slurp #{re}"
+    end
+  end
+
+  # Advances the cursor position beyond whitespace and comments and returns the
+  # resulting character.
+  def peek
+    while /[\s,;]/.match(current_char)
+      if $& == ";"
+        while /[^\n]/.match(current_char)
+          advance!
+        end
       else
-        reader_raise UnexpectedCharacterError, "#{peek.inspect} in #lex"
+        advance!
       end
+    end
 
-    r
+    current_char
   end
 
-  private
+  # Returns the result of peek and advances the cursor position by character.
+  def consume
+    c = peek
+    advance!
+    c
+  end
+
+  # Raises the exception ex with the message msg including line information
+  # where the error occured. If the optional string cause is given, a more
+  # detailed report will be displayed.
+  def reader_raise ex, msg, cause = nil
+    # Locate the beginning of the line.
+    n = @n
+    until n == 0 || @src[n - 1] == "\n"
+      n -= 1
+    end
+
+    lines = @src[n..-1].lines.to_a
+    line = lines.first
+    line_no = (@src.lines.to_a.index(line) || 0) + 1
 
-  def number
-    read_number(slurp(MAYBE_NUMBER))
+    if cause
+      error_position = line.index(cause)
+      indicator = (" " * error_position) << ("^" * cause.length)
+      info = "on line #{line_no} at char #{error_position}"
+      parts = [msg, line.chomp, indicator, info]
+    else
+      info = "on line #{line_no}"
+      parts = [msg, info]
+    end
+
+    raise ex, parts.join("\n")
+  end
+
+  def number s = slurp(MAYBE_NUMBER)
+    if /\A#{NUMBER}\z/o.match(s)
+      # Match decimal numbers but not hexadecimal numbers.
+      if /[.eE]/.match(s) && /[^xX]/.match(s)
+        Float(s)
+      else
+        Integer(s)
+      end
+    elsif /\A#{RATIONAL}\z/o.match(s)
+      numerator, denominator =  s.split("/").map {|s| number(s) }
+      Rational(numerator, denominator)
+    else
+      reader_raise NumberFormatError, "Invalid number #{s}", s
+    end
   end
 
   def keyword
     begin
       slurp(/:"/)
-      @n -= 1
+      retract!
       s = string
       s.intern
     rescue UnexpectedCharacterError
@@ -76,13 +203,13 @@ class Rouge::Reader
     s = ""
     t = consume
     while true
-      c = @src[@n]
+      c = current_char
 
       if c.nil?
-        reader_raise EndOfDataError, "in string, got: #{s}"
+        reader_raise EndOfDataError, "in string, got: \"#{s}"
       end
 
-      @n += 1
+      advance!
 
       if c == t
         break
@@ -93,23 +220,25 @@ class Rouge::Reader
 
         case c
         when nil
-          reader_raise EndOfDataError, "in escaped string, got: #{s}"
+          reader_raise EndOfDataError, "in escaped string, got: \"#{s}"
         when /[abefnrstv]/
-          c = {?a => ?\a,
-               ?b => ?\b,
-               ?e => ?\e,
-               ?f => ?\f,
-               ?n => ?\n,
-               ?r => ?\r,
-               ?s => ?\s,
-               ?t => ?\t,
-               ?v => ?\v}[c]
+          c = {
+            ?a => ?\a,
+            ?b => ?\b,
+            ?e => ?\e,
+            ?f => ?\f,
+            ?n => ?\n,
+            ?r => ?\r,
+            ?s => ?\s,
+            ?t => ?\t,
+            ?v => ?\v
+          }[c]
         else
           # Just leave it be.
         end
       end
 
-      s += c
+      s << c
     end
     s.freeze
   end
@@ -118,21 +247,21 @@ class Rouge::Reader
     consume
     r = []
 
-    while true
-      if peek == ending
-        break
-      end
+    until peek == ending
       r << lex
     end
 
     consume
     r.freeze
+  rescue EOFError
+    reader_raise EndOfDataError, "in #list"
   end
 
   def symbol_or_number
     s = slurp(SYMBOL)
-    if (s[0] == ?- or s[0] == ?+) and s[1..-1] =~ NUMBER
-      read_number(s)
+
+    if MAYBE_NUMBER.match(s)
+      number(s)
     else
       Rouge::Symbol[s.intern]
     end
@@ -142,22 +271,22 @@ class Rouge::Reader
     consume
     r = {}
 
-    while true
-      if peek == '}'
-        break
-      end
-      k = lex
-      v = lex
+    until peek == '}'
+      k, v = lex, lex
       r[k] = v
     end
 
     consume
     r.freeze
+  rescue EOFError
+    reader_raise EndOfDataError, "in #map"
   end
 
   def quotation
     consume
     Rouge::Seq::Cons[Rouge::Symbol[:quote], lex]
+  rescue EOFError
+    reader_raise EndOfDataError, "in #quotation"
   end
 
   def syntaxquotation
@@ -166,6 +295,8 @@ class Rouge::Reader
     r = dequote(lex)
     @gensyms.shift
     r
+  rescue EOFError
+    reader_raise EndOfDataError, "in #syntaxquotation"
   end
 
   def dequotation
@@ -176,6 +307,8 @@ class Rouge::Reader
     else
       Rouge::Dequote[lex].freeze
     end
+  rescue EOFError
+    reader_raise EndOfDataError, "in #dequotation"
   end
 
   def dequote form
@@ -250,13 +383,13 @@ class Rouge::Reader
     terminator = '"'
 
     while true
-      char = @src[@n]
+      char = current_char
 
       if char.nil?
         reader_raise EndOfDataError, "in regexp, got: #{expression}"
       end
 
-      @n += 1
+      advance!
 
       if char == terminator
         break
@@ -281,12 +414,13 @@ class Rouge::Reader
     s = Set.new
 
     until peek == '}'
-      el = lex
-      s.add el
+      s.add(lex)
     end
 
     consume
     s.freeze
+  rescue EOFError
+    reader_raise EndOfDataError, "in #set"
   end
 
   def dispatch
@@ -314,6 +448,8 @@ class Rouge::Reader
     else
       reader_raise UnexpectedCharacterError, "#{peek.inspect} in #dispatch"
     end
+  rescue EOFError
+    reader_raise EndOfDataError, "in #dispatch"
   end
 
   def dispatch_rewrite_fn form, count
@@ -370,85 +506,16 @@ class Rouge::Reader
     end
 
     attach
+  rescue EOFError
+    reader_raise EndOfDataError, "in #meta"
   end
 
   def deref
     consume
     Rouge::Seq::Cons[Rouge::Symbol[:"rouge.core/deref"], lex]
+  rescue EOFError
+    reader_raise EndOfDataError, "in #deref"
   end
-
-  def slurp re
-    @src[@n..-1] =~ re
-    reader_raise UnexpectedCharacterError, "#{@src[@n]} in #slurp #{re}" if !$&
-    @n += $&.length
-    $&
-  end
-
-  def peek
-    while @src[@n] =~ /[\s,;]/
-      if $& == ";"
-        while @src[@n] =~ /[^\n]/
-          @n += 1
-        end
-      else
-        @n += 1
-      end
-    end
-
-    @src[@n]
-  end
-
-  def consume
-    c = peek
-    @n += 1
-    c
-  end
-
-  def reader_raise ex, m
-    around =
-        "#{@src[[@n - 3, 0].max...[@n, 0].max]}" +
-        "#{@src[@n]}" +
-        "#{(@src[@n + 1..@n + 3] || "").gsub(/\n.*$/, '')}"
-
-    line = @src[0...@n].count("\n") + 1
-    char = @src[0...@n].reverse.index("\n") || 0 + 1
-
-    raise ex,
-        "around: #{around}\n" +
-        "           ^\n" +
-        "line #{line} char #{char}: #{m}"
-  end
-
-  def read_number s
-    if NUMBER.match s
-      if s =~ /[.eE]/
-        Float(s)
-      else
-        Integer(s)
-      end
-    else
-      reader_raise UnexpectedCharacterError, "#{s} in #read_number"
-    end
-  end
-
-  # Loose expression for a possible numeric literal.
-  MAYBE_NUMBER = /^[+-]?\d[\da-fA-FxX\._+-]*/
-
-  # Ruby integer.
-  INT = /\d+(?:_\d+)*/
-
-  # Strict expression for a numeric literal.
-  NUMBER = /
-  ^[+-]?
-  (?:
-    (?:0[xX][\da-fA-F]+) (?# Hexadecimal integer)
-  | (?:0[bB][01]+) (?# Binary integer)
-  | (?:0\d+) (?# Octal integer)
-  | (?:#{INT}(?:(?:\.#{INT})?(?:[eE][+-]?#{INT})?)?) (?# Integers and floats)
-  )\z
-  /ox
-
-  SYMBOL = /^(\.\[\])|(\.?[-+]@)|([a-zA-Z0-9\-_!&\?\*\/\.\+\|=%$<>#]+)/
 end
 
 # vim: set sw=2 et cc=80:

data/lib/rouge/repl.rb

@@ -24,7 +24,7 @@ module Rouge::REPL
         input = Readline.readline(prompt, true)
       else
         prompt = "#{" " * [0, context.ns.name.length - 2].max}#_=> "
-        input += "\n" + Readline.readline(prompt, true)
+        input << "\n" + Readline.readline(prompt, true)
       end
 
       if input.nil?
@@ -39,6 +39,8 @@ module Rouge::REPL
         next
       rescue Rouge::Reader::UnexpectedCharacterError => reader_err
         repl_error.call reader_err
+      rescue Rouge::Reader::NumberFormatError => reader_err
+        repl_error.call reader_err
       end
 
       chaining = false

data/lib/rouge/version.rb

@@ -1,7 +1,7 @@
 # encoding: utf-8
 
 module Rouge
-  VERSION = "0.0.7"
+  VERSION = "0.0.8"
 end
 
 # vim: set sw=2 et cc=80:

data/spec/builtins_spec.rb

@@ -154,7 +154,7 @@ describe Rouge::Builtins do
 
     describe "storing its own name" do
       let(:fn) { context.readeval('(fn lmnop [])') }
-      
+
       it { fn.to_s.should eq :lmnop }
     end
 
@@ -251,9 +251,9 @@ describe Rouge::Builtins do
 
     describe "evaluating and returning one argument" do
       let(:subcontext) { Rouge::Context.new context }
-      
+
       before { subcontext.set_here :x, lambda {4} }
-      
+
       it { subcontext.readeval('(do (x))').should eq 4 }
     end
 
@@ -332,6 +332,12 @@ describe Rouge::Builtins do
         ROUGE
         Rouge::Namespace[:y].should be Rouge::Namespace[:moop]
       end
+
+      it "should refer rouge.core and ruby" do
+        context.readeval "(ns toast)"
+        Rouge[:toast].refers.should include(Rouge[:"rouge.core"])
+        Rouge[:toast].refers.should include(Rouge[:"ruby"])
+      end
     end
 
     it "should compile without compiling any of its components" do
@@ -353,7 +359,7 @@ describe Rouge::Builtins do
 
       describe "after readeval (def ...)" do
         before { context.readeval("(def b 'c)") }
-        
+
       it { expect { context.readeval("(defmacro a [] b)")
                   }.to_not raise_exception }
       end
@@ -405,7 +411,7 @@ describe Rouge::Builtins do
       end
 
       it "should compile multi-arg form with names bound" do
-        # TODO: consider breaking out these two test assertion 
+        # TODO: consider breaking out these two test assertion
         #   blocks into their own context: they actually both fail
         #   in isolation but those failures are masked because
         #   the "Rouge::Builtins._compile_defmacro" test passes,
@@ -418,13 +424,13 @@ describe Rouge::Builtins do
         #  lexicals.should eq Set[:f]
         #  [:a1]
         #end
-        #        
+        #
         #Rouge::Compiler.should_receive(:compile).
         #    with(ns, kind_of(Set), [:a2]) do |n, lexicals, f|
         #  lexicals.should eq Set[:g]
         #  [:a2]
         #end
-        #        
+        #
         Rouge::Builtins._compile_defmacro(
             ns, Set.new,
             Rouge::Symbol[:barge],
@@ -443,7 +449,7 @@ describe Rouge::Builtins do
   describe "apply" do
     let(:a) { lambda {|*args| args} }
     let(:subcontext) { Rouge::Context.new context }
-    
+
     before { subcontext.set_here :a, a }
 
     describe "calling a function with the argument list" do
@@ -645,7 +651,7 @@ describe Rouge::Builtins do
       let(:x) { lambda {} }
 
       before { context.set_here :x, x }
-      
+
       it { context.readeval("(destructure [a | b] [1 | x])").to_s.
              should eq({Rouge::Symbol[:a] => 1,
                         Rouge::Symbol[:b] => x}.to_s) }
@@ -674,7 +680,7 @@ describe Rouge::Builtins do
              Rouge::Builtins._compile_destructure(
                  ns, Set.new, Rouge::Symbol[:z], Rouge::Symbol[:z])
            }.to raise_exception }
-           
+
       it { expect {
              Rouge::Builtins._compile_destructure(
                  ns, Set[:y], Rouge::Symbol[:z], Rouge::Symbol[:y])

data/spec/core_spec.rg

@@ -151,4 +151,7 @@
                           (swap! q inc) :very_bad)))
              @q))))
 
+(testing "*command-line-args*"
+  (is (= (class *command-line-args*)
+         ruby/Array)))
 ; vim: set ft=clojure:

data/spec/printer_spec.rb

@@ -6,6 +6,7 @@ describe Rouge::Printer do
   describe ".print" do
     context "numbers" do
       it { Rouge.print(12755, "").should eq "12755" }
+      it { Rouge.print(Rational(1,2), "").should eq "1/2" }
     end
 
     context "symbols" do

data/spec/reader_spec.rb

@@ -39,12 +39,23 @@ describe Rouge::Reader do
       it { @ns.read("-0333").should eq(-219) }
     end
 
-    context "bad numbers" do
-      it { expect { @ns.read("1.2.3")
-                  }.to raise_exception Rouge::Reader::UnexpectedCharacterError }
+    context "rationals" do
+      it { @ns.read("1/2").should be_an_instance_of Rational }
+      it { @ns.read("0b1000/0x4").should eq(Rational(2, 1)) }
+    end
 
-      it { expect { @ns.read("12..")
-                  }.to raise_exception Rouge::Reader::UnexpectedCharacterError }
+    context "bad numbers" do
+      it {
+        expect {
+          @ns.read("1.2.3")
+        }.to raise_exception Rouge::Reader::NumberFormatError
+      }
+
+      it {
+        expect {
+          @ns.read("12..")
+        }.to raise_exception Rouge::Reader::NumberFormatError
+      }
     end
   end
 
@@ -266,10 +277,10 @@ describe Rouge::Reader do
 
   describe "empty reads" do
     it { expect { @ns.read("")
-                }.to raise_exception(Rouge::Reader::EndOfDataError) }
+                }.to raise_exception(Rouge::Reader::EOFError) }
 
     it { expect { @ns.read("    \n         ")
-                }.to raise_exception(Rouge::Reader::EndOfDataError) }
+                }.to raise_exception(Rouge::Reader::EOFError) }
   end
 
   describe "comments" do
@@ -277,7 +288,7 @@ describe Rouge::Reader do
     it { @ns.read("[42 ;what!\n15]").should eq [42, 15] }
 
     it { expect { @ns.read(";what!")
-                }.to raise_exception(Rouge::Reader::EndOfDataError) }
+                }.to raise_exception(Rouge::Reader::EOFError) }
 
     it { @ns.read(";what!\nhmm").should eq Rouge::Symbol[:hmm] }
   end
@@ -427,8 +438,7 @@ describe Rouge::Reader do
       r.lex.should eq Rouge::Symbol[:b]
       r.lex.should eq Rouge::Symbol[:c]
 
-      expect { r.lex
-             }.to raise_exception(Rouge::Reader::EndOfDataError)
+      expect { r.lex }.to raise_exception(Rouge::Reader::EOFError)
     end
   end
 
@@ -443,6 +453,23 @@ describe Rouge::Reader do
   describe "regexp" do
     it { @ns.read('#"abc"').should be_an_instance_of Regexp }
   end
+
+  describe "bad reads" do
+    let(:ex) { Rouge::Reader::EndOfDataError }
+    it { expect { @ns.read('(') }.to raise_exception(ex) }
+    it { expect { @ns.read('{') }.to raise_exception(ex) }
+    it { expect { @ns.read('[') }.to raise_exception(ex) }
+    it { expect { @ns.read('"') }.to raise_exception(ex) }
+    it { expect { @ns.read("'") }.to raise_exception(ex) }
+    it { expect { @ns.read('`') }.to raise_exception(ex) }
+    it { expect { @ns.read('~') }.to raise_exception(ex) }
+    it { expect { @ns.read('@') }.to raise_exception(ex) }
+    it { expect { @ns.read('#(') }.to raise_exception(ex) }
+    it { expect { @ns.read('#{') }.to raise_exception(ex) }
+    it { expect { @ns.read("#'") }.to raise_exception(ex) }
+    it { expect { @ns.read("#_") }.to raise_exception(ex) }
+    it { expect { @ns.read('#"') }.to raise_exception(ex) }
+  end
 end
 
 # vim: set sw=2 et cc=80:

data/spec/rouge_spec.rb

@@ -18,6 +18,10 @@ describe Rouge do
         @ns[:defn].should be_an_instance_of Rouge::Macro
       }.should_not raise_exception(Rouge::Context::BindingNotFoundError)
     end
+
+    it "should contain special variables" do
+      @ns[:"*command-line-args*"].should be_an_instance_of Rouge::Var
+    end
   end
 
   describe "the user namespace" do
@@ -45,7 +49,7 @@ describe Rouge do
 
         total = r[:passed] + r[:failed].length
 
-        message = 
+        message =
             "#{total} example#{total == 1 ? "" : "s"}, " +
             "#{r[:failed].length} failure#{r[:failed].length == 1 ? "" : "s"}"
 

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: rouge-lang
 version: !ruby/object:Gem::Version
-  version: 0.0.7
+  version: 0.0.8
   prerelease: 
 platform: ruby
 authors:
@@ -9,7 +9,7 @@ authors:
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2012-12-16 00:00:00.000000000 Z
+date: 2012-12-26 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: rake
@@ -188,7 +188,7 @@ required_ruby_version: !ruby/object:Gem::Requirement
       version: '0'
       segments:
       - 0
-      hash: -862515277
+      hash: 809418637
 required_rubygems_version: !ruby/object:Gem::Requirement
   none: false
   requirements:
@@ -197,7 +197,7 @@ required_rubygems_version: !ruby/object:Gem::Requirement
       version: '0'
       segments:
       - 0
-      hash: -862515277
+      hash: 809418637
 requirements: []
 rubyforge_project: 
 rubygems_version: 1.8.24