|
@@ -449,6 +449,7 @@ implementation
|
|
|
1: result := OS_8;
|
|
|
2: result := OS_16;
|
|
|
4: result := OS_32;
|
|
|
+ 8: result := OS_64;
|
|
|
else
|
|
|
internalerror(2001092311);
|
|
|
end;
|
|
@@ -500,7 +501,10 @@ begin
|
|
|
end.
|
|
|
{
|
|
|
$Log$
|
|
|
- Revision 1.2 2001-09-28 20:39:33 jonas
|
|
|
+ Revision 1.3 2001-09-29 21:33:47 jonas
|
|
|
+ * support 64bit operands in def_cgsize()
|
|
|
+
|
|
|
+ Revision 1.2 2001/09/28 20:39:33 jonas
|
|
|
* changed all flow control structures (except for exception handling
|
|
|
related things) to processor independent code (in new ncgflw unit)
|
|
|
+ generic cgobj unit which contains lots of code generator helpers with
|