Toggle snippet (277 lines)
PASS: test/advice.scm
PASS: test/text.scm
FAIL: test/klecl.scm
FAIL: test/kbd-macro.scm
FAIL: test/minibuffer.scm
PASS: test/help.scm
FAIL: test/core.scm
PASS: test/window.scm
XFAIL: test/windows.scm
============================================================================
Testsuite summary for Emacsy 0.4.1
============================================================================
# TOTAL: 19
# PASS: 14
# SKIP: 0
# XFAIL: 1
# FAIL: 4
# XPASS: 0
# ERROR: 0
============================================================================
See ./test-suite.log
Please report to guile-user@gnu.org
============================================================================
make[3]: *** [Makefile:1497: test-suite.log] Error 1
make[3]: Leaving directory '/tmp/guix-build-emacsy-0.4.1.drv-0/emacsy-0.4.1'
make[2]: *** [Makefile:1605: check-TESTS] Error 2
make[2]: Leaving directory '/tmp/guix-build-emacsy-0.4.1.drv-0/emacsy-0.4.1'
make[1]: *** [Makefile:1807: check-am] Error 2
make[1]: Leaving directory '/tmp/guix-build-emacsy-0.4.1.drv-0/emacsy-0.4.1'
make: *** [Makefile:1809: check] Error 2
Test suite failed, dumping logs.
--- ./test-suite.log --------------------------------------------------------
====================================
Emacsy 0.4.1: ./test-suite.log
====================================
# TOTAL: 19
# PASS: 14
# SKIP: 0
# XFAIL: 1
# FAIL: 4
# XPASS: 0
# ERROR: 0
.. contents:: :depth: 2
FAIL: test/core
===============
WARNING: (guile-user): imported module (emacsy core) overrides core binding `map'
WARNING: (guile-user): `map' imported from both (guile) and (emacsy core)
WARNING: (guile-user): imported module (emacsy core) overrides core binding `map'
WARNING: (guile-user): `map' imported from both (guile) and (emacsy core)
WARNING: (guile-user): imported module (emacsy core) overrides core binding `map'
WARNING: (guile-user): `map' imported from both (guile) and (emacsy core)
WARNING: (guile-user): imported module (emacsy core) overrides core binding `map'
WARNING: (guile-user): `map' imported from both (guile) and (emacsy core)
Backtrace:
5 (primitive-load "/tmp/guix-build-emacsy-0.4.1.drv-0/ema…")
In ice-9/eval.scm:
619:8 4 (_ #(#(#<directory (check) 7fffef8db8c0>) (let* (#) …) …))
293:34 3 (_ #(#(#(#<directory (check) 7fffef8db8c0>) (# # …) …) …))
182:19 2 (proc #(#(#<directory (guile-user) 7fffef8dbf00> (…)) …))
142:16 1 (compile-top-call #<directory (guile-user) 7fffef8dbf00> …)
In unknown file:
0 (%resolve-variable (7 . map) #<directory (guile-user) 7…>)
ERROR: In procedure %resolve-variable:
Unbound variable: map
(eval-expression (quote (+ 1 2))) => 33 ; correct
(let* ((symbols (quote (aa ab c d)))) (let-values (((to-string from-string) (object-tracker symbol->string))) (map from-string (all-completions "a" (map to-string symbols))))) => FAIL test/core.scm (exit status: 1)
FAIL: test/kbd-macro
====================
RAW-READ-EVENT #<key-event a>
RAW-READ-EVENT #<key-event b>
WARNING: (guile-user): imported module (emacsy kbd-macro) overrides core binding `map'
WARNING: (guile-user): `map' imported from both (guile) and (emacsy kbd-macro)
WARNING: (guile-user): imported module (emacsy kbd-macro) overrides core binding `map'
WARNING: (guile-user): `map' imported from both (guile) and (emacsy kbd-macro)
WARNING: (guile-user): imported module (emacsy kbd-macro) overrides core binding `map'
WARNING: (guile-user): `map' imported from both (guile) and (emacsy kbd-macro)
Backtrace:
5 (primitive-load "/tmp/guix-build-emacsy-0.4.1.drv-0/ema…")
In ice-9/eval.scm:
619:8 4 (_ #(#(#<directory (check) 7fffee409820>) (map # #) # …))
293:34 3 (_ #(#(#(#<directory (check) 7fffee409820>) (map …) …) …))
182:19 2 (proc #(#(#<directory (guile-user) 7fffef8dbf00>)))
142:16 1 (compile-top-call #<directory (guile-user) 7fffef8dbf00> …)
In unknown file:
0 (%resolve-variable (7 . map) #<directory (guile-user) 7…>)
ERROR: In procedure %resolve-variable:
Unbound variable: map
test-command-called => 0 ; correct
RECORDING #<key-event a>a is undefined.RECORDING #<key-event b>b is undefined.
test-command-called => 0 ; *** failed ***
; expected result: 1
(map command-char last-kbd-macro) => FAIL test/kbd-macro.scm (exit status: 1)
FAIL: test/klecl
================
Backtrace:
5 (primitive-load "/tmp/guix-build-emacsy-0.4.1.drv-0/ema…")
In emacsy/agenda.scm:
167:10 4 (%update-agenda #<<agenda> time: 1 segments: (#<<time-s…>)
155:4 3 (flush-queue! (() . #f))
In emacsy/coroutine.scm:
64:13 2 (_)
In ice-9/eval.scm:
626:19 1 (_ #(#(#<directory (guile-user) 7fffef8dbf00>)))
In emacsy/klecl.scm:
148:12 0 (read-event _)
emacsy/klecl.scm:148:12: In procedure read-event:
Throw to key `read-event-eof' with args `()'.
last-event => #f ; correct
FAIL test/klecl.scm (exit status: 1)
FAIL: test/minibuffer
=====================
RAW-READ-EVENT #<key-event c>
Switching to minibuffer now.
Running exit hook for "#<buffer '*minibuffer-1*'>"
Exit minibuffer!
Set buffer to "#<buffer '*minibuffer-1*'>"
Running enter hook for "#<buffer '*minibuffer-1*'>"
Enter minibuffer!
RAW-READ-EVENT #<key-event a>
RAW-READ-EVENT #<key-event RET>
Backtrace:
3 (primitive-load "/tmp/guix-build-emacsy-0.4.1.drv-0/ema…")
In ice-9/eval.scm:
619:8 2 (_ #(#(#<directory (check) 7fffee3c98c0>) (# "What…") …))
293:34 1 (_ #(#(#(#<directory (check) 7fffee3c98c0>) (# #) # …) …))
In emacsy/util.scm:
218:6 0 (in-out-guard _ #<procedure 7fffedddc8c0 at emacsy/min…> …)
emacsy/util.scm:218:6: In procedure in-out-guard:
Throw to key `read-event-eof' with args `()'.
(buffer-string) => "" ; correct
(point) => 1 ; correct
(buffer-string) => "What? " ; correct
(point-min) => 7 ; correct
(buffer-string) => "What? Nothing." ; correct
(buffer-string) => "What? " ; correct
(buffer-string) => "What? A [Huh?]" ; correct
(buffer-string) => "What? A" ; correct
c is undefined.
(buffer-string) => "What? A" ; *** failed ***
; expected result: "What? Ac"
(read-from-minibuffer "What? ") => a is undefined.RET is undefined.FAIL test/minibuffer.scm (exit status: 1)
XFAIL: test/windows
===================
(window? root-window) => #t ; correct
(window-live? root-window) => #t ; correct
(edges->bcoords (quote (0 1 1 0))) => (0 0 1 1) ; correct
(bcoords->edges (quote (0 0 1 1))) => (0 1 1 0) ; correct
(window? i-window) => #t ; correct
(window? window) => #t ; correct
(procedure? split-window) => #t ; correct
(is-a? s-window <internal-window>) => #t ; correct
(window-pixel-bcoords s-window) => (0 0 1 1) ; correct
(window-pixel-bcoords window) => (#(1 0 0.0) #(0 1 0.5) #(1 0 0.0) #(0 1 0.5)) ; *** failed ***
; expected result: (0.0 0.5 1.0 0.5)
(orientation parent-window) => vertical ; correct
(window-pixel-bcoords small-window) => (#(1 0 0.0) #(0 1 0.2) #(1 0 0.0) #(0 1 0.2)) ; *** failed ***
; expected result: (0.0 0.2 1.0 0.2)
(window-pixel-bcoords big-window) => (#(1 0 0.0) #(0 1 0.0) #(1 0 0.0) #(0 1 0.0)) ; *** failed ***
; expected result: (0.0 0.0 1.0 0.8)
(orientation parent-window-2) => horizontal ; correct
(window-pixel-bcoords left-window) => (#(1 0 0.0) #(0 1 0.0) #(1 0 0.0) #(0 1 0.0)) ; *** failed ***
; expected result: (0.0 0.0 0.2 1.0)
(window-pixel-bcoords right-window) => (#(1 0 0.2) #(0 1 0.0) #(1 0 0.2) #(0 1 0.0)) ; *** failed ***
; expected result: (0.2 0.0 0.8 1.0)
(window? pixel-window) => #t ; correct
(window? sub-window) => #t ; correct
(window-child pixel-window) => #<<window> 7fffeee42d00> ; correct
(window-project sub-window #(1.0 1.0 1.0)) => #(#(500 0 0) #(0 400 0) #(0 0 1)) ; *** failed ***
; expected result: #(500.0 400.0 1.0)
(window-project sub-window #(0.0 0.0 1.0)) => #(#(500 0 0) #(0 400 0) #(0 0 1)) ; *** failed ***
; expected result: #(0.0 0.0 1.0)
Splitting the window
(window-project sub-window #(1.0 1.0 1.0)) => #(#(500 0 0) #(0 400 0) #(0 0 1)) ; *** failed ***
; expected result: #(500.0 400.0 1.0)
(window-project sub-window #(0.0 0.0 1.0)) => #(#(500 0 0) #(0 400 0) #(0 0 1)) ; *** failed ***
; expected result: #(0.0 200.0 1.0)
(window-unproject sub-window #(0.0 200.0 1.0)) => #(#(1.0 0 0) #(0 2.0 0) #(0 0 1)) ; *** failed ***
; expected result: #(0.0 0.0 1.0)
(window-list w) => (#<<window> 7fffeee42c80>) ; correct
(window-tree sw) => (#<<window> 7fffeee42c80> #<<window> 7fffeee42c40>) ; correct
(window-list sw) => (#<<window> 7fffeee42c80> #<<window> 7fffeee42c40>) ; correct
(window-list sw) => (#<<window> 7fffeee42c80> #<<window> 7fffeee42c40>) ; *** failed ***
; expected result: (#<<window> 7fffeee42c80> #<<window> 7fffeee42c40> #f)
(window-project window #(0 0 1)) => #(#(1 0 0.0) #(0 1 0.5) #(0 0 1)) ; *** failed ***
; expected result: #(0.0 0.5 1.0)
(window-project window #(1.0 1.0 1.0)) => #(#(1 0 0.0) #(0 1 0.5) #(0 0 1)) ; *** failed ***
; expected result: #(1.0 1.0 1.0)
(window-unproject window #(0 0.5 1.0)) => #(#(1.0 0 0) #(0 2.0 0) #(0 0 1)) ; *** failed ***
; expected result: #(0.0 0.0 1.0)
(window-unproject window #(1.0 1.0 1.0)) => #(#(1.0 0 0) #(0 2.0 0) #(0 0 1)) ; *** failed ***
; expected result: #(1.0 1.0 1.0)
; *** checks *** : 17 correct, 15 failed. First failed example:
(window-pixel-bcoords window) => (#(1 0 0.0) #(0 1 0.5) #(1 0 0.0) #(0 1 0.5)) ; *** failed ***
; expected result: (0.0 0.5 1.0 0.5)
XFAIL test/windows.scm (exit status: 1)
command "make" "check" "-j" "24" failed with status 2
builder for `/gnu/store/qj6y049rpm1p34r29gj164z1wffwqydl-emacsy-0.4.1.drv' failed with exit code 1
@ build-failed /gnu/store/qj6y049rpm1p34r29gj164z1wffwqydl-emacsy-0.4.1.drv - 1 builder for `/gnu/store/qj6y049rpm1p34r29gj164z1wffwqydl-emacsy-0.4.1.drv' failed with exit code 1
derivation '/gnu/store/qj6y049rpm1p34r29gj164z1wffwqydl-emacsy-0.4.1.drv' offloaded to '127.0.0.1' failed: build of `/gnu/store/qj6y049rpm1p34r29gj164z1wffwqydl-emacsy-0.4.1.drv' failed