From b0ece27226b1b73ae9f117794bd9d2bab03b838c Mon Sep 17 00:00:00 2001
From: William S Fulton <wsf@fultondesigns.co.uk>
Date: Fri, 21 Mar 2003 21:56:17 +0000
Subject: [PATCH] another M_PI define if not defined in math.h

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@4611 626c5289-ae23-0410-ae9c-e8d60b6d4f22
---
 Examples/perl5/shadow/example.cxx | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/Examples/perl5/shadow/example.cxx b/Examples/perl5/shadow/example.cxx
index d7f5046fe..bf088228f 100644
--- a/Examples/perl5/shadow/example.cxx
+++ b/Examples/perl5/shadow/example.cxx
@@ -2,6 +2,9 @@
 
 #include "example.h"
 #include <math.h>
+#ifndef M_PI
+#  define M_PI 3.14159265358979323846
+#endif
 
 /* Move the shape to a new location */
 void Shape::move(double dx, double dy) {