Hello, Maxime Devos <maximede...@telenet.be> writes:
> On Fri, 2021-03-12 at 15:16 -0900, Christopher Howard wrote: >> When trying to build nomad, emacsy-minimal build dies with this >> failure: >> >> [...] > This should be fixed by this patch (not yet applied): > <https://issues.guix.gnu.org/46960>. > > Apparently, this issue has been reporter earlier: > <https://issues.guix.gnu.org/46934>. The two above issues/patches have been closed/merged. Sadly, emacsy still fails to build: --8<---------------cut here---------------start------------->8--- 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-u...@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 --8<---------------cut here---------------end--------------->8--- Maxim