diff options
author | florian <florian@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2005-09-17 18:09:47 +0000 |
---|---|---|
committer | florian <florian@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2005-09-17 18:09:47 +0000 |
commit | 9f9d03729fc7fb59426b891189fb4d3a68ff019a (patch) | |
tree | b99338bfee9613aeea33e863c8d024c9d2bf3671 | |
parent | 57a898d074966ac200d8096962bac6944239508c (diff) | |
download | fpc-9f9d03729fc7fb59426b891189fb4d3a68ff019a.tar.gz |
* allow type postfix like: [esi].currency
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@1098 3ad0048d-3df7-0310-abae-a5850022a9f2
-rw-r--r-- | compiler/i386/ra386int.pas | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/compiler/i386/ra386int.pas b/compiler/i386/ra386int.pas index b52a94cf5f..991252fe3f 100644 --- a/compiler/i386/ra386int.pas +++ b/compiler/i386/ra386int.pas @@ -1653,6 +1653,8 @@ Unit Ra386int; if oper.opr.typ in [OPR_REFERENCE,OPR_LOCAL] then oper.SetSize(typesize,true); end; + else + oper.SetSize(typesize,true); end; end else |