Changeset 5888 in project for matchable/matchable-test.scm


Ignore:
Timestamp:
09/03/07 18:15:26 (13 years ago)
Author:
Alex Shinn
Message:

Fixing quasiquote patterns.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • matchable/matchable-test.scm

    r4622 r5888  
    214214            '((a b) (1 2) (c . 3) (d . 4) (e . 5)))
    215215
     216(test-equal "Riastradh quasiquote"
     217            (match '(1 2 3) (`(1 ,b ,c) (list b c)))
     218            '(2 3))
     219
    216220(test-end "match")
    217221
Note: See TracChangeset for help on using the changeset viewer.