Browse Source

--- Merging r19924 into '.':
U compiler/defutil.pas

# revisions: 19924
------------------------------------------------------------------------
r19924 | jonas | 2011-12-30 13:30:12 +0100 (Fri, 30 Dec 2011) | 3 lines
Changed paths:
M /trunk/compiler/defutil.pas

* also report currency as automatable on non-x87 platforms
(may fix mantis #20986)

------------------------------------------------------------------------

git-svn-id: branches/fixes_2_6@20155 -

marco 13 years ago
parent
commit
32fab9dab7
1 changed files with 1 additions and 1 deletions
  1. 1 1
      compiler/defutil.pas

+ 1 - 1
compiler/defutil.pas

@@ -1047,7 +1047,7 @@ implementation
         case p.typ of
           orddef:
             result:=torddef(p).ordtype in [u8bit,s8bit,u16bit,s16bit,u32bit,s32bit,
-              u64bit,s64bit,bool16bit];
+              u64bit,s64bit,bool16bit,scurrency];
           floatdef:
             result:=tfloatdef(p).floattype in [s64currency,s64real,s32real];
           stringdef: