Skip to content

Instantly share code, notes, and snippets.

@dyoo
Created January 28, 2013 19:36
#lang racket
(module foo ragg/sexp/lang
rule-1: "0"+ || rule-2
rule-2: "1"
)
(require (prefix-in test: (submod "." foo)))
(test:parse '("0" "0" "0"))
(test:parse '("0" "0"))
(test:parse '("1"))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment