Author: yamakenz Date: Mon Aug 27 20:25:29 2007 New Revision: 4912 Added: trunk/tools/abbrev-uim-scm.pl
Log: * tools/abbrev-uim-scm.pl - New file - Add uim-scm canonical form -> abbreviated form substitutions Added: trunk/tools/abbrev-uim-scm.pl ============================================================================== --- (empty file) +++ trunk/tools/abbrev-uim-scm.pl Mon Aug 27 20:25:29 2007 @@ -0,0 +1,50 @@ +# Usaage: +# perl -i -p abbrev-sub.pl source.c ... + +s/\buim_scm_error\(/ERROR\(/g; +s/\buim_scm_error_obj\(/ERROR_OBJ\(/g; +s/\bUIM_SCM_ENSURE\(/ENSURE\(/g; +s/\bUIM_SCM_ENSURE_OBJ\(/ENSURE_OBJ\(/g; +s/\bUIM_SCM_ENSURE_TYPE\(/ENSURE_TYPE\(/g; +s/\buim_scm_c_bool\(/C_BOOL\(/g; +s/\buim_scm_c_int\(/C_INT\(/g; +s/\buim_scm_c_char\(/C_CHAR\(/g; +s/\buim_scm_c_str\(/C_STR\(/g; +s/\buim_scm_refer_c_str\(/REFER_C_STR\(/g; +s/\buim_scm_c_symbol\(/C_SYM\(/g; +s/\buim_scm_c_ptr\(/C_PTR\(/g; +s/\buim_scm_c_func_ptr\(/C_FPTR\(/g; +s/\buim_scm_make_bool\(/MAKE_BOOL\(/g; +s/\buim_scm_make_int\(/MAKE_INT\(/g; +s/\buim_scm_make_char\(/MAKE_CHAR\(/g; +s/\buim_scm_make_str\(/MAKE_STR\(/g; +s/\buim_scm_make_str_directly\(/MAKE_STR_DIRECTLY\(/g; +s/\buim_scm_make_symbol\(/MAKE_SYM\(/g; +s/\buim_scm_make_ptr\(/MAKE_PTR\(/g; +s/\buim_scm_make_func_ptr\(/MAKE_FPTR\(/g; +s/\buim_scm_intp\(/INTP\(/g; +s/\buim_scm_charp\(/CHARP\(/g; +s/\buim_scm_vectorp\(/VECTORP\(/g; +s/\buim_scm_stringp\(/STRP\(/g; +s/\buim_scm_symbolp\(/SYMP\(/g; +s/\buim_scm_ptrp\(/PTRP\(/g; +s/\buim_scm_func_ptrp\(/FPTRP\(/g; +s/\buim_scm_nullp\(/NULLP\(/g; +s/\buim_scm_consp\(/CONSP\(/g; +s/\buim_scm_listp\(/LISTP\(/g; +s/\buim_scm_truep\(/TRUEP\(/g; +s/\buim_scm_falsep\(/FALSEP\(/g; +s/\buim_scm_eq\(/EQ\(/g; +s/\buim_scm_car\(/CAR\(/g; +s/\buim_scm_cdr\(/CDR\(/g; +s/\buim_scm_set_car\(/SET_CAR\(/g; +s/\buim_scm_set_cdr\(/SET_CDR\(/g; +s/\buim_scm_cons\(/CONS\(/g; +s/\buim_scm_list1\(/LIST1\(/g; +s/\buim_scm_list2\(/LIST2\(/g; +s/\buim_scm_list3\(/LIST3\(/g; +s/\buim_scm_list4\(/LIST4\(/g; +s/\buim_scm_list5\(/LIST5\(/g; +s/\buim_scm_quote\(/QUOTE\(/g; +s/\buim_scm_vector_ref\(/VECTOR_REF\(/g; +s/\buim_scm_vector_set\(/VECTOR_SET\(/g;
