diff options
Diffstat (limited to 'trunk/CIAO/CCF/CCF/IDL2/SemanticGraph/Fundamental.m4')
-rw-r--r-- | trunk/CIAO/CCF/CCF/IDL2/SemanticGraph/Fundamental.m4 | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/trunk/CIAO/CCF/CCF/IDL2/SemanticGraph/Fundamental.m4 b/trunk/CIAO/CCF/CCF/IDL2/SemanticGraph/Fundamental.m4 new file mode 100644 index 00000000000..5aaab71bd76 --- /dev/null +++ b/trunk/CIAO/CCF/CCF/IDL2/SemanticGraph/Fundamental.m4 @@ -0,0 +1,17 @@ +# file : CCF/IDL2/SemanticGraph/Fundamental.m4 +# author : Boris Kolpackov <boris@dre.vanderbilt.edu> +# cvs-id : $Id$ + +define(`upcase', `translit(`$*', `a-z', `A-Z')') + + +define(`capitalize_word', + `regexp(`$1', `^\(.\)\(.*\)', `upcase(`\1')`\2'')') + + +define(`capitalize', + `patsubst(`$1', `\w+', `capitalize_word(`\&')')') + +define(`make_class_name', `patsubst(capitalize(`$1'), ` ')') + +define(`make_var_name', `patsubst(`$1', ` ', `_')') |