From 20face432bd7c7a708d20f9cf48b44ad0240f1c0 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?K=C3=A1roly=20Balogh?= Date: Mon, 28 Nov 2005 03:48:33 +0000 Subject: [PATCH] * fixed double identifier git-svn-id: trunk@1836 - --- rtl/morphos/utility.pp | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/rtl/morphos/utility.pp b/rtl/morphos/utility.pp index 30a7887527..9db0b0e75b 100644 --- a/rtl/morphos/utility.pp +++ b/rtl/morphos/utility.pp @@ -30,20 +30,20 @@ var {$include utild2.inc} {$include utilf.inc} -function TAG(value: pointer): longword; inline; -function TAG(value: pchar): longword; inline; +function TAG_(value: pointer): longword; inline; +function TAG_(value: pchar): longword; inline; implementation -function TAG(value: pointer): longword; inline; +function TAG_(value: pointer): longword; inline; begin - TAG:=longword(value); + TAG_:=longword(value); end; -function TAG(value: pchar): longword; inline; +function TAG_(value: pchar): longword; inline; begin - TAG:=longword(value); + TAG_:=longword(value); end;