smlspec 0.0.4 → 0.0.5

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA1:
-  metadata.gz: 39fad508a6a90fa9b3af419fe1817859c1ae37a9
-  data.tar.gz: 2a88c979e6fe341afaa04783d06e2f220c79c974
+  metadata.gz: d6991ed75c5f26034f05f335944a7ddcd524b9dd
+  data.tar.gz: abceb8d8cce6a840c2d823821d1b57c3e0f43dc5
 SHA512:
-  metadata.gz: 2c870b8d970000f442f9588cf4c358a29e7008c044902a505fcee2e0c90da6b27b397152d59db38efd41bebc356a43327f326092af48a6db2b5d995a5e038c8d
-  data.tar.gz: 1ea1b192d1615def55758cb64dbd4e6505ff2405995741d4a20e6705883f59b81f0ae385830bae64d969184c81a26330e4fbce00875594bb87e93e452926e57c
+  metadata.gz: e6a28ba4103305899aa80caa3938f584cca26106137f90394956eedd6b554c432914da159fa9b68a10c55b92ed259d99eaf550fff7efd290a80cdfa2d349f2c1
+  data.tar.gz: 1e8870d7795d9c5472d42164d28c69e00dc1e17201e70734c54631e0ba68f6e6d30054af0aea068d493a0d2a06e5bd2ebddf265ff336130e10006b4a55bd3188

data/CHANGELOG.md

@@ -0,0 +1,5 @@
+# Change log
+
+## 0.0.5
+- Add colorize gem as runtime dependency.
+- Bug fixes and improvements.

data/Gemfile.lock

@@ -1,13 +1,26 @@
 PATH
   remote: .
   specs:
-    smlspec (0.0.1)
+    smlspec (0.0.5)
+      colorize
+      thor
 
 GEM
   remote: http://rubygems.org/
   specs:
+    builder (3.2.2)
     colorize (0.6.0)
+    cucumber (1.3.10)
+      builder (>= 2.1.2)
+      diff-lcs (>= 1.1.3)
+      gherkin (~> 2.12)
+      multi_json (>= 1.7.5, < 2.0)
+      multi_test (>= 0.0.2)
     diff-lcs (1.2.5)
+    gherkin (2.12.2)
+      multi_json (~> 1.3)
+    multi_json (1.8.2)
+    multi_test (0.0.2)
     rake (10.1.0)
     rspec (2.14.1)
       rspec-core (~> 2.14.0)
@@ -17,12 +30,13 @@ GEM
     rspec-expectations (2.14.4)
       diff-lcs (>= 1.1.3, < 2.0)
     rspec-mocks (2.14.4)
+    thor (0.18.1)
 
 PLATFORMS
   ruby
 
 DEPENDENCIES
-  colorize
+  cucumber
   rake
   rspec
   smlspec!

data/README.md

@@ -1 +1,43 @@
-# SML test runner
+# SMLspec
+
+SML spec is a test runner for Standard ML. It lets you write very concise and short tests and still get a useful and pretty output.
+
+## Install
+
+1. Install [Moscow ML](https://github.com/kfl/mosml).
+2. Install the gem with `gem install smlspec`.
+
+## Example
+
+Write some SML code like this
+
+```sml
+fun myLength [] = 0
+  | myLength (_::xs) = 1 + myLength xs
+
+val myLength_test1 = myLength [] = 0
+val myLength_test2 = myLength [1, 2] = 2
+val myLength_test3 = myLength ["a", "b", "c"] = 3
+```
+
+Then run `smlspec <name of file>.sml`
+
+And you'll get output similar to this
+
+```
+...
+
+3 tests ran, 0 red, 3 green
+```
+
+If you have failed tests you'll see something like this
+
+```
+...F
+
+
+myLength_test4
+
+
+4 tests ran, 1 red, 3 green
+```

data/Rakefile

@@ -4,11 +4,13 @@ RSpec::Core::RakeTask.new(:spec)
 
 task default: :spec
 
+desc 'Build gem'
 task :build do
   system "gem build smlspec.gemspec"
   Dir.glob("*.gem") {|f| system "mv #{f} build" }
 end
 
+desc 'Install gem'
 task :install do
   system "gem uninstall smlspec"
   newest_build = Dir.glob("build/*.gem").last

data/TODO.md

@@ -1,6 +1,23 @@
 # TODOS
 
-[ ] - make tests of SmlFile isolated, could be done using dependency injection
-[x] - append test function to file
-[ ] - clean up fixtures folder
-[x] - write test output parser
+## For version 0.0.5
+
+
+## Others
+
+- [ ] make tests of SmlFile isolated, could be done using dependency injection
+- [ ] allow for other implementations than moscow ml
+- [ ] work with "load" function
+- [ ] show time it took to run tests
+- [ ] refactor binary
+- [ ] clean up fixtures folder
+
+## Done
+
+- [x] append test function to file
+- [x] write test output parser
+- [x] make change log
+- [x] refactor TestOutputParser
+- [x] make some sort in integration test
+- [x] test for mosml being installed when running binary
+

data/bin/smlspec

@@ -1,17 +1,24 @@
 #!/usr/bin/env ruby
 
+$:.unshift("lib")
 require 'colorize'
 require 'digest/md5'
-
-$:.unshift("lib")
 require 'formats_lines'
 require 'formats_tests'
 require 'sml_file'
-require 'test_output_parser'
+require 'test_output'
+require 'test'
+require 'test_output_presenter'
+require 'looks_for_mosml'
 
 class Runner
   def self.main(input)
-    new(input)
+    if LooksForMosml.installed?
+      new(input)
+    else
+      puts "Moscow ML most be installed"
+      exit 1
+    end
   end
 
   def initialize(input)
@@ -20,16 +27,19 @@ class Runner
 
     @file = SmlFile.new(@input).prepare_tests
 
-    @file.save_as!(random_name + ".sml")
+    tmp_file_name = random_name
 
-    begin
-      @file.compile!(random_name + ".exe")
-      puts TestOutputParser.parse(@file.run)
-    rescue SmlFile::CannotCompile => e
-      puts TestOutputParser.parse(e.message)
-    ensure
-      clean_up!
-    end
+    @file.save_as!(tmp_file_name + ".sml")
+
+    @file.compile!(random_name + ".exe")
+
+    output = TestOutput.new(@file.run.split("\n"))
+    puts TestOutputPresenter.parse(output)
+  rescue SmlFile::CannotCompile => e
+    output = TestOutput.new(e.message.split("\n"))
+    puts TestOutputPresenter.parse(output).gsub(tmp_file_name+".sml", @input)
+  ensure
+    clean_up!
   end
 
   private

data/features/running_tests.feature

@@ -0,0 +1,20 @@
+Feature: Running SML tests
+  In order to ensure that my SML is working
+  As a programmer
+  I want to be able to run tests
+
+  Scenario: Running tests
+    Given I have written an SML file with tests
+    When I run smlspec on the file
+    Then I should see the test output
+
+  Scenario: A compile error happends
+    Given I have an invalid SML file
+    When I run smlspec on the file
+    Then I should see a compile error message
+
+  Scenario: Running it without Moscow ML installed
+    Given I have written an SML file with tests
+    And I don't have Moscow ML installed
+    When I run smlspec on the file
+    Then I should see message saying that I don't have Moscow ML installed

data/features/step_definitions/smlspec_steps.rb

@@ -0,0 +1,54 @@
+Given(/^I have written an SML file with tests$/) do
+  File.open("tmp/integration_file.sml", "w") do |f|
+    f.puts "fun f _ = 3"
+    f.puts "val f_test1 = f 3 = 3"
+    f.puts "val f_test2 = f 5 = 3"
+    f.puts "val f_test3 = f 3 = 5"
+  end
+end
+
+Given(/^I have an invalid SML file$/) do
+  File.open("tmp/integration_file.sml", "w") do |f|
+    f.puts "val foo = foo"
+  end
+end
+
+When(/^I run smlspec on the file$/) do
+  @output = `./bin/smlspec tmp/integration_file.sml`
+end
+
+Then(/^I should see the test output$/) do
+  lines = [
+    ".".green + ".".green + "F".red,
+    "",
+    "",
+    "",
+    "f_test3".red,
+    "",
+    "",
+    "3 tests ran, 1 red, 2 green",
+    "",
+    "",
+  ].join("\n")
+
+  lines.should eq @output
+
+  clean_tmp
+end
+
+Then(/^I should see a compile error message$/) do
+  expected = [
+    "Unable to run tests, SML says:".red,
+    "",
+    "",
+    'File "tmp/integration_file.sml", line 2, characters 10-13:',
+    '! val foo = foo<EOF>',
+    '!           ^^^^^^^^',
+    '! Unbound value identifier: foo',
+    "",
+  ].join("\n")
+
+  @output.should eq expected
+
+  clean_tmp
+end

data/features/support/env.rb

@@ -0,0 +1,2 @@
+require 'colorize'
+require_relative '../../spec/support/helper_methods'

data/lib/formats_tests.rb

@@ -6,11 +6,11 @@ class FormatsTests
       match = line.match(/val (.*?_test\d) = (.*?)$/)
 
       if match
-        lines[i] = "val #{match[1]} = test \"#{match[1]}\" (#{match[2]})"
+        lines[i] = "val #{match[1]} = assert \"#{match[1]}\" (#{match[2]})"
       end
     end
 
     # TODO: make this a little nicer
-    'fun test desc condition = print(desc^" "^Bool.toString(condition)^"\n")' + "\n" + lines.join("\n")
+    'fun assert desc condition = print(desc^" "^Bool.toString(condition)^"\n")' + "\n" + lines.join("\n")
   end
 end

data/lib/looks_for_mosml.rb

@@ -0,0 +1,12 @@
+class CommandLine
+  def self.run_command(command)
+    system(command)
+  end
+end
+
+class LooksForMosml
+  def self.installed?
+    CommandLine.run_command("which mosml > /dev/null")
+  end
+end
+

data/lib/test.rb

@@ -0,0 +1,24 @@
+class Test
+  attr_reader :status, :name
+
+  def initialize(status, name)
+    @status = status
+    @name = name
+  end
+
+  def passed?
+    @status
+  end
+
+  def ==(another_test)
+    fields_used_for_comparison.inject(true) do |acc, m|
+      acc && instance_variable_get("@#{m}") == another_test.send(m)
+    end
+  end
+
+  private
+
+  def fields_used_for_comparison
+    [:status, :name]
+  end
+end

data/lib/test_output.rb

@@ -0,0 +1,25 @@
+class TestOutput
+  attr_reader :message
+
+  def initialize(lines)
+    @lines = lines
+
+    if compile_error?
+      @message = lines.join("\n")
+    end
+  end
+
+  def compile_error?
+    @lines.any? { |line| /^!/ =~ line }
+  end
+
+  def tests
+    @lines.inject([]) do |acc, line|
+      acc << if /true/ =~ line
+        Test.new(true, line.match(/(.+) true/)[1])
+      else
+        Test.new(false, line.match(/(.+) false/)[1])
+      end
+    end
+  end
+end

data/lib/test_output_presenter.rb

@@ -0,0 +1,68 @@
+class TestOutputPresenter
+  def self.parse(test_results)
+    parser = self.new(test_results)
+
+    if test_results.compile_error?
+      parser.parse_error
+    else
+      parser.parse
+    end
+  end
+
+  def initialize(test_results)
+    @test_results = test_results
+    @tests = test_results.tests unless @test_results.compile_error?
+  end
+
+  def parse
+    output = ""
+
+    output += dots_or_fs + "\n"
+    if failures.count > 0
+      output += blank_lines(3) + "\n"
+      output += failed_tests + "\n"
+    end
+    output += blank_lines(2) + "\n"
+    output += "#{@tests.count} tests ran, #{failures.count} red, #{passed.count} green"
+    output += blank_lines(3)
+
+    output
+  end
+
+  def parse_error
+    [
+      "Unable to run tests, SML says:".red,
+      "",
+      "",
+      @test_results.message,
+    ].join("\n")
+  end
+
+  private
+
+  def blank_lines(n)
+    Array.new(n, "").join("\n")
+  end
+
+  def dots_or_fs
+    @tests.inject("") do |acc, test|
+      if test.passed?
+        acc += ".".green
+      else
+        acc += "F".red
+      end
+    end
+  end
+
+  def failed_tests
+    failures.map { |t| t.name.red }.join("\n")
+  end
+
+  def failures
+    @tests.reject(&:passed?)
+  end
+
+  def passed
+    @tests.select(&:passed?)
+  end
+end

data/scripts/cucumber_init.sh

@@ -0,0 +1,24 @@
+#!/bin/bash
+
+# Create the directory structure
+mkdir -p features/step_definitions
+mkdir -p features/support
+
+# Create a placeholder for the step_definitions folder
+touch features/step_definitions/"$(basename `pwd`)_steps.rb"
+
+# Create the environment file
+echo '$: << File.expand_path("../../lib", File.dirname(__FILE__))' > features/support/env.rb
+echo "require '$(basename `pwd`)'" >> features/support/env.rb
+
+# Uncomment to Generate sample feature
+#echo "Feature: Sample Feature
+#
+#  Scenario: Sample Scenario
+#    Given the world
+#    When your whishes come truth
+#    Then you are happy
+#" > features/sample.feature
+
+# Give user some output
+echo "Cucumber file structure created successfully."

data/smlspec.gemspec

@@ -1,6 +1,6 @@
 Gem::Specification.new do |s|
   s.name        = 'smlspec'
-  s.version     = '0.0.4'
+  s.version     = '0.0.5'
   s.date        = '2012-12-16'
   s.summary     = "Runner for SML tests"
   s.description = "Gem for running tests in SML files"
@@ -11,7 +11,10 @@ Gem::Specification.new do |s|
 
   s.add_development_dependency 'rake'
   s.add_development_dependency 'rspec'
+  s.add_development_dependency 'cucumber'
+
   s.add_runtime_dependency 'colorize'
+  s.add_runtime_dependency 'thor'
 
   s.files         = `git ls-files`.split("\n")
   s.test_files    = `git ls-files -- {spec}/*_spec.rb`.split("\n")

data/spec/fixtures/formatted_tests.sml

@@ -1,14 +1,14 @@
-fun test desc condition = print(desc^" "^Bool.toString(condition)^"\n")
+fun assert desc condition = print(desc^" "^Bool.toString(condition)^"\n")
 fun headString "" = "" | headString s  = String.extract (s, 0, SOME 1)
 fun tailString "" = "" | tailString s  = String.extract (s, 1, NONE)
-val allDefined_test1 = test "allDefined_test1" (allDefined [NONE,SOME 7,SOME 3,NONE, SOME 7] = [7,3,7])
-val allDefined_test2 = test "allDefined_test2" (allDefined [NONE,NONE,NONE] = [])
+val allDefined_test1 = assert "allDefined_test1" (allDefined [NONE,SOME 7,SOME 3,NONE, SOME 7] = [7,3,7])
+val allDefined_test2 = assert "allDefined_test2" (allDefined [NONE,NONE,NONE] = [])
 local
 fun f x = x+2
 fun h x = x*2
 fun g x = x div 2
 in
-val dollar_test1 = test "dollar_test1" (g (h (f (g (h 2)))) = g $ h $ f $ g $ h 2)
+val dollar_test1 = assert "dollar_test1" (g (h (f (g (h 2)))) = g $ h $ f $ g $ h 2)
 end
-val countdown_test2 = test "countdown_test2" ((countdown ~1; false) handle Domain => true | _ => false)
-val svgLine_test1 = test "svgLine_test1" (svgLine [(0,0), (100,100), (200,0)] = "<svg xmlns=\"http://www.w3.org/2000/svg\""^ "style=\"stroke: black; stroke-width: 2px;\">"^ "<line x1=\"0\" y1=\"0\" x2=\"100\" y2=\"100\" />"^ "<line x1=\"100\" y1=\"100\" x2=\"200\" y2=\"0\" />"^ "</svg>")
+val countdown_test2 = assert "countdown_test2" ((countdown ~1; false) handle Domain => true | _ => false)
+val svgLine_test1 = assert "svgLine_test1" (svgLine [(0,0), (100,100), (200,0)] = "<svg xmlns=\"http://www.w3.org/2000/svg\""^ "style=\"stroke: black; stroke-width: 2px;\">"^ "<line x1=\"0\" y1=\"0\" x2=\"100\" y2=\"100\" />"^ "<line x1=\"100\" y1=\"100\" x2=\"200\" y2=\"0\" />"^ "</svg>")

data/spec/looks_for_mosml_spec.rb

@@ -0,0 +1,18 @@
+require 'spec_helper'
+require 'looks_for_mosml'
+
+describe LooksForMosml do
+  it "knows when mosml is not installed" do
+    CommandLine.should_receive(:run_command).with("which mosml > /dev/null").
+      and_return(true)
+
+    LooksForMosml.installed?.should be_true
+  end
+
+  it "knows when mosml is not installed" do
+    CommandLine.should_receive(:run_command).with("which mosml > /dev/null").
+      and_return(false)
+
+    LooksForMosml.installed?.should be_false
+  end
+end

data/spec/spec_helper.rb

@@ -1,20 +1,11 @@
 require 'pp'
+require_relative 'support/helper_methods'
 
-# This file was generated by the `rspec --init` command. Conventionally, all
-# specs live under a `spec` directory, which RSpec adds to the `$LOAD_PATH`.
-# Require this file using `require "spec_helper"` to ensure that it is only
-# loaded once.
-#
-# See http://rubydoc.info/gems/rspec-core/RSpec/Core/Configuration
 RSpec.configure do |config|
   config.treat_symbols_as_metadata_keys_with_true_values = true
   config.run_all_when_everything_filtered = true
   config.filter_run :focus
 
-  # Run specs in random order to surface order dependencies. If you find an
-  # order dependency and want to debug it, you can fix the order by providing
-  # the seed, which is printed after each run.
-  #     --seed 1234
   config.order = 'random'
 end
 
@@ -22,7 +13,3 @@ def fixture(fixture_name)
   File.read("spec/fixtures/#{fixture_name}").chomp
 end
 
-def clean_tmp
-  Dir.glob("tmp/*").each {|f| FileUtils.rm_f(f) }
-end
-

data/spec/support/helper_methods.rb

@@ -0,0 +1,4 @@
+def clean_tmp
+  Dir.glob("tmp/*").each {|f| FileUtils.rm_f(f) }
+end
+

data/spec/{test_output_parser_spec.rb → test_output_presenter_spec.rb}

@@ -1,13 +1,13 @@
 require 'spec_helper'
-require 'test_output_parser'
+require 'test_output_presenter'
 require 'colorize'
 
-describe TestOutputParser do
+describe TestOutputPresenter do
   it "parses output for passed tests" do
-    output = [
-      "foo_test1 true",
-      "foo_test2 false",
-    ].join("\n")
+    output = double(:test_output, compile_error?: false, tests: [
+      double(:test, passed?: true, name: "foo_test1"),
+      double(:test, passed?: false, name: "foo_test2"),
+    ])
 
     parsed_output = [
       ".".green + "F".red,
@@ -22,14 +22,14 @@ describe TestOutputParser do
       "",
     ].join("\n")
 
-    TestOutputParser.parse(output).should eq parsed_output
+    TestOutputPresenter.parse(output).should eq parsed_output
   end
 
   it "parses output with only passes" do
-    output = [
-      "foo_test1 true",
-      "foo_test2 true",
-    ].join("\n")
+    output = double(:test_output, compile_error?: false, tests: [
+      double(:test, passed?: true, name: "foo_test1"),
+      double(:test, passed?: true, name: "foo_test2"),
+    ])
 
     parsed_output = [
       ".".green+".".green,
@@ -40,17 +40,19 @@ describe TestOutputParser do
       "",
     ].join("\n")
 
-    TestOutputParser.parse(output).should eq parsed_output
+    TestOutputPresenter.parse(output).should eq parsed_output
   end
 
   it "parses output from a failure" do
-    output = [
+    failure_message = [
       'File "foo.sml", line 1, characters 0-3:',
       '! foo',
       '! ^^^',
       '! Syntax error.',
     ].join("\n")
 
+    output = double(:test_output, compile_error?: true, message: failure_message)
+
     parsed_output = [
       "Unable to run tests, SML says:".red,
       "",
@@ -61,6 +63,6 @@ describe TestOutputParser do
       '! Syntax error.',
     ].join("\n")
 
-    TestOutputParser.parse(output).should eq parsed_output
+    TestOutputPresenter.parse(output).should eq parsed_output
   end
 end

data/spec/test_output_spec.rb

@@ -0,0 +1,39 @@
+require 'spec_helper'
+require 'test_output'
+
+class Test; end
+
+describe TestOutput do
+  before do
+    Test.stub(:new) { double(:test) }
+  end
+
+  let(:lines) do
+    ["foo_test1 true",
+     "foo_test2 false"]
+  end
+
+  let(:failure_message) do
+    ['File "foo.sml", line 1, characters 0-3:',
+     '! foo',
+     '! ^^^',
+     '! Syntax error.']
+  end
+
+  it "parses output from tests" do
+    Test.should_receive(:new).with(true, "foo_test1")
+    Test.should_receive(:new).with(false, "foo_test2")
+
+    output = TestOutput.new(lines)
+
+    output.compile_error?.should be_false
+    output.should have(2).tests
+  end
+
+  it "parses output from a compile error" do
+    output = TestOutput.new(failure_message)
+
+    output.compile_error?.should be_true
+    output.message.should eq failure_message.join("\n")
+  end
+end

data/spec/test_spec.rb

@@ -0,0 +1,20 @@
+require 'spec_helper'
+require 'test'
+
+describe Test do
+  it "can be passed" do
+    Test.new(true, "").should be_passed
+  end
+
+  it "can be failed" do
+    Test.new(false, "").should_not be_passed
+  end
+
+  it "has a name" do
+    Test.new(false, "foo_test1").name.should eq "foo_test1"
+  end
+
+  it "has a status" do
+    Test.new(false, "foo_test1").status.should eq false
+  end
+end

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: smlspec
 version: !ruby/object:Gem::Version
-  version: 0.0.4
+  version: 0.0.5
 platform: ruby
 authors:
 - David Pedersen
@@ -38,6 +38,20 @@ dependencies:
     - - '>='
       - !ruby/object:Gem::Version
         version: '0'
+- !ruby/object:Gem::Dependency
+  name: cucumber
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - '>='
+      - !ruby/object:Gem::Version
+        version: '0'
 - !ruby/object:Gem::Dependency
   name: colorize
   requirement: !ruby/object:Gem::Requirement
@@ -52,6 +66,20 @@ dependencies:
     - - '>='
       - !ruby/object:Gem::Version
         version: '0'
+- !ruby/object:Gem::Dependency
+  name: thor
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - '>='
+      - !ruby/object:Gem::Version
+        version: '0'
 description: Gem for running tests in SML files
 email: david.pdrsn@gmail.com
 executables:
@@ -61,6 +89,7 @@ extra_rdoc_files: []
 files:
 - .gitignore
 - .rspec
+- CHANGELOG.md
 - Gemfile
 - Gemfile.lock
 - LICENSE
@@ -70,10 +99,18 @@ files:
 - bin/smlspec
 - build/smlspec-0.0.2.gem
 - build/smlspec-0.0.3.gem
+- build/smlspec-0.0.4.gem
+- features/running_tests.feature
+- features/step_definitions/smlspec_steps.rb
+- features/support/env.rb
 - lib/formats_lines.rb
 - lib/formats_tests.rb
+- lib/looks_for_mosml.rb
 - lib/sml_file.rb
-- lib/test_output_parser.rb
+- lib/test.rb
+- lib/test_output.rb
+- lib/test_output_presenter.rb
+- scripts/cucumber_init.sh
 - smlspec.gemspec
 - spec/fixtures/broken_lines.sml
 - spec/fixtures/formatted.sml
@@ -92,9 +129,13 @@ files:
 - spec/fixtures/without_whitespace.sml
 - spec/formats_lines_spec.rb
 - spec/formats_tests_spec.rb
+- spec/looks_for_mosml_spec.rb
 - spec/sml_file_spec.rb
 - spec/spec_helper.rb
-- spec/test_output_parser_spec.rb
+- spec/support/helper_methods.rb
+- spec/test_output_presenter_spec.rb
+- spec/test_output_spec.rb
+- spec/test_spec.rb
 homepage: http://github.com/davidpdrsn/smlspec
 licenses:
 - MIT

data/lib/test_output_parser.rb

@@ -1,79 +0,0 @@
-class TestOutputParser
-  def self.parse(input)
-    parser = self.new(input)
-
-    if input.match(/!/)
-      parser.parse_error
-    else
-      parser.parse
-    end
-  end
-
-  def initialize(input)
-    @input = input
-  end
-
-  def parse
-    output = ""
-
-    output += dots_or_fs + "\n"
-    if failures > 0
-      output += blank_lines(3) + "\n"
-      output += failed_tests + "\n"
-    end
-    output += blank_lines(2) + "\n"
-    output += "#{total} tests ran, #{failures} red, #{passed} green" + "\n"
-    output += blank_lines(2)
-
-    output
-  end
-
-  def parse_error
-    [
-      "Unable to run tests, SML says:".red,
-      "",
-      "",
-      @input,
-    ].join("\n")
-  end
-
-  private
-
-  def blank_lines(n)
-    Array.new(n, "").join("\n")
-  end
-
-  def dots_or_fs
-    @input.split("\n").inject("") do |acc, s|
-      if s.include?("true")
-        acc += ".".green
-      else
-        acc += "F".red
-      end
-    end
-  end
-
-  def failed_tests
-    @input.split("\n").select do |s|
-      s.include?("false")
-    end.inject("") do |acc, s|
-      s.gsub(" false", "").red
-    end
-  end
-
-  def total
-    @input.split("\n").count
-  end
-
-  def failures
-    @input.split("\n").select do |s|
-      s.include?("false")
-    end.count
-  end
-
-  def passed
-    @input.split("\n").select do |s|
-      s.include?("true")
-    end.count
-  end
-end