anchor.diff:  piqdef_erlname({piq_list, X}) -> X#piq_list.erlang_name.
   
   
  -gen_parse(Mod, ErlMod, Def) ->
  -    Name = piqdef_name(Def),
  -    ErlName = piqdef_erlname(Def),
  +gen_parse(Mod, ErlMod, Name, ErlName) ->
       [
           "parse_", ErlName, "(X, Format) ->\n",
           "    ", ErlMod, ":parse_", ErlName, "(\n",
  
positive.code:     Mod = Piqi#piqi.module,
      ErlMod = Piqi#piqi.erlang_module,
      Defs = Piqi#piqi.piqdef,
  
      Filename = binary_to_list(ErlMod) ++ "_ext.erl",
  
  
negative.code:             "-compile(export_all).\n"
          ],
          gen_embedded_piqi(ErlMod),
          [ gen_parse_def(Mod, ErlMod, X) || X <- Defs ],
          [ gen_gen_def(Mod, ErlMod, X) || X <- Defs ],
          [ gen_parse_func(Mod, ErlMod, X) || X <- Functions ],
          [ gen_gen_func(Mod, ErlMod, X) || X <- Functions ]
      ]),
      ok = file:write_file(Filename, Code).
  
  