X-Git-Url: https://git.distorted.org.uk/~mdw/sod/blobdiff_plain/e783e65bc434b69ad73684c035aac345878ba6e9..99a74df16eefa9687463c4338e066e8275cc3101:/src/module-parse.lisp diff --git a/src/module-parse.lisp b/src/module-parse.lisp index f90f360..b72d7c8 100644 --- a/src/module-parse.lisp +++ b/src/module-parse.lisp @@ -178,7 +178,7 @@ :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 () #\, #\;))