; hack: intern key pair till have implicit tables of tables

(mac opmeth (tag opt)
  `(opmeths* (sym (+ (string ,tag) "."  (string ,opt)))))