sexpistol 0.0.5 → 0.0.6

data/VERSION

@@ -1 +1 @@
-0.0.5
+0.0.6

data/lib/sexpistol/sexpistol.rb

@@ -118,20 +118,30 @@ class Sexpistol
   
   # Convert a set of nested arrays back into an S-Expression
   def to_sexp( data )
-    mapped = data.map do |item|
-      if( item.is_a?(Array))
-        to_sexp(item)
-      else
-        if(item === false)
-          "#f"
-        elsif(item === true)
-          "#t"
+    if( data.is_a?(Array))
+      mapped = data.map do |item|
+        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(" ") + ")"
+    else
+      if(data === false)
+        "#f"
+      elsif(data === true)
+        "#t"
+      else
+        data.to_s
+      end
     end
-    "(" + mapped.join(" ") + ")"
   end
 
   private

data/sexpistol.gemspec

@@ -5,7 +5,7 @@
 
 Gem::Specification.new do |s|
   s.name = %q{sexpistol}
-  s.version = "0.0.5"
+  s.version = "0.0.6"
 
   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

@@ -23,5 +23,29 @@ class ToSexpTest < Test::Unit::TestCase
     sexp = @parser.to_sexp(ast)
     assert_equal "(#t (#f (#t #f)))", sexp
   end
+  
+  test "when not passed array to_sexp should print value (integer)" do
+    ast = 1
+    sexp = @parser.to_sexp(ast)
+    assert_equal "1", sexp
+  end
+  
+  test "when not passed array to_sexp should print value (string)" do
+    ast = "test"
+    sexp = @parser.to_sexp(ast)
+    assert_equal "test", sexp
+  end
+  
+  test "when not passed array to_sexp should print value (symbol)" do
+    ast = :test
+    sexp = @parser.to_sexp(ast)
+    assert_equal "test", sexp
+  end
+  
+  test "lists passed to to_sexp should have not extraneous spaces" do
+    ast = [1, 2, 3]
+    sexp = @parser.to_sexp(ast)
+    assert_equal "(1 2 3)", sexp
+  end
     
 end

metadata

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