Pārlūkot izejas kodu

* fix compile for ppc,sparc,m68k

peter 22 gadi atpakaļ
vecāks
revīzija
72ad478f97

+ 5 - 1
compiler/m68k/n68kcnv.pas

@@ -238,6 +238,7 @@ implementation
            @second_bool_to_int,
            @second_real_to_real,
            @second_int_to_real,
+           @second_nothing, { currency_to_real, handled in resulttype pass }
            @second_proc_to_procvar,
            @second_nothing, { arrayconstructor_to_set }
            @second_nothing, { second_load_smallset, handled in first pass }
@@ -296,7 +297,10 @@ begin
 end.
 {
   $Log$
-  Revision 1.9  2003-04-23 13:40:33  peter
+  Revision 1.10  2003-04-23 21:10:54  peter
+    * fix compile for ppc,sparc,m68k
+
+  Revision 1.9  2003/04/23 13:40:33  peter
     * fix m68k compile
 
   Revision 1.8  2003/02/19 22:00:16  daniel

+ 5 - 1
compiler/powerpc/nppccnv.pas

@@ -336,6 +336,7 @@ implementation
            @second_bool_to_int,
            @second_real_to_real,
            @second_int_to_real,
+           @second_nothing, { real_to_currency, handled in resulttype pass }
            @second_proc_to_procvar,
            @second_nothing, { arrayconstructor_to_set }
            @second_nothing, { second_load_smallset, handled in first pass }
@@ -394,7 +395,10 @@ begin
 end.
 {
   $Log$
-  Revision 1.31  2003-04-23 12:35:35  florian
+  Revision 1.32  2003-04-23 21:10:54  peter
+    * fix compile for ppc,sparc,m68k
+
+  Revision 1.31  2003/04/23 12:35:35  florian
     * fixed several issues with powerpc
     + applied a patch from Jonas for nested function calls (PowerPC only)
     * ...

+ 4 - 2
compiler/psystem.pas

@@ -311,7 +311,6 @@ implementation
         s32floattype.setdef(tfloatdef.create(s32real));
         s64floattype.setdef(tfloatdef.create(s64real));
         s80floattype.setdef(tfloatdef.create(s80real));
-        s64currencytype.setdef(torddef.create(s64currency));
         s64currencytype.setdef(torddef.create(scurrency,low(int64),high(int64)));
 {$endif powerpc}
 {$ifdef sparc}
@@ -483,7 +482,10 @@ implementation
 end.
 {
   $Log$
-  Revision 1.45  2003-04-23 20:16:04  peter
+  Revision 1.46  2003-04-23 21:10:54  peter
+    * fix compile for ppc,sparc,m68k
+
+  Revision 1.45  2003/04/23 20:16:04  peter
     + added currency support based on int64
     + is_64bit for use in cg units instead of is_64bitint
     * removed cgmessage from n386add, replace with internalerrors

+ 5 - 1
compiler/sparc/ncpucnv.pas

@@ -307,6 +307,7 @@ procedure TSparctypeconvnode.second_call_helper(c : tconverttype);
       @second_bool_to_int,
       @second_real_to_real,
       @second_int_to_real,
+      @second_nothing, { currency_to_real, handled in resulttype pass }
       @second_proc_to_procvar,
       @second_nothing, { arrayconstructor_to_set }
       @second_nothing, { second_load_smallset, handled in first pass }
@@ -360,7 +361,10 @@ begin
 end.
 {
   $Log$
-  Revision 1.14  2003-04-23 13:35:39  peter
+  Revision 1.15  2003-04-23 21:10:54  peter
+    * fix compile for ppc,sparc,m68k
+
+  Revision 1.14  2003/04/23 13:35:39  peter
     * fix sparc compile
 
   Revision 1.13  2003/03/10 21:59:54  mazen