home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 4 / Apprentice-Release4.iso / Source Code / C / Applications / MacPerl 5.0.3 / MacPerl Source ƒ / Perl5 / xf < prev    next >
Encoding:
Text File  |  1994-12-26  |  8.3 KB  |  245 lines  |  [TEXT/MPS ]

  1. #!/usr/bin/perl -i.bak
  2.  
  3. while (<>) {
  4.     study;
  5.     s/\bSTR\b/SV/g && study;
  6.     s/\bARRAY\b/AV/g && study;
  7.     s/\bARG\b/OP/g && study;
  8.     s/\bHASH\b/HV/g && study;
  9.     s/\bHENT\b/HE/g && study;
  10.     s/\bCMD\b/COP/g && study;
  11.     s/\bSPAT\b/PM/g && study;
  12.     s/\bSTIO\b/IO/g && study;
  13.     s/\bSTAB\b/GV/g && study;
  14.     s/\bSTBP\b/GP/g && study;
  15.     s/\bSUBR\b/CV/g && study;
  16.  
  17.     s/\bNullstr\b/Nullsv/g && study;
  18.     s/\bNullarg\b/Nullop/g && study;
  19.     s/\bNullcmd\b/Nullcop/g && study;
  20.     s/\bNullstab\b/Nullgv/g && study;
  21.  
  22.     s/\bstruct stab\b/struct gv/g && study;
  23.     s/\bstruct stabptrs\b/struct gp/g && study;
  24.     s/\bstruct stio\b/struct io/g && study;
  25.     s/\bstruct string\b/struct sv/g && study;
  26.     s/\bstruct scanpat\b/struct pm/g && study;
  27.     s/\bstruct formcmd\b/struct ff/g && study;
  28.     s/\bstruct hentry\b/struct he/g && study;
  29.     s/\bstruct atbl\b/struct av/g && study;
  30.     s/\bstruct htbl\b/struct hv/g && study;
  31.     s/\bstruct cmd\b/struct cop/g && study;
  32.  
  33.     s/\bcmdname\b/cop_name/g && study;
  34.     s/\bopname\b/op_name/g && study;
  35.  
  36.     s/\bstab_stab\b/GvGV/g && study;
  37.     s/\bstab_estab\b/GvEGV/g && study;
  38.     s/\bstab_stash\b/GvSTASH/g && study;
  39.     s/\bstab_estash\b/GvESTASH/g && study;
  40.     s/\bstab_name\b/GvNAME/g && study;
  41.     s/\bstab_ename\b/GvENAME/g && study;
  42.     s/\bstab_hash\b/GvHVn/g && study;
  43.     s/\bstab_xhash\b/GvHV/g && study;
  44.     s/\bstab_array\b/GvAVn/g && study;
  45.     s/\bstab_xarray\b/GvAV/g && study;
  46.     s/\bstab_sub\b/GvCV/g && study;
  47.     s/\bstab_form\b/GvFORM/g && study;
  48.     s/\bstab_magic\b/GvMAGIC/g && study;
  49.     s/\bstab_val\b/GvSV/g && study;
  50.     s/\bstab_xio\b/GvIO/g && study;
  51.     s/\bstab_io\b/GvIOn/g && study;
  52.     s/\bstab_lastexpr\b/GvLASTEXPR/g && study;
  53.     s/\bstab_line\b/GvLINE/g && study;
  54.     s/\bstab_flags\b/GvFLAGS/g && study;
  55.  
  56.     s/\bstbp_val\b/gp_sv/g && study;
  57.     s/\bstbp_array\b/gp_av/g && study;
  58.     s/\bstbp_hash\b/gp_hv/g && study;
  59.     s/\bstbp_stab\b/gp_egv/g && study;
  60.  
  61.     s/\bstr_array\b/sv_av/g && study;
  62.     s/\bstr_hash\b/sv_hv/g && study;
  63.     s/\bstr_cmd\b/sv_cop/g && study;
  64.     s/\bstr_args\b/sv_op/g && study;
  65.     s/\bstr_nval\b/sv_nv/g && study;
  66.     s/\bstr_pval\b/sv_pv/g && study;
  67.  
  68.     s/\bSTABSET\b/SvSETMAGIC/g && study;
  69.     s/\bstabset\b/sv_setmagic/g && study;
  70.     s/\bSTR_SSET\b/sv_setsv/g && study;
  71.     s/\bSTR_GROW\b/SvGROW/g && study;
  72.  
  73.     s/\bstr_true\b/SvTRUE/g && study;
  74.     s/\bstr_peek\b/SvPEEK/g && study;
  75.     s/\bstr_get\b/SvPV/g && study;
  76.     s/\bstr_gnum\b/SvNV/g && study;
  77.  
  78.     s/\bstab\b/gv/g && study;
  79.     s/\bstr\b/sv/g && study;
  80.     s/\bStr\b/Sv/g && study;
  81.  
  82.     s/\baadd\b/gv_AVn/g && study;
  83.  
  84.     s/\baclear\b/av_clear/g && study;
  85.     s/\bafake\b/av_fake/g && study;
  86.     s/\bafetch\b/av_fetch/g && study;
  87.     s/\bafill\b/av_fill/g && study;
  88.     s/\bafree\b/av_free/g && study;
  89.     s/\balen\b/av_len/g && study;
  90.     s/\banew\b/newAV/g && study;
  91.     s/\bapop\b/av_pop/g && study;
  92.     s/\bapush\b/av_push/g && study;
  93.     s/\barg_free\b/op_free/g && study;
  94.     s/\bashift\b/av_shift/g && study;
  95.     s/\bastore\b/av_store/g && study;
  96.     s/\baunshift\b/av_unshift/g && study;
  97.     s/\bcastulong\b/cast_ulong/g && study;
  98.     s/\bcmd_free\b/op_free/g && study;
  99.     s/\bcurcmd\b/curcop/g && study;
  100.     s/\bdump_arg\b/dump_op/g && study;
  101.     s/\bdump_cmd\b/dump_op/g && study;
  102.     s/\bdump_spat\b/dump_pm/g && study;
  103.     s/\bdump_stab\b/dump_gv/g && study;
  104.     s/\bdumpfds\b/dump_fds/g && study;
  105.     s/\bfbmcompile\b/fbm_compile/g && study;
  106.     s/\bfbminstr\b/fbm_instr/g && study;
  107.     s/\bfstab\b/newGVfile/g && study;
  108.     s/\bgenstab\b/newGVgen/g && study;
  109.     s/\bgrow_dlevel\b/deb_growlevel/g && study;
  110.     s/\bhadd\b/gv_HVn/g && study;
  111.     s/\bhclear\b/hv_clear/g && study;
  112.     s/\bhdelete\b/hv_delete/g && study;
  113.     s/\bhentdelayfree\b/he_delayfree/g && study;
  114.     s/\bhentfree\b/he_free/g && study;
  115.     s/\bhfetch\b/hv_fetch/g && study;
  116.     s/\bhfree\b/hv_free/g && study;
  117.     s/\bhiterinit\b/hv_iterinit/g && study;
  118.     s/\bhiterkey\b/hv_iterkey/g && study;
  119.     s/\bhiternext\b/hv_iternext/g && study;
  120.     s/\bhiterval\b/hv_iterval/g && study;
  121.     s/\bhnew\b/newHV/g && study;
  122.     s/\bhstore\b/hv_store/g && study;
  123.     s/\blistish\b/forcelist/g && study;
  124.     s/\bmaybelistish\b/maybeforcelist/g && study;
  125.     s/\bmylstat\b/my_lstat/g && study;
  126.     s/\bmypclose\b/my_pclose/g && study;
  127.     s/\bmypfiopen\b/my_pfiopen/g && study;
  128.     s/\bmypopen\b/my_popen/g && study;
  129.     s/\bmystat\b/my_stat/g && study;
  130.     s/\bop_new\b/newOP/g && study;
  131.     s/\bperl_alloc\b/perl_alloc/g && study;
  132.     s/\bperl_callback\b/perl_callpv/g && study;
  133.     s/\bperl_callv\b/perl_callargv/g && study;
  134.     s/\bperl_construct\b/perl_construct/g && study;
  135.     s/\bperl_destruct\b/perl_destruct/g && study;
  136.     s/\bperl_free\b/perl_free/g && study;
  137.     s/\bperl_parse\b/perl_parse/g && study;
  138.     s/\bperl_run\b/perl_run/g && study;
  139.     s/\bregcomp\b/regcomp/g && study;
  140.     s/\bregdump\b/regdump/g && study;
  141.     s/\bregexec\b/regexec/g && study;
  142.     s/\bregfree\b/regfree/g && study;
  143.     s/\bregnext\b/regnext/g && study;
  144.     s/\bregprop\b/regprop/g && study;
  145.     s/\brepeatcpy\b/repeatcpy/g && study;
  146.     s/\brestorelist\b/leave_scope/g && study;
  147.     s/\bsaveaptr\b/save_aptr/g && study;
  148.     s/\bsaveary\b/save_ary/g && study;
  149.     s/\bsavehash\b/save_hash/g && study;
  150.     s/\bsavehptr\b/save_hptr/g && study;
  151.     s/\bsaveint\b/save_int/g && study;
  152.     s/\bsaveitem\b/save_item/g && study;
  153.     s/\bsavelines\b/save_lines/g && study;
  154.     s/\bsavelist\b/save_list/g && study;
  155.     s/\bsavelong\b/save_long/g && study;
  156.     s/\bsavenostab\b/save_nostab/g && study;
  157.     s/\bsavesptr\b/save_sptr/g && study;
  158.     s/\bscanconst\b/scan_const/g && study;
  159.     s/\bscanhex\b/scan_hex/g && study;
  160.     s/\bscanident\b/scan_ident/g && study;
  161.     s/\bscanoct\b/scan_oct/g && study;
  162.     s/\bscanpat\b/scan_pat/g && study;
  163.     s/\bscanstr\b/scan_str/g && study;
  164.     s/\bscansubst\b/scan_subst/g && study;
  165.     s/\bscantrans\b/scan_trans/g && study;
  166.     s/\bstab_check\b/gv_check/g && study;
  167.     s/\bstab_clear\b/gv_clear/g && study;
  168.     s/\bstab_efullname\b/gv_efullname/g && study;
  169.     s/\bstab_fullname\b/gv_fullname/g && study;
  170.     s/\bstab_len\b/gv_len/g && study;
  171.     s/\bstab_str\b/gv_str/g && study;
  172.     s/\bstabent\b/gv_fetchpv/g && study;
  173.     s/\bstio_new\b/newIO/g && study;
  174.     s/\bstr_2mortal\b/sv_2mortal/g && study;
  175.     s/\bstr_2num\b/sv_2num/g && study;
  176.     s/\bstr_2ptr\b/sv_2ptr/g && study;
  177.     s/\bstr_cat\b/sv_catpv/g && study;
  178.     s/\bstr_chop\b/sv_chop/g && study;
  179.     s/\bstr_cmp\b/sv_cmp/g && study;
  180.     s/\bstr_dec\b/sv_dec/g && study;
  181.     s/\bstr_eq\b/sv_eq/g && study;
  182.     s/\bstr_free\b/sv_free/g && study;
  183.     s/\bstr_gets\b/sv_gets/g && study;
  184.     s/\bstr_grow\b/sv_grow/g && study;
  185.     s/\bstr_inc\b/sv_inc/g && study;
  186.     s/\bstr_insert\b/sv_insert/g && study;
  187.     s/\bstr_len\b/sv_len/g && study;
  188.     s/\bstr_magic\b/sv_magic/g && study;
  189.     s/\bstr_make\b/newSVpv/g && study;
  190.     s/\bstr_mortal\b/sv_mortalcopy/g && study;
  191.     s/\bstr_ncat\b/sv_catpvn/g && study;
  192.     s/\bstr_new\b/newSV/g && study;
  193.     s/\bstr_nmake\b/newSVnv/g && study;
  194.     s/\bstr_nset\b/sv_setpvn/g && study;
  195.     s/\bstr_numset\b/sv_setnv/g && study;
  196.     s/\bstr_replace\b/sv_replace/g && study;
  197.     s/\bstr_reset\b/sv_reset/g && study;
  198.     s/\bstr_scat\b/sv_catsv/g && study;
  199.     s/\bstr_set\b/sv_setpv/g && study;
  200.     s/\bstr_smake\b/newSVsv/g && study;
  201.     s/\bstr_sset\b/sv_setsv/g && study;
  202.     s/\btaintenv\b/taint_env/g && study;
  203.     s/\btaintproper\b/taint_proper/g && study;
  204.     s/\barg\b/op/g && study;
  205.     s/\barg_ptr\.//g && study;
  206.     s/\barg_/op_/g && study;
  207.  
  208.     s/\bSTR_/SV_/g && study;
  209.     s/\bSP_/SVp_/g && study;
  210.     s/\bSS_/SVs_/g && study;
  211.     s/\bSTAB_/GV_/g && study;
  212.     s/\bSF_/GVf_/g && study;
  213.     s/\bSPAT_/PMf_/g && study;
  214.     #s/\bF_/FFt_/g && study;
  215.     s/\bFC_/FFf_/g && study;
  216.     s/\bO_/OP_/g && study;
  217.     s/\bC_/COP_/g && study;
  218.     s/\bCF_/COPf_/g && study;
  219.     s/\bCFT_/COPo_/g && study;
  220.     s/\bARF_/AVf_/g && study;
  221.     s/\bIOF_/IOf_/g && study;
  222.     s/\bStr_new\b/NEWSV/g && study;
  223.  
  224.     s/\bstbp_/gp_/g && study;
  225.     s/\bstab_/gv_/g && study;
  226.     s/\bspat_/pm_/g && study;
  227.     s/\bstio/io/g && study;
  228.     s/\bf_/ff_/g && study;
  229.     s/\bStr_/Sv_/g && study;
  230.     s/\bstr_/sv_/g && study;
  231.     s/\btbl_/hv_/g && study;
  232.     s/\bary_/av_/g && study;
  233.     s/acmd\.ac_/acop_/g && study;
  234.     s/ccmd\.cc_/ccop_/g && study;
  235.     s/scmd\.sc_/scop_/g && study;
  236.     s/\bac_/acop_/g;
  237.     s/\bcc_/ccop_/g;
  238.     s/\bsc_/scop_/g;
  239.     s/\bc_/cop_/g;
  240.     s/spat/pm/g;
  241.     s/stab/gv/g;
  242.  
  243.     print;
  244. }
  245.