diff liboctave/sparse-mk-ops.awk @ 10317:42d098307c30

untabify additional source files
author John W. Eaton <jwe@octave.org>
date Thu, 11 Feb 2010 13:30:42 -0500
parents 4270ded9ddc6
children fd0a3ac60b0e
line wrap: on
line diff
--- a/liboctave/sparse-mk-ops.awk
+++ b/liboctave/sparse-mk-ops.awk
@@ -65,184 +65,184 @@
           result_tag_2 = $2;
           lhs_tag = $3;
           rhs_tag = $4;
-	  op_type = $5;
+          op_type = $5;
 
-	  bin_ops = index (op_type, "B") != 0;
-	  cmp_ops = index (op_type, "C") != 0;
-	  eqne_ops = index (op_type, "E") != 0;
-	  bool_ops = index (op_type, "L") != 0;
+          bin_ops = index (op_type, "B") != 0;
+          cmp_ops = index (op_type, "C") != 0;
+          eqne_ops = index (op_type, "E") != 0;
+          bool_ops = index (op_type, "L") != 0;
 
           n = 5;
 
           lhs_conv = cmp_ops ? $(++n) : "";
           rhs_conv = cmp_ops ? $(++n) : "";
 
-	  if (lhs_conv == "NONE")
-	    lhs_conv = "";
+          if (lhs_conv == "NONE")
+            lhs_conv = "";
 
-	  if (rhs_conv == "NONE")
-	    rhs_conv = "";
+          if (rhs_conv == "NONE")
+            rhs_conv = "";
 
-	  k = 0
-	  while (NF > n)
-	    bool_headers[k++] = $(++n);
+          k = 0
+          while (NF > n)
+            bool_headers[k++] = $(++n);
 
-	  cc_file = sprintf ("%s-%s-%s.cc", prefix, lhs_tag, rhs_tag);
-	  h_file = sprintf ("%s-%s-%s.h", prefix, lhs_tag, rhs_tag);
+          cc_file = sprintf ("%s-%s-%s.cc", prefix, lhs_tag, rhs_tag);
+          h_file = sprintf ("%s-%s-%s.h", prefix, lhs_tag, rhs_tag);
 
-	  if (list_cc_files)
-	    {
-	      print cc_file;
-	      next;
-	    }
+          if (list_cc_files)
+            {
+              print cc_file;
+              next;
+            }
 
-	  if (list_h_files)
-	    {
-	      print h_file;
-	      next;
-	    }
+          if (list_h_files)
+            {
+              print h_file;
+              next;
+            }
 
-	  if (make_inclusive_header)
-	    {
+          if (make_inclusive_header)
+            {
               printf ("#include \"%s\"\n", h_file);
               next;
             }
 
-	  h_guard = sprintf ("octave_%s_%s_%s_h", prefix, lhs_tag, rhs_tag);
+          h_guard = sprintf ("octave_%s_%s_%s_h", prefix, lhs_tag, rhs_tag);
 
-	  result_num_1 = rev_tag[result_tag_1];
-	  result_num_2 = rev_tag[result_tag_2];
-	  lhs_num = rev_tag[lhs_tag];
-	  rhs_num = rev_tag[rhs_tag];
+          result_num_1 = rev_tag[result_tag_1];
+          result_num_2 = rev_tag[result_tag_2];
+          lhs_num = rev_tag[lhs_tag];
+          rhs_num = rev_tag[rhs_tag];
 
-	  result_type_1 = type[result_num_1];
-	  result_type_2 = type[result_num_2];
-	  lhs_type = type[lhs_num];
+          result_type_1 = type[result_num_1];
+          result_type_2 = type[result_num_2];
+          lhs_type = type[lhs_num];
           rhs_type = type[rhs_num];
 
-	  result_scalar_zero_val_1 = scalar_zero_val[result_num_1];
-	  result_scalar_zero_val_2 = scalar_zero_val[result_num_2];
+          result_scalar_zero_val_1 = scalar_zero_val[result_num_1];
+          result_scalar_zero_val_2 = scalar_zero_val[result_num_2];
           lhs_scalar_zero_val = scalar_zero_val[lhs_num];
           rhs_scalar_zero_val = scalar_zero_val[rhs_num];
 
-	  result_header_1 = header[result_num_1];
-	  result_header_2 = header[result_num_2];
-	  lhs_header = header[lhs_num];
+          result_header_1 = header[result_num_1];
+          result_header_2 = header[result_num_2];
+          lhs_header = header[lhs_num];
           rhs_header = header[rhs_num];
 
-	  lhs_class = class[lhs_num];
-	  rhs_class = class[rhs_num];
+          lhs_class = class[lhs_num];
+          rhs_class = class[rhs_num];
 
-	  print "// DO NOT EDIT -- generated by sparse-mk-ops" > h_file;
+          print "// DO NOT EDIT -- generated by sparse-mk-ops" > h_file;
 
-	  printf ("#if !defined (%s)\n", h_guard) >> h_file;
-	  printf ("#define %s 1\n", h_guard) >> h_file;
+          printf ("#if !defined (%s)\n", h_guard) >> h_file;
+          printf ("#define %s 1\n", h_guard) >> h_file;
 
           if (result_header_1)
-	    {
-	      if (result_fwd_decl_ok)
-	        printf ("class %s\n", result_type_1) >> h_file;
-	      else
-	        printf ("#include \"%s\"\n", result_header_1) >> h_file;
-	    }
+            {
+              if (result_fwd_decl_ok)
+                printf ("class %s\n", result_type_1) >> h_file;
+              else
+                printf ("#include \"%s\"\n", result_header_1) >> h_file;
+            }
 
           if (result_header_2 && ! (result_header_2 == result_header_1))
-	    {
-	      if (result_fwd_decl_ok)
-	        printf ("class %s\n", result_type_2) >> h_file;
-	      else
-	        printf ("#include \"%s\"\n", result_header_2) >> h_file;
-	    }
+            {
+              if (result_fwd_decl_ok)
+                printf ("class %s\n", result_type_2) >> h_file;
+              else
+                printf ("#include \"%s\"\n", result_header_2) >> h_file;
+            }
 
           if (lhs_header && ! (lhs_header == result_header_1 || lhs_header == result_header_2))
-	    {
-	      if (result_fwd_decl_ok)
-	        printf ("class %s\n", lhs_type) >> h_file;
-	      else
-	        printf ("#include \"%s\"\n", lhs_header) >> h_file;
-	    }
+            {
+              if (result_fwd_decl_ok)
+                printf ("class %s\n", lhs_type) >> h_file;
+              else
+                printf ("#include \"%s\"\n", lhs_header) >> h_file;
+            }
 
           if (rhs_header && ! (rhs_header == lhs_header || rhs_header == result_header_1 || rhs_header == result_header_2))
-	    {
-	      if (result_fwd_decl_ok)
-	        printf ("class %s\n", rhs_type) >> h_file;
-	      else
-	        printf ("#include \"%s\"\n", rhs_header) >> h_file;
-	    }
+            {
+              if (result_fwd_decl_ok)
+                printf ("class %s\n", rhs_type) >> h_file;
+              else
+                printf ("#include \"%s\"\n", rhs_header) >> h_file;
+            }
 
           printf ("#include \"Sparse-op-defs.h\"\n") >> h_file;
 
           if (bin_ops)
             printf ("SPARSE_%s%s_BIN_OP_DECLS (%s, %s, %s, %s, OCTAVE_API)\n", lhs_class,
-		    rhs_class, result_type_1, result_type_2, lhs_type, 
-		    rhs_type) >> h_file
+                    rhs_class, result_type_1, result_type_2, lhs_type, 
+                    rhs_type) >> h_file
 
           if (cmp_ops)
             printf ("SPARSE_%s%s_CMP_OP_DECLS (%s, %s, OCTAVE_API)\n", lhs_class,
-		    rhs_class, lhs_type, rhs_type) >> h_file
+                    rhs_class, lhs_type, rhs_type) >> h_file
 
           if (eqne_ops)
             printf ("SPARSE_%s%s_EQNE_OP_DECLS (%s, %s, OCTAVE_API)\n", lhs_class,
-		    rhs_class, lhs_type, rhs_type) >> h_file
+                    rhs_class, lhs_type, rhs_type) >> h_file
 
           if (bool_ops)
             printf ("SPARSE_%s%s_BOOL_OP_DECLS (%s, %s, OCTAVE_API)\n", lhs_class,
-		    rhs_class, lhs_type, rhs_type) >> h_file
+                    rhs_class, lhs_type, rhs_type) >> h_file
 
 
           print "#endif" >> h_file;
 
-	  close (h_file);
+          close (h_file);
 
 
-	  print "// DO NOT EDIT -- generated by sparse-mk-ops" > cc_file;
+          print "// DO NOT EDIT -- generated by sparse-mk-ops" > cc_file;
 
-	  ## print "#ifdef HAVE_CONFIG_H" >> cc_file;
-	  print "#include <config.h>" >> cc_file;
-	  ## print "#endif" >> cc_file;
+          ## print "#ifdef HAVE_CONFIG_H" >> cc_file;
+          print "#include <config.h>" >> cc_file;
+          ## print "#endif" >> cc_file;
 
-	  print "#include \"Array-util.h\"" >> cc_file;
-	  print "#include \"quit.h\"" >> cc_file;
+          print "#include \"Array-util.h\"" >> cc_file;
+          print "#include \"quit.h\"" >> cc_file;
 
-	  printf ("#include \"%s\"\n", h_file) >> cc_file;
+          printf ("#include \"%s\"\n", h_file) >> cc_file;
 
-	  for (i in bool_headers)
-	    {
-	      printf ("#include \"%s\"\n", bool_headers[i]) >> cc_file;
-	      delete bool_headers[i];
-	    }
+          for (i in bool_headers)
+            {
+              printf ("#include \"%s\"\n", bool_headers[i]) >> cc_file;
+              delete bool_headers[i];
+            }
 
           if (result_header_1)
-	    printf ("#include \"%s\"\n", result_header_1) >> cc_file;
+            printf ("#include \"%s\"\n", result_header_1) >> cc_file;
 
           if (result_header_2 && ! (result_header_2 == result_header_1))
-	    printf ("#include \"%s\"\n", result_header_2) >> cc_file;
+            printf ("#include \"%s\"\n", result_header_2) >> cc_file;
 
           if (lhs_header && ! (lhs_header == result_header_1 || lhs_header == result_header_2))
-	    printf ("#include \"%s\"\n", lhs_header) >> cc_file;
+            printf ("#include \"%s\"\n", lhs_header) >> cc_file;
 
           if (rhs_header && ! (rhs_header == lhs_header || rhs_header == result_header_1 || rhs_heaer == result_header_2))
-	    printf ("#include \"%s\"\n", rhs_header) >> cc_file;
+            printf ("#include \"%s\"\n", rhs_header) >> cc_file;
 
-	  if (bin_ops)
+          if (bin_ops)
             printf ("SPARSE_%s%s_BIN_OPS (%s, %s, %s, %s)\n", lhs_class, 
-		    rhs_class, result_type_1, result_type_2, lhs_type, 
-		    rhs_type) >> cc_file
+                    rhs_class, result_type_1, result_type_2, lhs_type, 
+                    rhs_type) >> cc_file
 
           if (cmp_ops)
             printf ("SPARSE_%s%s_CMP_OPS (%s, %s, %s, %s, %s, %s)\n", 
-		    lhs_class, rhs_class, lhs_type, lhs_scalar_zero_val,
-		    lhs_conv, rhs_type, rhs_scalar_zero_val, rhs_conv) >> cc_file
+                    lhs_class, rhs_class, lhs_type, lhs_scalar_zero_val,
+                    lhs_conv, rhs_type, rhs_scalar_zero_val, rhs_conv) >> cc_file
 
           if (eqne_ops)
             printf ("SPARSE_%s%s_EQNE_OPS (%s, %s, %s, %s, %s, %s)\n", 
-		    lhs_class, rhs_class, lhs_type, lhs_scalar_zero_val,
-		    lhs_conv, rhs_type, rhs_scalar_zero_val, rhs_conv) >> cc_file
+                    lhs_class, rhs_class, lhs_type, lhs_scalar_zero_val,
+                    lhs_conv, rhs_type, rhs_scalar_zero_val, rhs_conv) >> cc_file
 
           if (bool_ops)
             printf ("SPARSE_%s%s_BOOL_OPS2 (%s, %s, %s, %s)\n", lhs_class, 
-		    rhs_class, lhs_type, rhs_type, lhs_scalar_zero_val,
-	            rhs_scalar_zero_val) >> cc_file
+                    rhs_class, lhs_type, rhs_type, lhs_scalar_zero_val,
+                    rhs_scalar_zero_val) >> cc_file
 
 
           close (cc_file);