Changeset 37807 for trunk/Ohana/src/libautocode/generate
- Timestamp:
- Jan 11, 2015, 2:14:39 PM (12 years ago)
- Location:
- trunk/Ohana
- Files:
-
- 2 edited
-
. (modified) (1 prop)
-
src/libautocode/generate (modified) (4 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/Ohana
- Property svn:mergeinfo changed
-
trunk/Ohana/src/libautocode/generate
r26384 r37807 144 144 if ($type eq "e_time") { $pt1 = "J"; } 145 145 if ($type eq "e_void") { $pt1 = "B"; $Np = 8*$Np; } 146 # if ($type eq "Image") { $pt1 = "B"; $Np = 8*$Np; } 146 147 # e_void is a 64 bit pointer, cast to size_t. its value is not loaded 147 148 # from the table. … … 248 249 if ($type eq "e_time") { $pt1 = sprintf "I%s", $length; } 249 250 if ($type eq "e_void") { $pt1 = sprintf "I%s", $length; } 251 # if ($type eq "Image") { $pt1 = sprintf "I%s", $length; } 250 252 251 253 if (!$pt1) { die "unknown type $type"; } … … 331 333 if ($type eq "e_time") { $T = "WORD"; $n = 4; } 332 334 if ($type eq "e_void") { $T = "DBLE"; $n = 8; } 335 # if ($type eq "Image") { $T = "DBLE"; $n = 8; } 333 336 334 337 if (!$n) { die "unknown type $type"; } … … 375 378 if ($type eq "e_time") { $Nbytes += 4*$Np; $valid = 1; } 376 379 if ($type eq "e_void") { $Nbytes += 8*$Np; $valid = 1; } 380 # if ($type eq "Image") { $Nbytes += 8*$Np; $valid = 1; } 377 381 if (!$valid) { die "unknown type $type"; } 378 382 }
Note:
See TracChangeset
for help on using the changeset viewer.
