sexpistol 0.0.4 → 0.0.5

data/VERSION

@@ -1 +1 @@
-0.0.4
+0.0.5

data/lib/sexpistol/sexpistol.rb

@@ -122,10 +122,16 @@ class Sexpistol
       if( item.is_a?(Array))
         to_sexp(item)
       else
-        item.to_s
+        if(item === false)
+          "#f"
+        elsif(item === true)
+          "#t"
+        else
+          item.to_s
+        end
       end
     end
-    "( " + mapped.join(" ") + " )"
+    "(" + mapped.join(" ") + ")"
   end
 
   private

data/sexpistol.gemspec

@@ -5,7 +5,7 @@
 
 Gem::Specification.new do |s|
   s.name = %q{sexpistol}
-  s.version = "0.0.4"
+  s.version = "0.0.5"
 
   s.required_rubygems_version = Gem::Requirement.new(">= 0") if s.respond_to? :required_rubygems_version=
   s.authors = ["Aaron Gough"]

data/test/unit/to_sexp_test.rb

@@ -9,7 +9,19 @@ class ToSexpTest < Test::Unit::TestCase
   test "should convert nested arrays back into an S-Expression" do
     ast = [:string, [:is, [:parsed]]]
     sexp = @parser.to_sexp(ast)
-    assert_equal "( string ( is ( parsed ) ) )", sexp
+    assert_equal "(string (is (parsed)))", sexp
+  end
+  
+  test "should structure containing integers and strings back into an S-Expression" do
+    ast = ["String!", [1, [2, "Other string."]]]
+    sexp = @parser.to_sexp(ast)
+    assert_equal "(String! (1 (2 Other string.)))", sexp
+  end
+  
+  test "should output true and false using scheme notation" do
+    ast = [true, [false, [true, false]]]
+    sexp = @parser.to_sexp(ast)
+    assert_equal "(#t (#f (#t #f)))", sexp
   end
     
 end

metadata

@@ -5,8 +5,8 @@ version: !ruby/object:Gem::Version
   segments: 
   - 0
   - 0
-  - 4
-  version: 0.0.4
+  - 5
+  version: 0.0.5
 platform: ruby
 authors: 
 - Aaron Gough