GNU bug report logs - #17940
Nitpick: (lambda () (begin)) errors

Previous Next

Package: guile;

Reported by: Taylan Ulrich Bayirli/Kammer <taylanbayirli <at> gmail.com>

Date: Fri, 4 Jul 2014 22:40:01 UTC

Severity: minor

Full log

View this message in rfc822 format

From: Matt Wette <matt.wette <at> gmail.com>
To: 17940 <at> debbugs.gnu.org
Subject: bug#17940: (begin)
Date: Fri, 13 Mar 2020 06:08:01 -0700

I have run into this also, in writing macros.
My workaround is to always add (if #f #f)
in my forms that allow no expressions in the body.
See second-to-last line below.

(define-syntax sx-match-1
  (syntax-rules ()
    ((_ v (pat exp ...) c1 ...)
     (let ((kf (lambda () (sx-match-1 v c1 ...))))
       (sxm-sexp v pat (begin (if #f #f) exp ...) (kf))))
    ((_ v) (error "sx-match: nothing matches"))))
This bug report was last modified 5 years and 95 days ago.

Previous Next

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.