]> git.tuebingen.mpg.de Git - paraslash.git/blobdiff - command_util.sh
nuke the AN (array name) header field
[paraslash.git] / command_util.sh
index b757b2e0d29741097e649aeca38bd889b7541e70..1b4376577eb2c542384cba91d4aee95355d89bb0 100755 (executable)
@@ -37,13 +37,11 @@ read_header()
                        ;;
                FN:)
                        file_name="$value"
+                       array_name=${value%command_list}cmds
                        ;;
                AT:)
                        array_type="$value"
                        ;;
-               AN:)
-                       array_name="$value"
-                       ;;
                IN:)
                        for i in $value; do
                                includes="$includes
@@ -178,7 +176,7 @@ com_man()
        done
 }
 
-com_array()
+com_c_file()
 {
        echo "/** \file $file_name.c $c_file_comment */"
        echo "$includes"
@@ -221,7 +219,7 @@ dump_proto()
        echo
 }
 
-com_proto()
+com_header()
 {
        echo "/** \file $file_name.h $header_comment */"
        echo
@@ -242,11 +240,11 @@ read_header
 arg="$1"
 shift
 case "$arg" in
-       "array")
-               com_array
+       "c")
+               com_c_file
                ;;
-       "proto")
-               com_proto
+       "h")
+               com_header
                ;;
        "man")
                com_man $*