Skip to content

Instantly share code, notes, and snippets.

@dyoo
Created January 22, 2013 22:11
Show Gist options
  • Select an option

  • Save dyoo/4599022 to your computer and use it in GitHub Desktop.

Select an option

Save dyoo/4599022 to your computer and use it in GitHub Desktop.
#lang racket
(require syntax/parse)
(syntax-parse #'("foo" "bar")
[((~and "foo" x) y)
(list #'x #'y)])
(syntax-parse #'("food" "bar")
[((~and "foo" x) y)
(list #'x #'y)])
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment