From 76d35774ff3996ce2780fbff62fa293d6dc030c9 Mon Sep 17 00:00:00 2001
From: William S Fulton <wsf@fultondesigns.co.uk>
Date: Tue, 23 Aug 2005 09:18:43 +0000
Subject: [PATCH] 64 bit platform fixes for the varargs handling in
 SWIG_GetArgs

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@7383 626c5289-ae23-0410-ae9c-e8d60b6d4f22
---
 SWIG/Source/Modules/tcl8.cxx | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/SWIG/Source/Modules/tcl8.cxx b/SWIG/Source/Modules/tcl8.cxx
index 24770d354..8e39d8d5b 100644
--- a/SWIG/Source/Modules/tcl8.cxx
+++ b/SWIG/Source/Modules/tcl8.cxx
@@ -338,7 +338,7 @@ public:
 	  }
 
 	  Putc('o',argstr);
-	  Printf(args,",NULL");
+	  Printf(args,",(void *)0");
 	  if (i >= num_required) {
 	    Printf(incode, "if (objc > %d) {\n", i+1);
 	  }
@@ -353,7 +353,7 @@ public:
 	    SwigType *lt = SwigType_ltype(pt);
 	    SwigType_remember(pt);
 	    if (Cmp(lt,"p.void") == 0) {
-	      Printf(args,",NULL");
+	      Printf(args,",(void *)0");
 	    } else {
 	      Printf(args,",SWIGTYPE%s", SwigType_manglestr(pt));
 	    }