* newcnv -> not oldcnv

compiler/cg386cnv.pas

@@ -49,7 +49,7 @@ implementation
     type
       tsecondconvproc = procedure(pto,pfrom : ptree;convtyp : tconverttype);
 
-{$ifdef NEWCNV}
+{$ifndef OLDCNV}
 
     procedure second_int_to_int(pto,pfrom : ptree;convtyp : tconverttype);
       var
@@ -478,7 +478,7 @@ implementation
            maybe_rangechecking(pto,pfrom^.resulttype,pto^.resulttype);
        end;
 
-{$endif NEWCNV}
+{$endif}
 
     procedure second_string_to_string(pto,pfrom : ptree;convtyp : tconverttype);
       var
@@ -1267,7 +1267,7 @@ implementation
     procedure secondtypeconv(var p : ptree);
       const
          secondconvert : array[tconverttype] of tsecondconvproc = (
-{$ifdef NEWCNV}
+{$ifndef OLDCNV}
            second_nothing, {equal}
            second_nothing, {not_possible}
            second_string_to_string,
@@ -1449,7 +1449,10 @@ implementation
 end.
 {
   $Log$
-  Revision 1.37  1998-11-26 21:33:06  peter
+  Revision 1.38  1998-11-29 12:40:19  peter
+    * newcnv -> not oldcnv
+
+  Revision 1.37  1998/11/26 21:33:06  peter
     * rangecheck updates
 
   Revision 1.36  1998/11/26 14:39:11  peter

compiler/htypechk.pas

@@ -64,7 +64,7 @@ implementation
     function isconvertable(def_from,def_to : pdef;
              var doconv : tconverttype;fromtreetype : ttreetyp;
              explicit : boolean) : boolean;
-{$ifdef NEWCNV}
+{$ifndef OLDCNV}
       { Tbasetype:  uauto,uvoid,uchar,
                     u8bit,u16bit,u32bit,
                     s8bit,s16bit,s32,
@@ -167,7 +167,7 @@ implementation
                case def_from^.deftype of
                  orddef :
                    begin
-{$ifdef NEWCNV}
+{$ifndef OLDCNV}
                      doconv:=basedefconverts[basedeftbl[porddef(def_from)^.typ],basedeftbl[porddef(def_to)^.typ]];
                      b:=true;
                      if (doconv=tc_not_possible) or
@@ -185,7 +185,7 @@ implementation
                        b:=false;
 {$endif}
                    end;
-{$ifdef NEWCNV}
+{$ifndef OLDCNV}
                  enumdef :
                    begin
                      doconv:=tc_int_2_int;
@@ -710,7 +710,10 @@ implementation
 end.
 {
   $Log$
-  Revision 1.9  1998-11-26 13:10:42  peter
+  Revision 1.10  1998-11-29 12:40:23  peter
+    * newcnv -> not oldcnv
+
+  Revision 1.9  1998/11/26 13:10:42  peter
     * new int - int conversion -dNEWCNV
     * some function renamings
 

compiler/tccnv.pas

@@ -234,7 +234,7 @@ implementation
     type
        tfirstconvproc = procedure(var p : ptree);
 
-{$ifdef NEWCNV}
+{$ifndef OLDCNV}
 
     procedure first_int_to_int(var p : ptree);
       begin
@@ -449,7 +449,7 @@ implementation
       end;
 
 
-{$ifndef NEWCNV}
+{$ifdef OLDCNV}
     procedure first_locmem(var p : ptree);
       begin
          p^.location.loc:=LOC_MEM;
@@ -546,7 +546,7 @@ implementation
       proctype : tdeftype;
     const
        firstconvert : array[tconverttype] of tfirstconvproc = (
-{$ifdef NEWCNV}
+{$ifndef OLDCNV}
          first_nothing, {equal}
          first_nothing, {not_possible}
          first_string_to_string,
@@ -955,7 +955,10 @@ implementation
 end.
 {
   $Log$
-  Revision 1.9  1998-11-26 13:10:43  peter
+  Revision 1.10  1998-11-29 12:40:24  peter
+    * newcnv -> not oldcnv
+
+  Revision 1.9  1998/11/26 13:10:43  peter
     * new int - int conversion -dNEWCNV
     * some function renamings
 

compiler/tree.pas

@@ -129,7 +129,7 @@ unit tree;
           loadvmtn
        );
 
-{$ifdef NEWCNV}
+{$ifndef OLDCNV}
        tconverttype = (
           tc_equal,
           tc_not_possible,
@@ -1652,7 +1652,10 @@ unit tree;
 end.
 {
   $Log$
-  Revision 1.54  1998-11-26 13:10:44  peter
+  Revision 1.55  1998-11-29 12:40:20  peter
+    * newcnv -> not oldcnv
+
+  Revision 1.54  1998/11/26 13:10:44  peter
     * new int - int conversion -dNEWCNV
     * some function renamings