47 lines
661 B
VHS
47 lines
661 B
VHS
# VHS E2E test for counter example
|
|
# Tests basic Elm architecture flow: render → input → update → render
|
|
|
|
Output test/e2e/output/counter.gif
|
|
Output test/e2e/output/counter.ascii
|
|
|
|
Require clojure
|
|
|
|
Set Shell "bash"
|
|
Set FontSize 14
|
|
Set Width 800
|
|
Set Height 400
|
|
Set Framerate 10
|
|
|
|
# Run the counter example
|
|
Type "clojure -A:dev -M -m examples.counter"
|
|
Enter
|
|
Sleep 2s
|
|
|
|
# Test increment with 'k' key
|
|
Type "k"
|
|
Sleep 500ms
|
|
Type "k"
|
|
Sleep 500ms
|
|
Type "k"
|
|
Sleep 500ms
|
|
|
|
# Test decrement with 'j' key
|
|
Type "j"
|
|
Sleep 500ms
|
|
|
|
# Test up arrow
|
|
Up
|
|
Sleep 500ms
|
|
|
|
# Test down arrow
|
|
Down
|
|
Sleep 500ms
|
|
|
|
# Test reset with 'r'
|
|
Type "r"
|
|
Sleep 500ms
|
|
|
|
# Quit with 'q'
|
|
Type "q"
|
|
Sleep 1s
|