Changeset 41422 for trunk/Ohana/src/libautocode/generate

Timestamp:

Sep 24, 2020, 2:44:55 PM (6 years ago)

Author:

eugene

Message:

rename libfits byte-type to gfbyte to avoid collisions

File:

• trunk/Ohana/src/libautocode/generate (modified) (4 diffs)

trunk/Ohana/src/libautocode/generate

@@ -118 +118 @@
         $pt1 = 0;
         if ($type eq "char")          { $pt1 = "A"; }
-        if ($type eq "byte")          { $pt1 = "B"; }
+        if ($type eq "gfbyte")        { $pt1 = "B"; }
         if ($type eq "unsigned char") { $pt1 = "B"; }
         if ($type eq "rawshort")      { $pt1 = "I"; }
@@ -225 +225 @@
         $pt1 = 0;
         if ($type eq "char")          { $pt1 = sprintf "A%s", $length; }
-        if ($type eq "byte")          { $pt1 = sprintf "I%s", $length; }
+        if ($type eq "gfbyte")        { $pt1 = sprintf "I%s", $length; }
         if ($type eq "unsigned char") { $pt1 = sprintf "I%s", $length; }
         if ($type eq "rawshort")      { $pt1 = sprintf "I%s", $length; }
@@ -308 +308 @@
         $n = 0;
         if ($type eq "char")          { $N +=   $Np; next; }
-        if ($type eq "byte")          { $N +=   $Np; next; }
+        if ($type eq "gfbyte")        { $N +=   $Np; next; }
         if ($type eq "unsigned char") { $N +=   $Np; next; }
         if ($type eq "rawshort")      { $N += 2*$Np; next; }
@@ -355 +355 @@
         $valid = 0;
         if ($type eq "char")           { $Nbytes += 1*$Np; $valid = 1; }
-        if ($type eq "byte")           { $Nbytes += 1*$Np; $valid = 1; }
+        if ($type eq "gfbyte")         { $Nbytes += 1*$Np; $valid = 1; }
         if ($type eq "unsigned char")  { $Nbytes += 1*$Np; $valid = 1; }
         if ($type eq "rawshort")       { $Nbytes += 2*$Np; $valid = 1; }