[bug #31691] Ellipsis not supported in nested `sxml-match' forms [1.9.13]

[ludo@gnu.org (Ludovic Courtès)]

[-- Attachment #1: Type: text/plain, Size: 241 bytes --]

Hi Jim,

I stumbled upon the bug below with sxml-match as included in Guile 1.9.

Do you have ideas on how to fix it?  My guess is that is has to do with
‘...’ not being specified as a literal in the macros.

Thanks,
Ludo’.


[-- Attachment #2: Type: message/rfc822, Size: 4924 bytes --]

From: anonymous <INVALID.NOREPLY@gnu.org>
To: bug-guile@gnu.org
Subject: [bug #31691] Ellipsis not supported in nested `sxml-match' forms [1.9.13]
Date: Thu, 18 Nov 2010 09:10:37 +0000
Message-ID: <20101118-091036.sv0.12070@savannah.gnu.org>


URL:
  <http://savannah.gnu.org/bugs/?31691>

                 Summary: Ellipsis not supported in nested `sxml-match' forms
[1.9.13]
                 Project: Guile
            Submitted by: None
            Submitted on: Thu 18 Nov 2010 09:10:36 AM UTC
                Category: None
                Severity: 3 - Normal
              Item Group: None
                  Status: None
                 Privacy: Public
             Assigned to: None
             Open/Closed: Open
         Discussion Lock: Any

    _______________________________________________________

Details:

This fails:

#v+
scheme@(guile-user)> (sxml-match '(foo (bar 1 2 3)) ((foo ,x ...) (sxml-match
(car x) ((bar ,y ...) y))))
While compiling expression:
ERROR: bad pattern syntax (symbol not allowed in this context)
Exception during displaying of error: misc-error
#v-

... whereas in non-nested position ellipsis obviously works:

#v+
scheme@(guile-user)> (define (match-bar x) (sxml-match x ((bar ,y ...) y)))
scheme@(guile-user)> (sxml-match '(foo (bar 1 2 3)) ((foo ,x ...) (sxml-match
(car x) (,(match-bar -> y) y))))
$1 = (1 2 3)
#v-

Has to do with `...' not specified as a literal in the `sxml-match' macros...




    _______________________________________________________

Reply to this item at:

  <http://savannah.gnu.org/bugs/?31691>

_______________________________________________
  Message sent via/by Savannah
  http://savannah.gnu.org/