went on a code-writing rampage, forgot to commit

pthrasher · Apr 26, 2013 · ff05920 · ff05920
1 parent ad82615
commit ff05920
Show file tree

Hide file tree

Showing 4 changed files with 581 additions and 189 deletions.
diff --git a/Cakefile b/Cakefile
@@ -2,6 +2,7 @@ fs            = require 'fs'
 {print}       = require 'sys'
 child_process = require 'child_process'
 watchit       = require 'watchit'
+_             = require 'underscore'
 
 build = (watch, callback) ->
   if typeof watch is 'function'
@@ -15,6 +16,20 @@ build = (watch, callback) ->
   coffee.stderr.on 'data', (data) -> print data.toString()
   coffee.on 'exit', (status) -> callback?() if status is 0
 
+runTests = ->
+  suite?.kill()
+  suiteNames = [
+    'integration'
+  ]
+  suiteIndex = 0
+  do runNextTestSuite = ->
+      return unless suiteName = suiteNames[suiteIndex]
+      suite = spawn "coffee", ["-e", "{reporters} = require 'nodeunit'; reporters.default.run ['#{suiteName}.coffee']"], cwd: 'test'
+      suite.stdout.on 'data', (data) -> print data.toString()
+      suite.stderr.on 'data', (data) -> print data.toString()
+      suite.on 'exit', -> suiteIndex++; runNextTestSuite()
+  invoke 'docs'  # lest I forget
+
 spawn = ->
   arguments[0] += '.cmd' if process.platform is 'win32'
   child_process.spawn.apply(child_process, arguments)
@@ -33,26 +48,24 @@ task 'build', 'Compile CoffeeScript source files', ->
 task 'watch', 'Recompile CoffeeScript source files when modified', ->
   build true
 
-task 'test', 'Run the test suite (and re-run if anything changes)', ->
+task 'test', 'Run the test suite once.', ->
+  build runTests
+
+task 'testwatch', 'Run the test suite (and re-run if anything changes)', ->
   suite = null
   build ->
-    do runTests = ->
-      suite?.kill()
-      suiteNames = [
-        'integration'
-      ]
-      suiteIndex = 0
-      do runNextTestSuite = ->
-        return unless suiteName = suiteNames[suiteIndex]
-        suite = spawn "coffee", ["-e", "{reporters} = require 'nodeunit'; reporters.default.run ['#{suiteName}.coffee']"], cwd: 'test'
-        suite.stdout.on 'data', (data) -> print data.toString()
-        suite.stderr.on 'data', (data) -> print data.toString()
-        suite.on 'exit', -> suiteIndex++; runNextTestSuite()
-      invoke 'docs'  # lest I forget
+    runTests()
 
     watchTargets = (targets..., callback) ->
       for target in targets
         watchit target, include: true, (event) ->
           callback() unless event is 'success'
-    watchTargets 'src', -> build runTests
-    watchTargets 'test', 'Cakefile', runTests
+
+    watchTargets 'src', do ->
+      _.debounce ->
+        build runTests
+      , 25
+
+    watchTargets 'test', 'Cakefile', do ->
+      _.debounce runTests, 25
+