emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/dash 7b52951 008/439: Add watchr script to get autotest


From: Phillip Lord
Subject: [elpa] externals/dash 7b52951 008/439: Add watchr script to get autotest
Date: Tue, 04 Aug 2015 20:25:48 +0000

branch: externals/dash
commit 7b529511ddd1b463ce0eea10a82ddeaea2e207ff
Author: Magnar Sveen <address@hidden>
Commit: Magnar Sveen <address@hidden>

    Add watchr script to get autotest
---
 watch-tests.watchr |   38 ++++++++++++++++++++++++++++++++++++++
 1 files changed, 38 insertions(+), 0 deletions(-)

diff --git a/watch-tests.watchr b/watch-tests.watchr
new file mode 100644
index 0000000..8146789
--- /dev/null
+++ b/watch-tests.watchr
@@ -0,0 +1,38 @@
+ENV["WATCHR"] = "1"
+system 'clear'
+
+def run(cmd)
+  `#{cmd}`
+end
+
+def run_all_tests
+  system('clear')
+  result = run "./run-tests.sh"
+  puts result
+end
+
+run_all_tests
+watch('.*.el') { run_all_tests }
+
+# Ctrl-\
+Signal.trap 'QUIT' do
+  puts " --- Running all tests ---\n\n"
+  run_all_tests
+end
+
address@hidden = false
+
+# Ctrl-C
+Signal.trap 'INT' do
+  if @interrupted then
+    @wants_to_quit = true
+    abort("\n")
+  else
+    puts "Interrupt a second time to quit"
+    @interrupted = true
+    Kernel.sleep 1.5
+    # raise Interrupt, nil # let the run loop catch it
+    run_all_tests
+    @interrupted = false
+  end
+end



reply via email to

[Prev in Thread] Current Thread [Next in Thread]