mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-13 17:59:27 +02:00
* Fix remaining constexp issues: powerpc,libcurl,browcol
git-svn-id: trunk@7656 -
This commit is contained in:
parent
bc678a2b90
commit
2e57912288
@ -266,7 +266,7 @@ procedure RegisterSymbols;
|
||||
implementation
|
||||
|
||||
uses
|
||||
globtype,globals,comphook,
|
||||
globtype,globals,comphook,constexp,
|
||||
{$ifdef DEBUG}
|
||||
verbose,
|
||||
{$endif DEBUG}
|
||||
|
@ -355,7 +355,7 @@ begin
|
||||
if sa xor sb then
|
||||
begin
|
||||
result.signed:=true;
|
||||
result.svalue:=r;
|
||||
result.svalue:=-r;
|
||||
end
|
||||
else
|
||||
begin
|
||||
|
@ -216,7 +216,7 @@ implementation
|
||||
htype : tdef;
|
||||
begin
|
||||
htype:=v.definition;
|
||||
genenumnode:=cordconstnode.create(v.value,htype,true);
|
||||
genenumnode:=cordconstnode.create(int64(v.value),htype,true);
|
||||
end;
|
||||
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user