fixes for VC

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@8511 626c5289-ae23-0410-ae9c-e8d60b6d4f22

SWIG/Lib/perl5/perlprimtypes.swg

@@ -149,7 +149,8 @@ SWIG_AsVal_dec(unsigned long)(SV *obj, unsigned long *val)
 
 %fragment(SWIG_From_frag(long long),"header",
 	  fragment=SWIG_From_frag(long),
-	  fragment="<limits.h>") {
+	  fragment="<limits.h>",
+	  fragment="<stdio.h>") {
 SWIGINTERNINLINE SV *
 SWIG_From_dec(long long)(long long value)
 {
@@ -167,6 +168,7 @@ SWIG_From_dec(long long)(long long value)
 
 %fragment(SWIG_AsVal_frag(long long),"header",
 	  fragment="<limits.h>",
+	  fragment="<stdlib.h>",
 	  fragment="SWIG_CanCastAsInteger") {
 
 SWIGINTERN int
@@ -210,7 +212,8 @@ SWIG_AsVal_dec(long long)(SV *obj, long long *val)
 
 %fragment(SWIG_From_frag(unsigned long long),"header",
 	  fragment=SWIG_From_frag(long long),
-	  fragment="<limits.h>") {
+	  fragment="<limits.h>",
+	  fragment="<stdio.h>") {
 SWIGINTERNINLINE SV *
 SWIG_From_dec(unsigned long long)(unsigned long long value)
 {
@@ -228,6 +231,7 @@ SWIG_From_dec(unsigned long long)(unsigned long long value)
 
 %fragment(SWIG_AsVal_frag(unsigned long long),"header",
 	  fragment="<limits.h>",
+	  fragment="<stdlib.h>",
 	  fragment="SWIG_CanCastAsInteger") {
 SWIGINTERN int
 SWIG_AsVal_dec(unsigned long long)(SV *obj, unsigned long long *val)

SWIG/Lib/tcl/tclprimtypes.swg

@@ -52,7 +52,8 @@ SWIG_AsVal_dec(long)(Tcl_Obj *obj, long* val)
 /* unsigned long */
 
 %fragment(SWIG_From_frag(unsigned long),"header",
-	  fragment=SWIG_From_frag(long)) {
+	  fragment=SWIG_From_frag(long),
+	  fragment="<stdio.h>") {
 SWIGINTERNINLINE Tcl_Obj* 
 SWIG_From_dec(unsigned long)(unsigned long value)
 {
@@ -103,7 +104,8 @@ SWIG_AsVal_dec(unsigned long)(Tcl_Obj *obj, unsigned long *val) {
 
 %fragment(SWIG_From_frag(long long),"header",
 	  fragment=SWIG_From_frag(long),
-	  fragment="<limits.h>") {
+	  fragment="<limits.h>",
+	  fragment="<stdio.h>") {
 SWIGINTERNINLINE Tcl_Obj* 
 SWIG_From_dec(long long)(long long value)
 {
@@ -117,7 +119,8 @@ SWIG_From_dec(long long)(long long value)
 }
 }
 
-%fragment(SWIG_AsVal_frag(long long),"header") {
+%fragment(SWIG_AsVal_frag(long long),"header",
+	  fragment="<stdlib.h>") {
 SWIGINTERN int
 SWIG_AsVal_dec(long long)(Tcl_Obj *obj, long long *val)
 {
@@ -150,7 +153,8 @@ SWIG_AsVal_dec(long long)(Tcl_Obj *obj, long long *val)
 
 %fragment(SWIG_From_frag(unsigned long long),"header",
 	  fragment=SWIG_From_frag(long long),
-	  fragment="<limits.h>") {
+	  fragment="<limits.h>",
+	  fragment="<stdio.h>") {
 SWIGINTERNINLINE Tcl_Obj* 
 SWIG_From_dec(unsigned long long)(unsigned long long value)
 {
@@ -165,7 +169,8 @@ SWIG_From_dec(unsigned long long)(unsigned long long value)
 }
 
 %fragment(SWIG_AsVal_frag(unsigned long long),"header",
-	  fragment=SWIG_AsVal_frag(unsigned long)) {
+	  fragment=SWIG_AsVal_frag(unsigned long),
+	  fragment="<stdlib.h>") {
 SWIGINTERN int
 SWIG_AsVal_dec(unsigned long long)(Tcl_Obj *obj, unsigned long long *val)
 {

SWIG/Lib/typemaps/fragments.swg

@@ -340,6 +340,14 @@
 #include <float.h>
 %}
 
+%fragment("<stdio.h>","header") %{
+#include <stdio.h>
+%}
+
+%fragment("<stdlib.h>","header") %{
+#include <stdlib.h>
+%}
+
 /* -----------------------------------------------------------------------------
  * special macros for fragments
  * ----------------------------------------------------------------------------- */