This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
add include guard
authorGurusamy Sarathy <gsar@cpan.org>
Thu, 23 Sep 1999 01:12:24 +0000 (01:12 +0000)
committerGurusamy Sarathy <gsar@cpan.org>
Thu, 23 Sep 1999 01:12:24 +0000 (01:12 +0000)
p4raw-id: //depot/perl@4220

XSUB.h

diff --git a/XSUB.h b/XSUB.h
index 509a1d6..a414b85 100644 (file)
--- a/XSUB.h
+++ b/XSUB.h
@@ -1,3 +1,6 @@
+#ifndef _INC_PERL_XSUB_H
+#define _INC_PERL_XSUB_H 1
+
 #define ST(off) PL_stack_base[ax + (off)]
 
 #if defined(CYGWIN) && defined(USE_DYNAMIC_LOADING)
 #define ST(off) PL_stack_base[ax + (off)]
 
 #if defined(CYGWIN) && defined(USE_DYNAMIC_LOADING)
 #    define socketpair         PerlSock_socketpair
 #  endif  /* NO_XSLOCKS */
 #endif  /* PERL_CAPI */
 #    define socketpair         PerlSock_socketpair
 #  endif  /* NO_XSLOCKS */
 #endif  /* PERL_CAPI */
+
+#endif _INC_PERL_XSUB_H                /* include guard */