From f6229156900551e2ea3590b89c4363bee4fe9788 Mon Sep 17 00:00:00 2001 From: peter Date: Tue, 18 Oct 2005 05:51:13 +0000 Subject: [PATCH] * fix infinite loop in createinlineparas git-svn-id: trunk@1456 - --- compiler/ncal.pas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/compiler/ncal.pas b/compiler/ncal.pas index 6dd7d795e5..4ea78a5d43 100644 --- a/compiler/ncal.pas +++ b/compiler/ncal.pas @@ -2184,8 +2184,8 @@ type para.left := ctypeconvnode.create_internal(cderefnode.create(ctemprefnode.create(tempnode)),para.left.resulttype); addstatement(deletestatement,ctempdeletenode.create(tempnode)); end; - para := tcallparanode(para.right); end; + para := tcallparanode(para.right); end; { local variables } if not assigned(tprocdef(procdefinition).localst) or