- removed all ifdef cardinalmulfix code

compiler/i386/n386add.pas

@@ -958,18 +958,8 @@ interface
           do_normal:
                    mboverflow:=false;
                    cmpop:=false;
-{$ifndef cardinalmulfix}
-                   unsigned :=
-                     (left.resulttype^.deftype=pointerdef) or
-                     (right.resulttype^.deftype=pointerdef) or
-                     ((left.resulttype^.deftype=orddef) and
-                      (porddef(left.resulttype)^.typ=u32bit)) or
-                     ((right.resulttype^.deftype=orddef) and
-                      (porddef(right.resulttype)^.typ=u32bit));
-{$else cardinalmulfix}
                    unsigned := not(is_signed(left.resulttype)) or
                                not(is_signed(right.resulttype));
-{$endif cardinalmulfix}
                    case nodetype of
                       addn : begin
                                { this is a really ugly hack!!!!!!!!!! }
@@ -2299,7 +2289,10 @@ begin
 end.
 {
   $Log$
-  Revision 1.6  2000-12-05 11:44:32  jonas
+  Revision 1.7  2000-12-16 15:56:18  jonas
+    - removed all ifdef cardinalmulfix code
+
+  Revision 1.6  2000/12/05 11:44:32  jonas
     + new integer regvar handling, should be much more efficient
 
   Revision 1.5  2000/11/29 00:30:45  florian

compiler/options.pas

@@ -1235,12 +1235,6 @@ begin
 {$ifdef SUPPORT_FIXED}
   def_symbol('HASFIXED');
 {$endif SUPPORT_FIXED}
-{$ifdef cardinalmulfix}
-{ for the compiler }
-  def_symbol('CARDINALMULFIX');
-{ for the RTL }
-  def_symbol('CARDINALMULFIXED');
-{$endif cardinalmulfix}
   def_symbol('PACKENUMFIXED');
 
 { some stuff for TP compatibility }
@@ -1510,7 +1504,10 @@ end;
 end.
 {
   $Log$
-  Revision 1.20  2000-12-15 13:26:01  jonas
+  Revision 1.21  2000-12-16 15:56:19  jonas
+    - removed all ifdef cardinalmulfix code
+
+  Revision 1.20  2000/12/15 13:26:01  jonas
     * only return int64's from functions if it int64funcresok is defined
     + added int64funcresok define to options.pas
 

rtl/inc/systemh.inc

@@ -236,9 +236,7 @@ Function  Swap (X:Int64):Int64;
 {$endif RTLLITE}
 
 Function  Random(l:cardinal):cardinal;
-{$ifndef cardinalmulfixed}
 Function  Random(l:longint):longint;
-{$endif cardinalmulfixed}
 Function  Random: extended;
 Procedure Randomize;
 
@@ -486,7 +484,10 @@ const
 
 {
   $Log$
-  Revision 1.14  2000-12-08 14:04:43  jonas
+  Revision 1.15  2000-12-16 15:56:19  jonas
+    - removed all ifdef cardinalmulfix code
+
+  Revision 1.14  2000/12/08 14:04:43  jonas
     + added pos(char,ansistring), because there is also a pos(char,shortstring)
       and without the ansistring version, the shortstring version is always
       called when calling pos(char,pchar), even when using $h+ (because the