chiark
/
gitweb
/
~mdw
/
sod
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(from parent 1:
e783e65
)
src/module-parse.lisp (`set'): Parse at least one property if no pset.
author
Mark Wooding
<mdw@distorted.org.uk>
Thu, 26 May 2016 08:26:09 +0000
(09:26 +0100)
committer
Mark Wooding
<mdw@distorted.org.uk>
Fri, 8 Jun 2018 18:58:28 +0000
(19:58 +0100)
Allow
[foo = "thing"] set;
and
set foo = "thing";
but not plain
set;
src/module-parse.lisp
patch
|
blob
|
blame
|
history
diff --git
a/src/module-parse.lisp
b/src/module-parse.lisp
index f90f360ae61f2dfcecaaf87fadadfedc7cd2ac5b..b72d7c80a25638cafbdbc8ade61dd0096962956c 100644
(file)
--- a/
src/module-parse.lisp
+++ b/
src/module-parse.lisp
@@
-178,7
+178,7
@@
(define-pluggable-parser module set (scanner pset)
:location (p-location prop))
(setf (p-seenp prop) t))
pset))
- (parse (skip-many (:min
0
)
+ (parse (skip-many (:min
(if pset 0 1)
)
(error (:ignore-unconsumed t)
(parse-property scanner module-pset)
(skip-until () #\, #\;))