From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from mp10.migadu.com ([2001:41d0:2:bcc0::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by ms5.migadu.com with LMTPS id kJTDNQR0QGMlagAAbAwnHQ (envelope-from ) for ; Fri, 07 Oct 2022 20:46:29 +0200 Received: from aspmx1.migadu.com ([2001:41d0:2:bcc0::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by mp10.migadu.com with LMTPS id 6ITlNAR0QGMknAAAG6o9tA (envelope-from ) for ; Fri, 07 Oct 2022 20:46:28 +0200 Received: from lists.gnu.org (lists.gnu.org [209.51.188.17]) (using TLSv1.2 with cipher ECDHE-RSA-AES256-GCM-SHA384 (256/256 bits)) (No client certificate requested) by aspmx1.migadu.com (Postfix) with ESMTPS id 80EC2A206 for ; Fri, 7 Oct 2022 20:46:28 +0200 (CEST) Received: from localhost ([::1]:43758 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1ogsMd-0003BX-M9 for larch@yhetil.org; Fri, 07 Oct 2022 14:46:27 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]:36528) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1ogsLy-0003BI-Dc for help-guix@gnu.org; Fri, 07 Oct 2022 14:45:47 -0400 Received: from mx1.dismail.de ([78.46.223.134]:19820) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1ogsLw-0002wQ-RV for help-guix@gnu.org; Fri, 07 Oct 2022 14:45:46 -0400 Received: from mx1.dismail.de (localhost [127.0.0.1]) by mx1.dismail.de (OpenSMTPD) with ESMTP id 8420dd9e for ; Fri, 7 Oct 2022 20:45:42 +0200 (CEST) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed; d=dismail.de; h= mime-version:date:content-type:content-transfer-encoding:from :message-id:subject:to:in-reply-to:references; s=20190914; bh=46 IJOhuQOEHopIsF9WjT0adbbtCSLDIS7WeJcfURaLw=; b=Yivg/w0/SMZQYXW6Gu hGAKuQm0DLboxBKH9XGP9rpOB8AqsCAQFuWniE8PkSfYsapF7K+rwpmRrxrsMLIK z5hLcCoAtDSh2wBXMun0bRcqLXL6y/KHFH5tpEKwW0QbarzMdPpZxhsS9b93g16v yvrqQhYefCLwxTFzxHj7YI0Aw/RTzxiEu5lk4vRA4GdGw0gudX7XUvUq8KKNUUON C4GXN4Brshja3lyxZksMOT3+kCv9bVB2wjm+rUwfQteQhxYQLSYkxagtnUSPfAsZ cFdsFTzcJu/egbdy4iTgCxulD40qsUCtE8w28Neq/iP+C/sHjtwad625DydiYe6G Yu5A== Received: from smtp2.dismail.de ( [10.240.26.12]) by mx1.dismail.de (OpenSMTPD) with ESMTP id 9818bcb9 for ; Fri, 7 Oct 2022 20:45:42 +0200 (CEST) Received: from smtp2.dismail.de (localhost [127.0.0.1]) by smtp2.dismail.de (OpenSMTPD) with ESMTP id 5a9c7209 for ; Fri, 7 Oct 2022 20:45:42 +0200 (CEST) Received: by dismail.de (OpenSMTPD) with ESMTPSA id 8710eabc (TLSv1.3:TLS_AES_256_GCM_SHA384:256:NO); Fri, 7 Oct 2022 20:45:37 +0200 (CEST) MIME-Version: 1.0 Date: Fri, 07 Oct 2022 18:45:36 +0000 Content-Type: text/plain; charset="utf-8" Content-Transfer-Encoding: quoted-printable X-Mailer: RainLoop/1.16.0a From: jbranso@dismail.de Message-ID: Subject: Re: How can I step through this code? To: "jgart" , "Guix Help" In-Reply-To: <20221005220527.GB3151@dismail.de> References: <20221005220527.GB3151@dismail.de> Received-SPF: pass client-ip=78.46.223.134; envelope-from=jbranso@dismail.de; helo=mx1.dismail.de X-Spam_score_int: -27 X-Spam_score: -2.8 X-Spam_bar: -- X-Spam_report: (-2.8 / 5.0 requ) BAYES_00=-1.9, DKIM_SIGNED=0.1, DKIM_VALID=-0.1, DKIM_VALID_AU=-0.1, DKIM_VALID_EF=-0.1, RCVD_IN_DNSWL_LOW=-0.7, SPF_HELO_NONE=0.001, SPF_PASS=-0.001 autolearn=ham autolearn_force=no X-Spam_action: no action X-BeenThere: help-guix@gnu.org X-Mailman-Version: 2.1.29 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: help-guix-bounces+larch=yhetil.org@gnu.org Sender: "Help-Guix" X-Migadu-Flow: FLOW_IN X-Migadu-Country: US ARC-Message-Signature: i=1; a=rsa-sha256; c=relaxed/relaxed; d=yhetil.org; s=key1; t=1665168388; h=from:from:sender:sender:reply-to:subject:subject:date:date: message-id:message-id:to:to:cc:mime-version:mime-version: content-type:content-type: content-transfer-encoding:content-transfer-encoding: in-reply-to:in-reply-to:references:references:list-id:list-help: list-unsubscribe:list-subscribe:list-post:dkim-signature; bh=AKdr1OZLAp05MgvcY17nuijhU2+xzPA7FlffU0KzRIw=; b=V4XD2NPqt3xakmmlDVUBFVuitK1abulkB5wxC5NVSC2fduxygiyOy7p7UlEJQLdYXLV1uq LuzeIvcKonsJ5Hf4QqhPqbui/hcsTV1qvRdWJGjV6bSC3IRNDvrqlVogX6kV4sKyPP1ULa XE1me+m1B+zRNL+y+mV33LJuekJalxAAfO4bXkm2qOMVd3lKoOAKT8ZclXx0c1XchK9aZd gJD9jAmizG4QxFfzh1Kwz2SNW8kT0sIByhIhAaX5dqnGd9T8PPmmYsnkBe2MyfIzuDEj56 ECCLpl8ZesXoK9Gy5DZY7hMCD3lLxsLUnmDbS67tW0F60sS7uliDO2zCvRQtzw== ARC-Seal: i=1; s=key1; d=yhetil.org; t=1665168388; a=rsa-sha256; cv=none; b=hlgYVDQW9uqIBnxl/UkzX5Ttv3OAEnOvVMncco4wKyw0UIxQmzjybYqUANuIhC/8+ukaVk 72TpYjfTmbvf/oXLN+avLK1v406aZU5Xm1x2tU8cNKAv+d6l6of3LOtq4kRRmQAZR/5aJZ ku3v/pIMVDJX4RzBeuPx6agk66ogG/U7nSpmLXz6hheJv9I73CRKNP4R8+fHv7vN/ouCDz 45ifUlrQ5CWBaxgzzDnpdNpaS3UgybjGxznOcBxJwvL+/4pJonD4MbwNksoZxV1CBV6KyT 8KQmQ+B+iTdo47wAPK4Kc2tq7GIa3D1zPBVaPnl/IAVQiTtR1nWRMQ9zMrUbIA== ARC-Authentication-Results: i=1; aspmx1.migadu.com; dkim=pass header.d=dismail.de header.s=20190914 header.b="Yivg/w0/"; dmarc=pass (policy=reject) header.from=dismail.de; spf=pass (aspmx1.migadu.com: domain of "help-guix-bounces+larch=yhetil.org@gnu.org" designates 209.51.188.17 as permitted sender) smtp.mailfrom="help-guix-bounces+larch=yhetil.org@gnu.org" X-Migadu-Spam-Score: -3.97 Authentication-Results: aspmx1.migadu.com; dkim=pass header.d=dismail.de header.s=20190914 header.b="Yivg/w0/"; dmarc=pass (policy=reject) header.from=dismail.de; spf=pass (aspmx1.migadu.com: domain of "help-guix-bounces+larch=yhetil.org@gnu.org" designates 209.51.188.17 as permitted sender) smtp.mailfrom="help-guix-bounces+larch=yhetil.org@gnu.org" X-Migadu-Queue-Id: 80EC2A206 X-Spam-Score: -3.97 X-Migadu-Scanner: scn1.migadu.com X-TUID: 7hwhnYWXueX5 October 5, 2022 11:06 PM, "jgart" wrote: > Hi >=20 >=20How can I step through this code? >=20 If=20you ever find out, then let me know! I wish guile had a nice debugger like elisp. :) > (define-syntax do > (syntax-rules () > ((do ((var init step ...) ...) > (test expr ...) > command ...) > (letrec > ((loop > (lambda (var ...) > (if test > (begin > (if #f #f) > expr ...) > (begin > command > ... > (loop (do "step" var step ...) > ...)))))) > (loop init ...))) > ((do "step" x) > x) > ((do "step" x y) > y)))