chiark
/
gitweb
/
~mdw
/
sod
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Work in progress. Mostly bug fixing.
[sod]
/
src
/
module-parse.lisp
diff --git
a/src/module-parse.lisp
b/src/module-parse.lisp
index 1989ebbf3a68c81d8fa35ac4151e21bf9395864e..f87c586707399f35891bdfcf75e6b86cc40c8a1d 100644
(file)
--- a/
src/module-parse.lisp
+++ b/
src/module-parse.lisp
@@
-159,6
+159,8
@@
(define-pluggable-parser module class (scanner)
;; `class' id [`:' id-list] `{' class-item* `}'
(with-parser-context (token-scanner-context :scanner scanner)
;; `class' id [`:' id-list] `{' class-item* `}'
(with-parser-context (token-scanner-context :scanner scanner)
+ (labels ((parse-item ()
+ ;; class-item ::= property-set
(parse (seq ("class"
(name :id)
(supers (? (seq (#\: (supers (list (:min 1) :id #\,)))
(parse (seq ("class"
(name :id)
(supers (? (seq (#\: (supers (list (:min 1) :id #\,)))