(Gramext.action (fun _ loc -> None, loc))
; [Gramext.Stoken ("ATAG","")
;Gramext.Snterm (Grammar.Entry.obj sym_attributes)
- ;Gramext.Stoken ("SYMBOL",">")
+ ;Gramext.Stoken ("SYMBOL","\005")
;Gramext.Stoken ("SYMBOL",s)
;Gramext.Stoken ("ATAGEND","")],
(Gramext.action (fun _ uridesc _ _ _ loc -> (Some uridesc),loc))