From mboxrd@z Thu Jan 1 00:00:00 1970 From: ludo@gnu.org (Ludovic =?UTF-8?Q?Court=C3=A8s?=) Subject: bug#27476: guix pull fails on powerful server Date: Mon, 30 Apr 2018 23:19:42 +0200 Message-ID: <87h8nstms1.fsf@gnu.org> References: <87h8vvp1q7.fsf@elephly.net> <87377esu1a.fsf@gnu.org> <87k20nz18u.fsf@igalia.com> <87a81jj5gg.fsf@gnu.org> <87bmlyzxj7.fsf@elephly.net> <87shf44ny0.fsf@elephly.net> <878tfi9x15.fsf@gnu.org> Mime-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:38745) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1fDGDP-0001A8-Pd for bug-guix@gnu.org; Mon, 30 Apr 2018 17:20:09 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1fDGDK-0007np-KI for bug-guix@gnu.org; Mon, 30 Apr 2018 17:20:07 -0400 Received: from debbugs.gnu.org ([208.118.235.43]:36494) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1fDGDK-0007nj-Ge for bug-guix@gnu.org; Mon, 30 Apr 2018 17:20:02 -0400 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1fDGDK-0000wZ-9s for bug-guix@gnu.org; Mon, 30 Apr 2018 17:20:02 -0400 Sender: "Debbugs-submit" Resent-Message-ID: In-Reply-To: <878tfi9x15.fsf@gnu.org> ("Ludovic \=\?utf-8\?Q\?Court\=C3\=A8s\=22'\?\= \=\?utf-8\?Q\?s\?\= message of "Tue, 07 Nov 2017 11:57:10 +0100") List-Id: Bug reports for GNU Guix List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-guix-bounces+gcggb-bug-guix=m.gmane.org@gnu.org Sender: "bug-Guix" To: Ricardo Wurmus Cc: Andy Wingo , help-guix@gnu.org, 27476@debbugs.gnu.org ludo@gnu.org (Ludovic Court=C3=A8s) skribis: > I can=E2=80=99t reproduce this with current Guile =E2=80=98stable-2.2=E2= =80=99, following Andy=E2=80=99s > weak-table rewrite=C2=B9, so this might have been a weak-table bug showin= g up > under memory pressure. With Guile 2.2.3 a similar program triggers a crash very quickly: --8<---------------cut here---------------start------------->8--- $ cat ../guile-debugging/syntax-parms.scm=20 (use-modules (ice-9 threads) (srfi srfi-1) (guix monads) (guix store) (system base compile)) (compile #f) ;load modules (define threads (unfold (lambda (x) (> x 100)) (lambda (x) (call-with-new-thread (lambda () (while #t (compile '(mlet %store-monad ((x y)) (mbegin %store-monad (return x) (return y))) #:env (current-module) #:from 'scheme #:to 'tree-il))))) 1+ 0)) (for-each join-thread threads) $ guile --version guile (GNU Guile) 2.2.3 Copyright (C) 2017 Free Software Foundation, Inc. License LGPLv3+: GNU LGPL 3 or later . This is free software: you are free to change and redistribute it. There is NO WARRANTY, to the extent permitted by law. $ guile ../guile-debugging/syntax-parms.scm=20 In ice-9/psyntax.scm: 2338:44 19 (expand-let _ _ _ #f _ # _ _ _) 1679:45 18 (parse _ _ _ _ _ _ _) In ice-9/boot-9.scm: 222:17 17 (map1 ("-" "1dff1b83541ce327" "-" "2ad70")) In ice-9/psyntax.scm: 1679:45 16 (parse _ _ _ _ _ _ _) In ice-9/boot-9.scm: 222:17 15 (map1 ((#(ribcage () () ()) #(ribcage () () ()) #(ribcage #(un= used-value) #((m-1dff1b83541ce327-29a7a top)) #("l-1dff1b83541ce327-2bce9")= ) #(ribcage () () ()) # =E2=80=A6))) In ice-9/psyntax.scm: 1484:23 14 (_ _ _) In ice-9/boot-9.scm: 222:29 13 (map1 _) 222:17 12 (map1 ("-" "2bd28")) In ice-9/psyntax.scm: 1789:11 11 (lp _ ()) 1679:45 10 (parse _ _ _ _ _ _ _) In ice-9/boot-9.scm: 222:17 9 (map1 ((expand-1dff1b83541ce327-2bd31) (#) =E2=80=A6)) In ice-9/psyntax.scm: 1679:45 8 (parse _ _ _ _ _ _ _) In ice-9/boot-9.scm: 222:17 7 (map1 ((m-1dff1b83541ce327-2bcf4 top))) In ice-9/psyntax.scm: 1484:23 6 (_ _ _) In ice-9/boot-9.scm: 222:17 5 (map1 (#)) In ice-9/psyntax.scm: 1407:23 4 (_ _) 1317:39 3 (syntax-type y (shift #(ribcage #(e) #((top)) #("l-680b775fb37= a463-1343")) #(ribcage () () ()) #(ribcage #(xx) #((top)) #("l-680b775fb37a= 463-1340")) #(ribcage =E2=80=A6)) # =E2=80=A6) 916:15 2 (resolve-identifier y (#>=3D> # #)>) (shift #(ribcage #(e) #((top)) #("l-680b775fb37a463-1= 343")) #(ribcage () () #) =E2=80=A6) =E2=80=A6) 833:21 1 (id-var-name y _ _) 669:4 0 (search y (() #(ribcage () () ()) #(ribcage () () ()) #(ribcag= e () () ()) #(ribcage () () ())) (top) (hygiene guile-user)) ice-9/psyntax.scm:669:4: In procedure search: In procedure vector-ref: Wrong type argument in position 1 (expecting vecto= r): () In ice-9/boot-9.scm: 222:29 19 (map1 _) 222:17 18 (map1 (#f)) In ice-9/psyntax.scm: 1789:11 17 (lp _ ()) 1679:45 16 (parse _ _ _ _ _ _ _) In ice-9/boot-9.scm: 222:17 15 (map1 (() (m-1dff1b83541ce327-8f24e top))) In ice-9/psyntax.scm: 1679:45 14 (parse _ _ _ _ _ _ _) In ice-9/boot-9.scm: 222:17 13 (map1 ((m-1dff1b83541ce327-8fe71 top) shift #(ribcage #(e) #((= top)) #("l-680b775fb37a463-1343")) #(ribcage () () ()) #(ribcage #(xx) #((t= op)) #("l-680b775fb3=E2=80=A6")) #)) In ice-9/psyntax.scm: 1409:12 12 (expand-expr _ _ _ (shift #(ribcage #(e) #((top)) #("l-680b775= fb37a463-1343")) #(ribcage () () ()) #(ribcage #(xx) #((top)) #("l-680b775f= b37a463-1340")) #(# # =E2=80=A6)) # =E2=80=A6) 2054:19 11 (_ _ _ (m-1dff1b83541ce327-8fe71 top) ()) In ice-9/boot-9.scm: 222:17 10 (map1 (# (# #))) In ice-9/psyntax.scm: 1409:12 9 (_ _) 1789:11 8 (lp _ (#(ribcage () () ()) #(ribcage #(x) #((m-1dff1b83541ce32= 7-8f383 top)) #("l-1dff1b83541ce327-8f40b")) #(ribcage () () ()) #(ribcage = () () ()) #(ribcage # =E2=80=A6) =E2=80=A6)) 1679:45 7 (parse _ _ _ _ _ _ _) In ice-9/boot-9.scm: 222:17 6 (map1 (#(ribcage #(x) #((m-1dff1b83541ce327-8f383 top)) #("l-1= dff1b83541ce327-8f40b")) #(ribcage () () ()) shift #(ribcage #(monad body) = #((top) (top)) #("=E2=80=A6" =E2=80=A6)) =E2=80=A6)) In ice-9/psyntax.scm: 2702:67 5 (_ tmp-1dff1b83541ce327-8fa7a _ _) 2646:111 4 (gen-clause # () (#(ribcage () () ()) #(ribcage #(x) #((m-1dff1b83541ce327-8f383 top)) = #("l-1dff1b83541ce3=E2=80=A6")) =E2=80=A6) =E2=80=A6) 2607:69 3 (build-dispatch-call (("8fa7c" . 0)) "1dff1b83541ce327" # #((m-1dff1b83541ce327-8f383 t= op)) (#f #f () (#) # =E2=80=A6)) In ice-9/boot-9.scm: 222:17 2 (map1 ("8fa7c")) In ice-9/psyntax.scm: 2004:10 1 (gen-var _) In unknown file: 0 (symbol->string "8fa7c") ERROR: In procedure symbol->string: In procedure symbol->string: Wrong type argument in position 1 (expecting s= ymbol): "8fa7c" --8<---------------cut here---------------end--------------->8--- Ludo=E2=80=99.