From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from mail-ua1-x932.google.com (mail-ua1-x932.google.com [IPv6:2607:f8b0:4864:20::932]) by sourceware.org (Postfix) with ESMTPS id 861D03858D1E for ; Sat, 19 Nov 2022 14:37:43 +0000 (GMT) DMARC-Filter: OpenDMARC Filter v1.4.1 sourceware.org 861D03858D1E Authentication-Results: sourceware.org; dmarc=pass (p=none dis=none) header.from=gmail.com Authentication-Results: sourceware.org; spf=pass smtp.mailfrom=gmail.com Received: by mail-ua1-x932.google.com with SMTP id p1so2640748uak.11 for ; Sat, 19 Nov 2022 06:37:43 -0800 (PST) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20210112; h=to:subject:message-id:date:from:mime-version:from:to:cc:subject :date:message-id:reply-to; bh=N8WdiUjMDMievztbhEhPOhUOEIEQys3ftLF21YHl5V0=; b=qhx4LvRbL4tcPcxe87mPBPzM3WCRSVR2LOc7DRavPuSJM16X4aFsT/5ctOWqpbxbrd ibpcmzfRuD0RpPB1jRtNv8tB++3G8Qf7HtMchcKVMZSHIpeQro2UX9KNzkSdz3TR5WGs r6fxGokWrd2Z0DtbbCtNUZInFB3JRk2KN0m12Lx8pX2SPT+sZJOWUPP5h2ojHYQ51pTS o92WxBuF7JkYaHlew1apdysY4Cj+Q2Dv7ncz8LXn+t+6I8iFBC1hQb4h5ljl7yw5dTXo ERnC542+Q0XbEQrI7HCglN3cq40xuTmLR3oigiF1xJf6OCuiVcJQ34xoOOdi6IHJV3+V 3UOg== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20210112; h=to:subject:message-id:date:from:mime-version:x-gm-message-state :from:to:cc:subject:date:message-id:reply-to; bh=N8WdiUjMDMievztbhEhPOhUOEIEQys3ftLF21YHl5V0=; b=I05GjWgI3nEFciuvJBo4sKM/AL34yDUunbIVviWTZR7uuRo66K87XSeO4XoYeZCIuM ughqTCjt+3NzKXdj8EzqDI4K9ZlEyCSh07bSa/4nJUa/hgfzAu3FzQgzwayvwm6pWHCY hDCCGvoZHVXmLbEbChAtgZibyvP2PvYElqQIrKGSMY61L7caK1JpaUjqL7z8cHOIu10h mgidSX0Ys5IByMvE6P3V756WNTlwNwcVF/h5nXYvblpLOEBBxfpzYgWJUt9ustSbNvYp RHk08qg+nnUx/LeZFBMJF1qZiT8v9VKPvBaSyVbplR/QhsC2UXpBrQCJDq6UyBwVvPkz 3rcw== X-Gm-Message-State: ANoB5pldcZXfxhoWanXIZcX3OMgElyVzJjQiIWA0B2gEqE+QaZJLzkOx Senj3ng2bbudALer7KHMgwo7wMFE8j3na8Bb9nDPjHZowk+wlg== X-Google-Smtp-Source: AA0mqf6dw7Om0MB4P8V8m0SGfd8m2KaDcMOdaZX/2VDvlnW0//wJtkUeKqRTy7RTFiYnQtWo84WUXMfeoYnz9xoxqCM= X-Received: by 2002:ab0:6601:0:b0:401:c732:b395 with SMTP id r1-20020ab06601000000b00401c732b395mr6221100uam.112.1668868662700; Sat, 19 Nov 2022 06:37:42 -0800 (PST) MIME-Version: 1.0 From: Panicz Maciej Godek Date: Sat, 19 Nov 2022 15:37:16 +0100 Message-ID: Subject: "define-constant is only allowed in a " To: kawa@sourceware.org Content-Type: multipart/alternative; boundary="000000000000d12f3905edd3c368" X-Spam-Status: No, score=0.1 required=5.0 tests=BAYES_00,DKIM_SIGNED,DKIM_VALID,DKIM_VALID_AU,DKIM_VALID_EF,FREEMAIL_FROM,HTML_MESSAGE,RCVD_IN_DNSWL_NONE,SPF_HELO_NONE,SPF_PASS,TXREP autolearn=ham autolearn_force=no version=3.4.6 X-Spam-Checker-Version: SpamAssassin 3.4.6 (2021-04-09) on server2.sourceware.org List-Id: --000000000000d12f3905edd3c368 Content-Type: text/plain; charset="UTF-8" I have a module named (mapping), which contains a thing that I have called "mapping", which is a nice functional interface to mutable hash tables (based on SRFI-17): https://github.com/panicz/grasp-android/blob/master/stages/retreat/GRASP/src/mapping.scm Therein, you can also find the following definition of define-mapping: (define-syntax-rule (define-mapping (mapping-name key) default-value) (define-early-constant mapping-name (mapping (key) default-value))) where define-syntax-rule is defined in a straightforward way in another module. When I try to use this code from yet another module -- more specifically, this one: https://github.com/panicz/grasp-android/blob/master/stages/retreat/GRASP/src/panel.scm#L130 as (define-mapping (on-key-press code) never) I get the error message define-constant is only allowed in a but when I use the expanded version (define on-key-press (mapping (code) never)) everything works. I wonder what could be the reason of Kawa's behavior. --000000000000d12f3905edd3c368--