jacinda-3.0.1.1: examples/tags.jac

fn mkEx(s) :=
  '/^' + s + '$/;';

fn processStr(s) :=
  let
    val line := split s /[ \(:]+/
    val outLine := sprintf '%s\t%s\t%s' (line.3 . fp . mkEx s)
  in outLine end;

processStr¨{%/fn +[[:lower:]][[:latin:]]*.*:=/}{`0}