* hidden high parameter must be of type ptrsinttype, resolves issue #29204

git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@32745 3ad0048d-3df7-0310-abae-a5850022a9f2

1 files changed, 1 insertions, 1 deletions

diff --git a/compiler/pparautl.pas b/compiler/pparautl.pas
index 9c795d809b..83d0fcfcfa 100644
--- a/compiler/pparautl.pas
+++ b/compiler/pparautl.pas
@@ -353,7 +353,7 @@ implementation
            { needs high parameter ? }
            if paramanager.push_high_param(varspez,vardef,pd.proccalloption) then
              begin
-               hvs:=cparavarsym.create('$high'+name,paranr+1,vs_const,sinttype,[vo_is_high_para,vo_is_hidden_para]);
+               hvs:=cparavarsym.create('$high'+name,paranr+1,vs_const,ptrsinttype,[vo_is_high_para,vo_is_hidden_para]);
                hvs.symoptions:=[];
                owner.insert(hvs);
                { don't place to register if it will be accessed from implicit finally block }