diff options
| author | peter <peter@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2008-03-02 17:48:27 +0000 |
|---|---|---|
| committer | peter <peter@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2008-03-02 17:48:27 +0000 |
| commit | 5b9dff2584f1cf8682c25570cb9b87718a73b9ee (patch) | |
| tree | 1f42bbd579fb10509af2541e0770a66e4693e447 /compiler/ncon.pas | |
| parent | 2c36a02df776dcfed5ecdc62f00bed0d8ac64a7d (diff) | |
| download | fpc-5b9dff2584f1cf8682c25570cb9b87718a73b9ee.tar.gz | |
* cleanup and simplify the set type handling
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@10432 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'compiler/ncon.pas')
| -rw-r--r-- | compiler/ncon.pas | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/ncon.pas b/compiler/ncon.pas index b6cab9f29f..7cf06ee3b7 100644 --- a/compiler/ncon.pas +++ b/compiler/ncon.pas @@ -1060,7 +1060,7 @@ implementation function tsetconstnode.pass_1 : tnode; begin result:=nil; - if tsetdef(resultdef).settype=smallset then + if is_smallset(resultdef) then expectloc:=LOC_CONSTANT else expectloc:=LOC_CREFERENCE; |