From mboxrd@z Thu Jan 1 00:00:00 1970 From: Ricardo Wurmus Subject: bug#27476: guix pull fails on powerful server Date: Mon, 25 Sep 2017 16:02:36 +0200 Message-ID: <87bmlyzxj7.fsf@elephly.net> References: <87h8vvp1q7.fsf@elephly.net> <87377esu1a.fsf@gnu.org> <87k20nz18u.fsf@igalia.com> <87a81jj5gg.fsf@gnu.org> Mime-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: 8bit Return-path: Sender: "Debbugs-submit" Resent-Message-ID: In-reply-to: <87a81jj5gg.fsf@gnu.org> 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: Ludovic =?UTF-8?Q?Court=C3=A8s?= Cc: Andy Wingo , help-guix@gnu.org, 27476@debbugs.gnu.org List-Id: help-guix.gnu.org Ludovic Courtès writes: > With this program: > > --8<---------------cut here---------------start------------->8--- > (use-modules (ice-9 threads) > (srfi srfi-1)) > > (define-syntax-parameter foo > (identifier-syntax +)) > > (define threads > (unfold (lambda (x) (> x 100)) > (lambda (x) > (call-with-new-thread > (lambda () > (while #t > (macroexpand > '(syntax-parameterize ((foo (identifier-syntax -))) > (foo y z))))))) > 1+ > 0)) > > (for-each join-thread threads) > --8<---------------cut here---------------end--------------->8--- I have tried this programme on my 16 core 32G workstation, and on the 192 core 1.5T server, but could not get it to segfault. -- Ricardo GPG: BCA6 89B6 3655 3801 C3C6 2150 197A 5888 235F ACAC https://elephly.net