diff --git a/compiler/types.pas b/compiler/types.pas
index 3ad65489dd..a2d19ee523 100644
--- a/compiler/types.pas
+++ b/compiler/types.pas
@@ -1391,13 +1391,8 @@ implementation
                    begin { ordinal to real }
                      if is_integer(def_from) then
                        begin
-                          { in delphi int64 can not be converted to real }
-                          if not((m_tp in aktmodeswitches) and
-                                 (torddef(def_from).typ in [u64bit,s64bit])) then
-                           begin
-                             doconv:=tc_int_2_real;
-                             b:=1;
-                           end;
+                         doconv:=tc_int_2_real;
+                         b:=1;
                        end;
                    end;
                  floatdef :
@@ -1784,7 +1779,11 @@ implementation
 end.
 {
   $Log$
-  Revision 1.47  2001-09-03 13:27:41  jonas
+  Revision 1.48  2001-10-16 17:15:44  jonas
+    * auto-converting from int64 to real is again allowed for all modes
+      (it's allowed in Delphi too)
+
+  Revision 1.47  2001/09/03 13:27:41  jonas
     * compilerproc implementation of set addition/substraction/...
     * changed the declaration of some set helpers somewhat to accomodate the
       above change