summaryrefslogtreecommitdiff
path: root/features/support/env.el
diff options
context:
space:
mode:
authordickmao <rchiang@cs.stonybrook.edu>2018-08-28 21:48:31 -0400
committerdickmao <dick.r.chiang@gmail.com>2018-08-30 00:14:42 -0400
commit800dd7677276f9e425c5db37b3e31e56ab1dad32 (patch)
tree09eb145ffcbaf89d873c89e8346ee8d38a88ebbe /features/support/env.el
parent5bd1e7248bb9bf3b335cbd6bec250866bd165af1 (diff)
Add tests for castling legality and ics response handling.
Fixes misinterpretation of "e1-b1" as a valid queenside castle, and makes more sense of ics basic response handling #21. `make test` should run the historic.pgn test and the new ecukes tests.
Diffstat (limited to 'features/support/env.el')
-rw-r--r--features/support/env.el43
1 files changed, 43 insertions, 0 deletions
diff --git a/features/support/env.el b/features/support/env.el
new file mode 100644
index 0000000..58ed42f
--- /dev/null
+++ b/features/support/env.el
@@ -0,0 +1,43 @@
+(require 'f)
+
+(defvar emacs-chess-support-path
+ (f-dirname load-file-name))
+
+(defvar emacs-chess-features-path
+ (f-parent emacs-chess-support-path))
+
+(defvar emacs-chess-root-path
+ (f-parent emacs-chess-features-path))
+
+(add-to-list 'load-path emacs-chess-root-path)
+
+(require 'chess-ics)
+(require 'espuds)
+(require 'ert)
+(require 'cl)
+
+(Setup
+ (defvar test-display nil)
+ (defvar test-fifo nil)
+)
+
+(Before
+ ;; Before each scenario is run
+ )
+
+(After
+ ;; After each scenario is run
+ (when test-display
+ (chess-module-destroy test-display)
+ (setq test-display nil))
+ (when (process-status "*chess-ics*")
+ (delete-process "*chess-ics*"))
+ (when test-fifo
+ (process-send-eof test-fifo)
+ (delete-process test-fifo)
+ (setq test-fifo nil))
+)
+
+(Teardown
+ ;; After when everything has been run
+ )