Source: racket-mode
Severity: important
Version: 20180731+0+g948c8aa-2

Hello, since the last snapshot, testsuite has started to fail in Ubuntu (and I 
presume in Debian too), but only on arm64...

I packaged the old version and it was good, even with the new emacs, so this is 
why I'm reporting a bug.

Everything is good, with the "next-free-port" changed in testsuite to the old 
fixed 55556 port.

I don't know the root cause for the failure, this is the "revert patch" I added 
in Ubuntu build.

+--- racket-mode-20180731+0+g948c8aa.orig/racket-tests.el
++++ racket-mode-20180731+0+g948c8aa/racket-tests.el
+@@ -71,7 +71,7 @@
+   "Start REPL. Confirm we get Welcome message and prompt. Exit REPL."
+   (let ((tab-always-indent 'complete)
+         (racket--repl-command-connect-timeout (* 15 60))
+-        (racket-command-port (racket-tests/next-free-port))
++        (racket-command-port 55556)
+         (racket-command-timeout (* 15 60)))
+     (racket-repl)
+     (with-racket-repl-buffer
+@@ -98,7 +98,7 @@
+ 
+ (ert-deftest racket-tests/run ()
+   (let* ((racket--repl-command-connect-timeout (* 15 60))
+-         (racket-command-port (racket-tests/next-free-port))
++         (racket-command-port 55556)
+          (racket-command-timeout (* 15 60))
+          (pathname (make-temp-file "test" nil ".rkt"))
+          (name     (file-name-nondirectory pathname))


        
and the test failure:
https://objectstorage.prodstack4-5.canonical.com/v1/AUTH_77e2ada1e7a84929a74ba3b87153c0ac/autopkgtest-cosmic/cosmic/arm64/r/racket-mode/20180820_184445_abda2@/log.gz

autopkgtest [18:14:06]: test command1: dh_elpa_test --autopkgtest
autopkgtest [18:14:06]: test command1: [-----------------------
        emacs -batch -Q -l package --eval "(add-to-list 'package-directory-list 
\"/usr/share/emacs/site-lisp/elpa\")" --eval "(add-to-list 
'package-directory-list \"/usr/share/emacs/site-lisp/elpa-src\")" -f 
package-initialize -L . -L test -l racket-tests.el --eval 
\(ert-run-tests-batch-and-exit\)
Running 5 tests (2018-08-20 18:14:09+0000)
   passed  1/5  racket-tests/font-lock
Indenting region...
Indenting region...64%
Indenting region...75%
Indenting region...done
Indenting region...
Indenting region...62%
Indenting region...96%
Indenting region...done
   passed  2/5  racket-tests/indent-rkt
Checking Racket version ...

Starting racket to run 
/usr/share/emacs/site-lisp/elpa-src/racket-mode-20170731/run.rkt ...
Still trying to connect to racket-command process on port 55557 ...
Still trying to connect to racket-command process on port 55557 ...
Still trying to connect to racket-command process on port 55557 ...

[lots of similar lines]
Still trying to connect to racket-command process on port 55557 ...
Test racket-tests/repl backtrace:
  (progn (error "Could not connect to racket-command process on port %
  (if (eq -with-timeout-value- (quote timeout)) (progn (error "Could n
  (let ((-with-timeout-value- (catch (quote timeout) (let* ((-with-tim
  racket--repl-command-connect-finish()
  racket--repl-command-async((syms) (closure ((result . RACKET-REPL-AW
  (let* ((awaiting (quote RACKET-REPL-AWAITING)) (result awaiting)) (r
  racket--repl-command((syms))
  (list (racket--repl-command (quote (syms))))
  (setq racket--namespace-symbols (list (racket--repl-command (quote (
  (progn (setq racket--namespace-symbols (list (racket--repl-command (
  (if (racket--in-repl-or-its-file-p) (progn (setq racket--namespace-s
  (if racket--namespace-symbols nil (if (racket--in-repl-or-its-file-p
  racket--completion-candidates()
  (cl-reduce (function (lambda (results strs) (append results (all-com
  racket--completion-candidates-for-prefix("with-inp")
  (closure ((end . 37) (beg . 29) (_predicate) t) (_) (racket--complet
  #[771 "\211\242\302=\206\n�\211\303=?\2053�r\301\204�p\202(�\304 \3
  try-completion("with-inp" #[771 "\211\242\302=\206\n�\211\303=?\2053
  completion-basic-try-completion("with-inp" #[771 "\211\242\302=\206\
  #[257 "\300
\2368\301\242\302\242\303\304\242$\207" [1 ("with-inp")
  completion--some(#[257 "\300
\2368\301\242\302\242\303\304\242$\207
  completion--nth-completion(1 "with-inp" #[771 "\211\242\302=\206\n�\
  completion-try-completion("with-inp" #[771 "\211\242\302=\206\n�\211
  completion--do-completion(#<marker at 29 in *Racket REPL*> 37)
  completion--in-region-1(#<marker at 29 in *Racket REPL*> 37)
  #[1028 "\n\203!�\304!\203�\202�\305!\305\306\"F\307\310
  apply(#[1028 "\n\203!�\304!\203�\202�\305!\305\306\"F\3
  #[771 ":\2030�@\301=\203�\300\242\302A\"\303#\207\304@\305\30
  completion--in-region(#<marker at 29 in *Racket REPL*> 37 #[771 "\21
  completion-in-region(#<marker at 29 in *Racket REPL*> 37 #[771 "\211
  completion-at-point()
  indent-for-tab-command(nil)
  funcall-interactively(indent-for-tab-command nil)
  call-interactively(indent-for-tab-command nil nil)
  command-execute(indent-for-tab-command)
  execute-kbd-macro([9])
  (let ((blink-matching-paren nil)) (execute-kbd-macro (string-to-vect
  racket-tests/type("   ")
  racket-tests/press("TAB")
  racket-tests/type&press("with-inp" "TAB")
  (save-current-buffer (set-buffer repl-buffer) (let ((fn-0 (function 
  (progn (save-current-buffer (set-buffer repl-buffer) (let ((fn-0 (fu
  (if repl-buffer (progn (save-current-buffer (set-buffer repl-buffer)
  (let ((repl-buffer (get-buffer racket--repl-buffer-name))) (if repl-
  (let ((tab-always-indent (quote complete)) (racket--repl-command-con
  (lambda nil (let ((tab-always-indent (quote complete)) (racket--repl
  ert--run-test-internal([cl-struct-ert--test-execution-info [cl-struc
  ert-run-test([cl-struct-ert-test racket-tests/repl "Start REPL. Conf
  ert-run-or-rerun-test([cl-struct-ert--stats t [[cl-struct-ert-test r
  ert-run-tests(t #[385 "\306\307\"\203G�\211\211G\310U\203�\211@\20
  ert-run-tests-batch(nil)
  ert-run-tests-batch-and-exit()
  eval((ert-run-tests-batch-and-exit))
  command-line-1(("-l" "package" "--eval" "(add-to-list 'package-direc
  command-line()
  normal-top-level()
Test racket-tests/repl condition:
    (error "Could not connect to racket-command process on port 55557")
   FAILED  3/5  racket-tests/repl
Still trying to connect to racket-command process on port 55557 ...
[lots of similar lines]
Still trying to connect to racket-command process on port 55557 ...
Test racket-tests/run backtrace:
  (progn (error "Could not connect to racket-command process on port %
  (if (eq -with-timeout-value- (quote timeout)) (progn (error "Could n
  (let ((-with-timeout-value- (catch (quote timeout) (let* ((-with-tim
  racket--repl-command-connect-finish()
  racket--repl-command-async((run ("/tmp/test5434Iiw.rkt") 2048 t medi
  (if (not (racket--repl-live-p)) (racket--repl-ensure-buffer-and-proc
  (let ((cmd (racket--repl-make-run-command what-to-run context-level)
  racket--repl-run(("/tmp/test5434Iiw.rkt") medium)
  racket--do-run(medium)
  racket-run()
  (let* ((racket--repl-command-connect-timeout (* 15 60)) (racket-comm
  (lambda nil (let* ((racket--repl-command-connect-timeout (* 15 60)) 
  ert--run-test-internal([cl-struct-ert--test-execution-info [cl-struc
  ert-run-test([cl-struct-ert-test racket-tests/run nil (lambda nil (l
  ert-run-or-rerun-test([cl-struct-ert--stats t [[cl-struct-ert-test r
  ert-run-tests(t #[385 "\306\307\"\203G�\211\211G\310U\203�\211@\20
  ert-run-tests-batch(nil)
  ert-run-tests-batch-and-exit()
  eval((ert-run-tests-batch-and-exit))
  command-line-1(("-l" "package" "--eval" "(add-to-list 'package-direc
  command-line()
  normal-top-level()
Test racket-tests/run condition:
    (error "Could not connect to racket-command process on port 55557")
   FAILED  4/5  racket-tests/run
   passed  5/5  racket-tests/smart-open-bracket

Ran 5 tests, 3 results as expected, 2 unexpected (2018-08-20 18:44:28+0000)

2 unexpected results:
   FAILED  racket-tests/repl
   FAILED  racket-tests/run

dh_elpa_test: emacs -batch -Q -l package --eval "(add-to-list 
'package-directory-list \"/usr/share/emacs/site-lisp/elpa\")" --eval 
"(add-to-list 'package-directory-list \"/usr/share/emacs/site-lisp/elpa-src\")" 
-f package-initialize -L . -L test -l racket-tests.el --eval 
\(ert-run-tests-batch-and-exit\) returned exit code 1
autopkgtest [18:44:28]: test command1: -----------------------]
autopkgtest [18:44:31]: test command1:  - - - - - - - - - - results - - - - - - 
- - - -
command1             FAIL non-zero exit status 2
autopkgtest [18:44:32]: @@@@@@@@@@@@@@@@@@@@ summary
command1             FAIL non-zero exit status 2
Exit request sent.
Creating nova instance adt-cosmic-arm64-racket-mode-20180820-180253 from image 
adt/ubuntu-cosmic-arm64-server-20180704.img (UUID 
ecee51e9-22f5-428f-9723-fb3115086c0a)...

do you have any clue?

thanks

Gianfranco

Reply via email to