support backslashes in patterns
parent
54fb498c63
commit
ce347b018d
@ -0,0 +1,2 @@
|
|||||||
|
#lang brag
|
||||||
|
start: "a" "\"" "'" "\\" 'a' '"' '\'' '\\'
|
@ -1,2 +0,0 @@
|
|||||||
#lang brag
|
|
||||||
start: "a" "\"" "'" 'a' '"' '\''
|
|
@ -0,0 +1,6 @@
|
|||||||
|
#lang racket/base
|
||||||
|
(require brag/examples/quotation-marks-and-backslashes
|
||||||
|
brag/support
|
||||||
|
rackunit)
|
||||||
|
|
||||||
|
(check-equal? (parse-tree "a\"'\\a\"'\\") '(start "a" "\"" "'" "\\" "a" "\"" "'" "\\"))
|
@ -1,6 +0,0 @@
|
|||||||
#lang racket/base
|
|
||||||
(require brag/examples/quotation-marks
|
|
||||||
brag/support
|
|
||||||
rackunit)
|
|
||||||
|
|
||||||
(check-equal? (parse-tree "a\"'a\"'") '(start "a" "\"" "'" "a" "\"" "'"))
|
|
Loading…
Reference in New Issue