(mac attribute (tag opt f)
; `(= (opmeth ',tag ',opt) ,f)
  `(= (opmeths* ',(sym (+ (string tag) "."  (string opt))))
      ,f))

From html.arc ©