瀏覽代碼

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

git-svn-id: trunk@19924 -

Jonas Maebe 13 年之前
父節點
當前提交
930883edf6
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      compiler/defutil.pas

+ 1 - 1
compiler/defutil.pas

@@ -1058,7 +1058,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: