From 810a776e1076eb5a072821363e321b01f656b996 Mon Sep 17 00:00:00 2001 From: peter Date: Thu, 13 Apr 2006 07:04:48 +0000 Subject: [PATCH] * patch from Jonas to pass interface result as parameter git-svn-id: trunk@3199 - --- compiler/ncnv.pas | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/compiler/ncnv.pas b/compiler/ncnv.pas index 1c83047a00..fa7b2235fc 100644 --- a/compiler/ncnv.pas +++ b/compiler/ncnv.pas @@ -2731,9 +2731,9 @@ implementation procname := 'fpc_class_as_intf' else procname := 'fpc_intf_as'; - call := ccallnode.createinternres(procname, - ccallparanode.create(right,ccallparanode.create(left,nil)), - resulttype); + call := ccallnode.createintern(procname, + ccallparanode.create(right,ccallparanode.create(left,nil))); + call := ctypeconvnode.create_internal(call,resulttype); end; left := nil; right := nil;