update ast

1 files changed, 0 insertions, 22 deletions

diff --git a/ast/cexpand.pl b/ast/cexpand.pl
deleted file mode 100755
index 0795c04..0000000
--- a/ast/cexpand.pl
+++ /dev/null
@@ -1,22 +0,0 @@
-#!/star/Perl/bin/perl
-   while( $line = <STDIN> ) {
-      chomp( $line );
-      if( $line =~ /^\/\*(.*)\*\/\s*$/ ) {
-         print "\n/*";
-         $len = 0;
-         foreach $word ( split '\s+', $1 ) {
-            $len += length( $word ) + 1;
-            if( $len > 70 ) {
-               print "\n   ";
-               $len = length( $word ) + 1;
-            }
-            print " $word";
-         }
-         print " */\n";
-
-      } else {
-         print "$line\n";
-      }
-
-   }
-