diff options
| author | daniel <daniel@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2007-06-13 07:41:18 +0000 |
|---|---|---|
| committer | daniel <daniel@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2007-06-13 07:41:18 +0000 |
| commit | fa0c3252bfb66f5344f2e4ece5064d73b60f23ac (patch) | |
| tree | 6f3c39d6ca94d2fb9f29bd3dfb9fd626598bf902 /compiler/ncgopt.pas | |
| parent | 46cddfa7762bb3535f094014c92ded035aea0a58 (diff) | |
| download | fpc-fa0c3252bfb66f5344f2e4ece5064d73b60f23ac.tar.gz | |
* Rework the constexprint to allow operations from low(int64) to high(qword).
+ Some initial work on a formaldef which also carries the typinfo of a parameter.
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@7639 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'compiler/ncgopt.pas')
| -rw-r--r-- | compiler/ncgopt.pas | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/ncgopt.pas b/compiler/ncgopt.pas index f7bd91f206..fc6ac574be 100644 --- a/compiler/ncgopt.pas +++ b/compiler/ncgopt.pas @@ -178,7 +178,7 @@ begin cg.a_load_reg_ref(current_asmdata.CurrAsmList,OS_8,OS_8,hreg,href2); end else - cg.a_load_const_ref(current_asmdata.CurrAsmList,OS_8,tordconstnode(right).value,href2); + cg.a_load_const_ref(current_asmdata.CurrAsmList,OS_8,tordconstnode(right).value.svalue,href2); lengthreg:=cg.makeregsize(current_asmdata.CurrAsmList,lengthreg,OS_8); { increase the string length } cg.a_op_const_reg(current_asmdata.CurrAsmList,OP_ADD,OS_8,1,lengthreg); |