cljdotrb 0.0.1

data/.document

@@ -0,0 +1,5 @@
+lib/**/*.rb
+bin/*
+- 
+features/**/*.feature
+LICENSE.txt

data/.gitignore

@@ -0,0 +1,48 @@
+# rcov generated
+coverage
+
+# rdoc generated
+rdoc
+
+# yard generated
+doc
+.yardoc
+
+# bundler
+.bundle
+
+# jeweler generated
+pkg
+
+# Have editor/IDE/OS specific files you need to ignore? Consider using a global gitignore: 
+#
+# * Create a file at ~/.gitignore
+# * Include files you want ignored
+# * Run: git config --global core.excludesfile ~/.gitignore
+#
+# After doing this, these files will be ignored in all your git projects,
+# saving you from having to 'pollute' every project you touch with them
+#
+# Not sure what to needs to be ignored for particular editors/OSes? Here's some ideas to get you started. (Remember, remove the leading # of the line)
+#
+# For MacOS:
+#
+.DS_Store
+
+# For TextMate
+#*.tmproj
+#tmtags
+
+# For emacs:
+#*~
+#\#*
+#.\#*
+
+# For vim:
+#*.swp
+
+# For redcar:
+#.redcar
+
+# For rubinius:
+#*.rbc

data/.rvmrc

@@ -0,0 +1 @@
+rvm use ruby-1.9.2@cljdotrb

data/Gemfile

@@ -0,0 +1,3 @@
+source 'http://rubygems.org'
+
+gemspec

data/Gemfile.lock

@@ -0,0 +1,51 @@
+PATH
+  remote: .
+  specs:
+    cljdotrb (0.0.1)
+      citrus
+
+GEM
+  remote: http://rubygems.org/
+  specs:
+    citrus (2.4.1)
+    coderay (0.9.8)
+    diff-lcs (1.1.3)
+    guard (0.8.8)
+      thor (~> 0.14.6)
+    guard-rspec (0.5.8)
+      guard (>= 0.8.4)
+    method_source (0.6.7)
+      ruby_parser (>= 2.3.1)
+    multi_json (1.0.3)
+    pry (0.9.7.4)
+      coderay (~> 0.9.8)
+      method_source (~> 0.6.7)
+      ruby_parser (>= 2.3.1)
+      slop (~> 2.1.0)
+    rspec (2.7.0)
+      rspec-core (~> 2.7.0)
+      rspec-expectations (~> 2.7.0)
+      rspec-mocks (~> 2.7.0)
+    rspec-core (2.7.1)
+    rspec-expectations (2.7.0)
+      diff-lcs (~> 1.1.2)
+    rspec-mocks (2.7.0)
+    ruby_parser (2.3.1)
+      sexp_processor (~> 3.0)
+    sexp_processor (3.0.8)
+    simplecov (0.5.4)
+      multi_json (~> 1.0.3)
+      simplecov-html (~> 0.5.3)
+    simplecov-html (0.5.3)
+    slop (2.1.0)
+    thor (0.14.6)
+
+PLATFORMS
+  ruby
+
+DEPENDENCIES
+  cljdotrb!
+  guard-rspec
+  pry
+  rspec
+  simplecov

data/README.markdown

@@ -0,0 +1,13 @@
+# clj.rb
+
+A [Clojure](http://clojure.org) data reader and supporting classes for Ruby
+
+## Usage
+
+Don't. Yet.
+
+
+## Copyright
+
+Copyright (c) 2012 fogus.  License info forthcoming.
+

data/Rakefile

@@ -0,0 +1,13 @@
+require 'rubygems'
+require 'bundler'
+require "rspec/core/rake_task"
+require 'rake'
+
+desc "Run all specs"
+RSpec::Core::RakeTask.new(:spec) do |t|
+  t.pattern = "spec/**/*_spec.rb"
+  t.ruby_opts = '-Ilib -Ispec -I.'
+  t.rspec_opts = '--color'
+end
+
+task :default => :spec

data/cljdotrb.gemspec

@@ -0,0 +1,27 @@
+# -*- encoding: utf-8 -*-
+$:.push File.expand_path("../lib", __FILE__)
+require "cljdotrb/version"
+
+Gem::Specification.new do |s|
+  s.name        = "cljdotrb"
+  s.version     = Clojure::VERSION
+  s.authors     = ["Michael Fogus", "Alex Redington"]
+  s.email       = ["fogus@thinkrelevance.com", "alex.redington@thinkrelevance.com"]
+  s.homepage    = "http://github.com/fogus/clj.rb"
+  s.summary     = %q{A reader for Clojure strings.}
+  s.description = %q{clj.rb parses Clojure data into its Ruby equivalents.}
+
+  s.rubyforge_project = "clj.rb"
+
+  s.files         = `git ls-files`.split("\n")
+  s.test_files    = `git ls-files -- {test,spec,features}/*`.split("\n")
+  s.executables   = `git ls-files -- bin/*`.split("\n").map{ |f| File.basename(f) }
+  s.require_paths = ["lib"]
+
+  # specify any dependencies here; for example:
+  s.add_development_dependency 'pry'
+  s.add_development_dependency 'rspec'
+  s.add_development_dependency 'guard-rspec'
+  s.add_development_dependency 'simplecov'
+  s.add_runtime_dependency 'citrus'
+end

data/lib/cljdotrb.rb

@@ -0,0 +1,156 @@
+require 'cljdotrb/number'
+require 'cljdotrb/collections'
+require 'cljdotrb/boolean'
+require 'cljdotrb/nil'
+require 'cljdotrb/symbolic'
+require 'cljdotrb/string'
+require 'cljdotrb/reader'
+
+module Metadata
+  def meta
+    @meta
+  end
+
+  def with_meta m
+    @meta = m
+    self
+  end
+end
+
+require 'delegate'
+
+module Clojure
+  module Types
+    class Sym < Delegator
+      include Metadata
+      
+      def initialize n
+        super
+        @name = n
+      end
+
+      def __getobj__
+        @name
+      end
+
+      def __setobj__ obj
+        @name = obj
+      end
+    end
+  end
+end
+
+require 'strscan'
+require 'str_parse'
+
+module Clojure
+  class Parser < StringScanner
+    include Clojure::StringParser # parsing unicode strings is dirty business
+
+    INTEGER   = /([-+]?0)|([-+]?[1-9]\d*)(N)?/
+    HEX       = /([-+]?)0[xX]([0-9A-Fa-f]+)(N)?/
+    OCTAL     = /([-+]?)0([0-7]+)(N)?/
+    RADIX     = /([-+]?)([1-9][0-9]?)[rR]([0-9A-Za-z]+)/
+    RATIO     = /([-+]?[0-9]+)\/([0-9]+)/
+    FLOAT     = /([-+]?[0-9]+(\.[0-9]*)?([eE][-+]?[0-9]+)?)(M)?/
+    SYMBOLIC  = /([:]?)(([\D].*)(\/))?([\D][^\/]*)/
+    TRUE      = /true/
+    FALSE     = /false/
+    NIL       = /nil/
+    MAPO      = /\{/
+    MAPC      = /\}/
+    VECO      = /\[/
+    VECC      = /\]/
+    LISTO     = /\(/
+    LISTC     = /\)/
+    SET_START = /#/
+    IGNORE    = /(?:[ \t\r\n,]+)/mx
+            
+    def initialize src, opts = {}
+      opts ||= {}
+      super src
+
+      @int_ctor    = opts[:int_ctor]    || lambda { |repr, radix| repr.to_i(radix) }
+      @bint_ctor   = opts[:bint_ctor]   || @int_ctor
+      @ratio_ctor  = opts[:ratio_ctor]  || lambda { |n,d| Rational(n.to_i, d.to_i) }
+      @float_ctor  = opts[:float_ctor]  || lambda { |repr| repr.to_f }
+      @bigdec_ctor = opts[:bigdec_ctor] || @float_ctor
+      @kw_ctor     = opts[:kw_ctor]     || lambda { |prefix, name| "#{prefix ? prefix + '/' : prefix}#{name}".to_sym }
+      @sym_ctor    = opts[:sym_ctor]    || lambda { |prefix, name| Clojure::Types::Sym.new(@kw_ctor.call(prefix, name)) }
+    end
+
+    def parse_scalar
+      case
+      when scan(RATIO)
+        parse_ratio
+      when scan(HEX)
+        parse_hex
+      when scan(OCTAL)
+        parse_octal
+      when scan(RADIX)
+        parse_radix
+      when scan(FLOAT)
+        parse_float
+      when scan(INTEGER)
+        parse_int
+      when scan(TRUE)
+        true
+      when scan(FALSE)
+        false
+      when scan(NIL)
+        nil
+      when (str = parse_string) != :no_string
+        str
+      when scan(SYMBOLIC)
+        parse_symbolic
+      else
+        throw "unparseable"
+      end
+    end
+
+    def parse_symbolic
+      is_kw  = !self[1].empty?
+      prefix = self[4] ? self[3] : nil
+      name   = self[5]
+
+      if is_kw
+        @kw_ctor.call prefix, name
+      else
+        @sym_ctor.call prefix, name
+      end
+    end
+
+    def parse_hex
+      ctor = self[3] ? @bint_ctor : @int_ctor
+      ctor.call "#{self[1]}" + self[2], 16
+    end
+
+    def parse_octal
+      ctor = self[3] ? @bint_ctor : @int_ctor
+      ctor.call "#{self[1]}" + self[2], 8
+    end
+
+    def parse_radix
+      @int_ctor.call "#{self[1]}" + self[3], self[2].to_i
+    end
+
+    def parse_float
+      ctor = self[4] ? @bigdec_ctor : @float_ctor
+      ctor.call self[1]
+    end
+
+    def parse_int
+      ctor = self[3] ? @bint_ctor : @int_ctor
+
+      if self[1]
+        ctor.call self[1], 10
+      else
+        ctor.call self[2], 10
+      end
+    end
+
+    def parse_ratio
+      @ratio_ctor.call self[1], self[2]
+    end
+  end
+end

data/lib/cljdotrb/boolean.rb

@@ -0,0 +1,7 @@
+module Clojure
+  module Boolean
+    def to_ruby
+      to_s == "true"
+    end
+  end
+end

data/lib/cljdotrb/collections.rb

@@ -0,0 +1,27 @@
+module Clojure
+  module List
+    def to_ruby
+      captures[:form].map(&:to_ruby)
+    end
+  end
+
+  Vector = List
+
+  module Map
+    def to_ruby
+      ruby_val = {}
+      captures[:form].each_slice(2) do |slice|
+        key,value = slice
+        ruby_val[key.to_ruby] = value.to_ruby
+      end
+      ruby_val
+    end
+  end
+
+  module Set
+    def to_ruby
+      ::Set.new(captures[:form].map(&:to_ruby))
+    end
+  end
+  
+end

data/lib/cljdotrb/nil.rb

@@ -0,0 +1,7 @@
+module Clojure
+  module Nil
+    def to_ruby
+      nil
+    end
+  end
+end

data/lib/cljdotrb/number.rb

@@ -0,0 +1,39 @@
+module Clojure
+  module Integer
+    def to_ruby
+      to_i
+    end
+  end
+
+  module HexInteger
+    def to_ruby
+      to_i 16
+    end
+  end
+
+  module OctalInteger
+    def to_ruby
+      to_i 8
+    end
+  end
+
+  module RadixInteger
+    def to_ruby
+      a = to_a
+      (a[1]+a[4]).to_i a[2].to_i
+    end
+  end
+
+  module Ratio
+    def to_ruby
+      a = to_a
+      Rational(a[1].to_i, a[3].to_i)
+    end
+  end
+
+  module Float
+    def to_ruby
+      to_f
+    end
+  end
+end

data/lib/cljdotrb/reader.citrus

@@ -0,0 +1,98 @@
+grammar Clojure::Reader
+
+  rule form
+    (collection | literal)
+  end
+
+  rule collection
+    (vector | list | map | set)
+  end
+
+  rule set
+    ("#" "{" (whitespace* form whitespace*)* "}") <Clojure::Set>
+  end
+
+  rule map
+    ("{" (whitespace* form whitespace+ form whitespace*)+ "}") <Clojure::Map>
+  end
+
+  rule list
+    ("(" (whitespace* form whitespace*)* ")") <Clojure::List>
+  end
+
+  rule vector
+    ("[" (whitespace* form whitespace*)* "]") <Clojure::Vector>
+  end
+
+  rule whitespace
+    " "
+  end
+
+  rule literal
+    (string | nil | boolean | number | symbolic)
+  end
+
+  rule nil
+    "nil" <Clojure::Nil>
+  end
+
+  rule boolean
+    ("true" | "false") <Clojure::Boolean>
+  end
+
+  rule number
+    rational | integral
+  end
+
+  rule integral
+    (radix_integer | octal_integer | hex_integer | integer)
+  end
+
+  rule rational
+    (ratio | float)
+  end
+
+  rule string
+    ("\"" content:string_content* "\"") <Clojure::String>
+  end
+
+  rule string_content
+    (/[^"\\]/ | /\\./)
+  end
+
+  rule symbolic
+    (colon:":"? (prefix:symbolic_token sep:"/")? symbol:symbolic_token) <Clojure::Symbolic>
+  end
+
+  rule symbolic_token
+    /[a-zA-Z\?\+!_-][a-zA-Z0-9\?\+!_-]*/
+  end
+
+  rule integer
+    /([-+]?0)|([-+]?[1-9]\d*)(N)?/ <Clojure::Integer>
+  end
+
+  rule hex_integer
+    /([-+]?)0[xX]([0-9A-Fa-f]+)(N)?/ <Clojure::HexInteger>
+  end
+
+  rule octal_integer
+    /([-+]?)0([0-7]+)(N)?/ <Clojure::OctalInteger>
+  end
+
+  rule radix_integer
+    (sign:/[-+]?/ radix:/[1-9][0-9]?/ delimeter:/[rR]/ number:/[0-9A-Za-z]+/) <Clojure::RadixInteger>
+  end
+
+  rule ratio
+    (numerator:/[-+]?[0-9]+/ "/" denominator:/[0-9]+/) <Clojure::Ratio>
+  end
+
+  rule float
+    #/([-+]?[0-9]+(\.[0-9]*)?([eE][-+]?[0-9]+)?)(M)?/
+    ((number:/[-+]?[0-9]+\.[0-9]*(?:[eE][-+]?[0-9]+)?/ marker:"M"?)
+      | (number:/[-+]?[0-9]+M/)
+      | (number:/[-+]?[0-9][eE][-+]?[0-9]+M?/)) <Clojure::Float>
+  end
+
+end

data/lib/cljdotrb/reader.rb

@@ -0,0 +1,13 @@
+require 'citrus'
+
+module Clojure
+  Citrus.load('lib/cljdotrb/reader', :force => true)
+end
+
+module Clojure
+  module Reader
+    def self.read(string)
+      parse(string).to_ruby
+    end
+  end
+end

data/lib/cljdotrb/string.rb

@@ -0,0 +1,7 @@
+module Clojure
+  module String
+    def to_ruby
+      captures[:content].first.gsub(/\\\"/,"\"")
+    end
+  end
+end

data/lib/cljdotrb/symbolic.rb

@@ -0,0 +1,17 @@
+module Clojure
+
+  module Symbolic
+    def to_ruby
+      captures[:colon].first.empty? ? to_clojure_symbol : to_keyword
+    end
+
+    def to_clojure_symbol
+      Clojure::Types::Sym.new to_keyword
+    end
+
+    def to_keyword
+      to_a[2..3].reject(&:empty?).join.to_sym
+    end
+
+  end
+end

data/lib/cljdotrb/version.rb

@@ -0,0 +1,3 @@
+module Clojure
+  VERSION = "0.0.1"
+end

data/lib/str_parse.rb

@@ -0,0 +1,63 @@
+require 'iconv'
+
+module Clojure
+  # Taken from the JSON parser at http://flori.github.com/json/
+  module StringParser
+    STRING   = /" ((?:[^\x0-\x1f"\\] |
+                # escaped special characters:
+                \\["\\\/bfnrt] |
+                \\u[0-9a-fA-F]{4} |
+                # match all but escaped special characters:
+                \\[\x20-\x21\x23-\x2e\x30-\x5b\x5d-\x61\x63-\x65\x67-\x6d\x6f-\x71\x73\x75-\xff])*)
+              "/nx
+
+    def parse_string
+      if scan(STRING)
+        return '' if self[1].empty?
+
+        string = self[1].gsub(%r((?:\\[\\bfnrt"/]|(?:\\u(?:[A-Fa-f\d]{4}))+|\\[\x20-\xff]))n) do |c|
+          if u = UNESCAPE_MAP[$&[1]]
+            u
+          else # \uXXXX
+            bytes = EMPTY_8BIT_STRING.dup
+            i = 0
+            while c[6 * i] == ?\\ && c[6 * i + 1] == ?u
+              bytes << c[6 * i + 2, 2].to_i(16) << c[6 * i + 4, 2].to_i(16)
+              i += 1
+            end
+        
+            Iconv.iconv('utf-8', 'utf-16be', bytes)
+          end
+        end
+
+        if string.respond_to?(:force_encoding)
+          string.force_encoding(::Encoding::UTF_8)
+        end
+
+        string
+      else
+        :no_string
+      end
+    rescue => e
+      raise ParserError, "Caught #{e.class} at '#{peek(20)}': #{e}"
+    end
+
+    EMPTY_8BIT_STRING = ''
+    if ::String.method_defined?(:encode)
+      EMPTY_8BIT_STRING.force_encoding Encoding::ASCII_8BIT
+    end
+
+    UNESCAPE_MAP = Hash.new { |h, k| h[k] = k.chr }
+    UNESCAPE_MAP.update({
+        ?"  => '"',
+        ?\\ => '\\',
+        ?/  => '/',
+        ?b  => "\b",
+        ?f  => "\f",
+        ?n  => "\n",
+        ?r  => "\r",
+        ?t  => "\t",
+        ?u  => nil,
+    })
+  end
+end

data/spec/cljdotrb/reader_spec.rb

@@ -0,0 +1,133 @@
+require File.join(File.dirname(__FILE__), *%w[.. spec_helper.rb])
+require 'pry'
+require 'set'
+
+def read(string)
+  Clojure::Reader.read(string)
+end
+
+describe Clojure::Reader do
+  it 'parses positive integers' do
+    read("+42").should == 42
+    read("-42").should == -42
+    read("42").should == 42
+    read("-42").should == -42
+    read("-0").should == 0
+    read("+0").should == 0
+    read("-42N").should == -42
+    read("42N").should == 42
+    read("+42N").should == 42
+  end
+
+  it "should recognize and parse hex integers" do
+    read("0xF").should == 15
+    read("+0xF").should == 15
+    read("-0xF").should == -15
+    read("0xFN").should == 15
+    read("-0xFN").should == -15
+    read("+0xFN").should == 15
+  end
+
+  it "should recognize and parse octal integers" do
+    read("07").should == 7
+    read("+07").should == 7
+    read("-07").should == -7
+    read("07N").should == 7
+    read("-07N").should == -7
+    read("+07N").should == 7
+  end
+
+  it "should recognize and parse radix integers" do
+    read("2r111").should == 7
+    read("+2r111").should == 7
+    read("-2r111").should == -7
+    read("32r1").should == 1
+    read("27rmj").should == 613
+  end
+
+  it "should recognize and parse ratios" do
+    read("22/7").should == Rational(22,7)
+    read("+22/7").should == Rational(22,7)
+    read("-22/7").should == Rational(-22,7)
+  end
+
+  it "should recognize and parse floating point numbers" do
+    read("1.1").should == 1.1
+    read("1.1M").should == 1.1
+    read("-1.1").should == -1.1
+    read("-1.1M").should == -1.1
+    read("-1.21e10").should == -12_100_000_000.0
+    read("+1.21e10").should == 12_100_000_000.0
+    read("-1.21e10M").should == -12_100_000_000.0
+    read("+1.21e10M").should == 12_100_000_000.0
+    read("1M").should == 1.0
+    read("1e4").should == 10_000
+  end
+
+  it "should recognize and parse true and false" do
+    read("true").should == true
+    read("false").should == false
+  end
+
+  it "should recognize and parse nil" do
+    read("nil").should == nil
+  end
+
+  it "should recognize and parse symbols" do
+    read("a").should == :a
+    read("a").class.should == Clojure::Types::Sym
+    read("a/b").should == :"a/b"
+    read("a/b").class.should == Clojure::Types::Sym
+    read("a").with_meta({:a => 1}).meta.should include(:a => 1)
+    read("a").with_meta({:a => 1}).should == :a
+  end
+
+
+  it 'parses keywords' do
+    read(":keyword").should == :keyword
+  end
+
+  it 'parses vectors of single elements' do
+    read("[42]").should == [42]
+  end
+
+  it 'ignores whitespace' do
+    read("[ 42 ]").should == [42]
+  end
+
+  it 'parses vectors of multiple elements' do
+    read("[42 -1]").should == [42, -1]
+  end
+
+  it 'parses lists' do
+    read("(42 -1)").should == [42, -1]
+  end
+
+  it 'parses maps' do
+    read("{:a 7 :b 6}").should == {:a => 7, :b => 6}
+  end
+
+  it 'parses sets' do
+    read("\#{:a :a :b :c :a :d :b :c :b :a}").should == Set.new([:a, :b, :c, :d])
+  end
+
+  it 'parses nested collections' do
+    read("[[1 2] 3 4]").should == [[1, 2], 3, 4]
+  end
+
+  it 'has no problem with maps of vectors' do
+    read("{:a [1 2] :b [3 4]}").should == {:a => [1, 2], :b => [3, 4]}
+  end
+
+  it 'reads strings' do
+    read('"a string by any other name is just as tangly"').should == 'a string by any other name is just as tangly'
+  end
+
+  it 'reads strings with escaped quotes' do
+    read('"a string with an \"escaped quote\""').should == 'a string with an "escaped quote"'
+  end
+
+  it 'preserves other escaped characters' do
+    read('"a string with a\nnewline"').should == 'a string with a\nnewline'
+  end
+end

data/spec/cljdotrb_spec.rb

@@ -0,0 +1,104 @@
+require 'rspec'
+require 'cljdotrb'
+
+describe Metadata do
+  class A
+    include Metadata
+  end
+
+  it "should store metadata via mixin" do
+    a = A.new
+
+    a.should respond_to :with_meta
+
+    a.meta.should == nil
+    a.with_meta({:a => 1}).meta.should include(:a => 1)
+  end
+end
+
+def scalarize str
+  Clojure::Parser.new(str).parse_scalar
+end
+
+describe Clojure::Parser do
+  context "when parsing scalar values" do
+    it "should recognize and parse integers" do
+      scalarize("+42").should == 42
+      scalarize("-42").should == -42
+      scalarize("42").should == 42
+      scalarize("-42").should == -42
+      scalarize("-0").should == 0
+      scalarize("+0").should == 0
+      scalarize("-42N").should == -42
+      scalarize("42N").should == 42
+      scalarize("+42N").should == 42
+    end
+
+    it "should recognize and parse hex integers" do
+      scalarize("0xF").should == 15
+      scalarize("+0xF").should == 15
+      scalarize("-0xF").should == -15
+      scalarize("0xFN").should == 15
+      scalarize("-0xFN").should == -15
+      scalarize("+0xFN").should == 15
+    end
+
+    it "should recognize and parse octal integers" do
+      scalarize("07").should == 7
+      scalarize("+07").should == 7
+      scalarize("-07").should == -7
+      scalarize("07N").should == 7
+      scalarize("-07N").should == -7
+      scalarize("+07N").should == 7
+    end
+
+    it "should recognize and parse radix integers" do
+      scalarize("2r111").should == 7
+      scalarize("+2r111").should == 7
+      scalarize("-2r111").should == -7
+      scalarize("32r1").should == 1
+      scalarize("27rmj").should == 613
+    end
+
+    it "should recognize and parse ratios" do
+      scalarize("22/7").should == Rational(22,7)
+      scalarize("+22/7").should == Rational(22,7)
+      scalarize("-22/7").should == Rational(-22,7)
+    end
+
+    it "should recognize and parse floating point numbers" do
+      scalarize("1.1").should == 1.1
+      scalarize("1.1M").should == 1.1
+      scalarize("-1.1").should == -1.1
+      scalarize("-1.1M").should == -1.1
+      scalarize("-1.21e10").should == -12100000000.0
+      scalarize("+1.21e10").should == 12100000000.0
+      scalarize("-1.21e10M").should == -12100000000.0
+      scalarize("+1.21e10M").should == 12100000000.0
+    end
+
+    it "should recognize and parse true and false" do
+      scalarize("true").should == true
+      scalarize("false").should == false
+    end
+
+    it "should recognize and parse nil" do
+      scalarize("nil").should == nil
+    end
+
+    it "should recognize and parse strings" do
+      scalarize('""').should == ""
+      scalarize('"this is a string"').should == "this is a string"
+      scalarize('"this is \n string"').should == "this is \n string"
+    end
+
+    it "should recognize and parse symbols" do
+      scalarize("a").should == :a
+      scalarize("a").class.should == Clojure::Types::Sym
+      scalarize("a/b").should == :"a/b"
+      scalarize("a/b").class.should == Clojure::Types::Sym
+      scalarize("a").with_meta({:a => 1}).meta.should include(:a => 1)
+      scalarize("a").with_meta({:a => 1}).should == :a
+    end
+  end
+end

data/spec/spec_helper.rb

@@ -0,0 +1 @@
+require File.join(File.dirname(__FILE__), *%w[.. lib cljdotrb])

metadata

@@ -0,0 +1,152 @@
+--- !ruby/object:Gem::Specification
+name: cljdotrb
+version: !ruby/object:Gem::Version
+  version: 0.0.1
+  prerelease: 
+platform: ruby
+authors:
+- Michael Fogus
+- Alex Redington
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2012-06-13 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: pry
+  requirement: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: rspec
+  requirement: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: guard-rspec
+  requirement: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: simplecov
+  requirement: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: citrus
+  requirement: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+description: clj.rb parses Clojure data into its Ruby equivalents.
+email:
+- fogus@thinkrelevance.com
+- alex.redington@thinkrelevance.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- .document
+- .gitignore
+- .rvmrc
+- Gemfile
+- Gemfile.lock
+- README.markdown
+- Rakefile
+- cljdotrb.gemspec
+- lib/cljdotrb.rb
+- lib/cljdotrb/boolean.rb
+- lib/cljdotrb/collections.rb
+- lib/cljdotrb/nil.rb
+- lib/cljdotrb/number.rb
+- lib/cljdotrb/reader.citrus
+- lib/cljdotrb/reader.rb
+- lib/cljdotrb/string.rb
+- lib/cljdotrb/symbolic.rb
+- lib/cljdotrb/version.rb
+- lib/str_parse.rb
+- spec/cljdotrb/reader_spec.rb
+- spec/cljdotrb_spec.rb
+- spec/spec_helper.rb
+homepage: http://github.com/fogus/clj.rb
+licenses: []
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: clj.rb
+rubygems_version: 1.8.22
+signing_key: 
+specification_version: 3
+summary: A reader for Clojure strings.
+test_files:
+- spec/cljdotrb/reader_spec.rb
+- spec/cljdotrb_spec.rb
+- spec/spec_helper.rb