diff --git a/basis/classes/struct/struct.factor b/basis/classes/struct/struct.factor index 4b829c8935..45dd8405dc 100644 --- a/basis/classes/struct/struct.factor +++ b/basis/classes/struct/struct.factor @@ -301,7 +301,7 @@ SYNTAX: S@ : parse-struct-slot` ( accum -- accum ) scan-string-param scan-c-type` \ } parse-until - [ <struct-slot-spec> ] 3curry over push-all ; + [ <struct-slot-spec> over push ] 3curry over push-all ; : parse-struct-slots` ( accum -- accum more? ) scan {