X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2Fh2ph.h;h=495789a206df61d8327365bba0e8bd0aaa8474f2;hb=bf076876beb37faf404cb529462c0d3621da4786;hp=f13b69c6d6907a7d5001a17e0a99be899dd79301;hpb=ab5fe4d6aaf45c57b7af4b994a730291eee17efa;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/t/lib/h2ph.h b/t/lib/h2ph.h
index f13b69c..495789a 100644
--- a/t/lib/h2ph.h
+++ b/t/lib/h2ph.h
@@ -56,6 +56,11 @@
 #    define WHATEVER 1000
 #endif
 
+/* Test passing through the alien constructs (perlbug #34493) */
+#ifdef __LANGUAGE_PASCAL__
+function Tru64_Pascal(n: Integer): Integer;
+#endif
+
 /* 
  * Test #include, #import and #include_next
  * #include_next is difficult to test, it really depends on the actual