X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=ext%2FFile%2FGlob%2FGlob.xs;h=a21fe84f35fa2a1fb86a59da197793dea4ae79a0;hb=8063af025e8b11a3a92c708534a72a8c4fe60322;hp=1805f68a9604107ccd12dc4bde3ef7b519375302;hpb=220398a0501cffd114fa4441a4a685dc486ed3d8;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/ext/File/Glob/Glob.xs b/ext/File/Glob/Glob.xs
index 1805f68..a21fe84 100644
--- a/ext/File/Glob/Glob.xs
+++ b/ext/File/Glob/Glob.xs
@@ -4,16 +4,9 @@
 
 #include "bsd_glob.h"
 
+/* XXX: need some thread awareness */
 static int GLOB_ERROR = 0;
 
-static int
-not_here(char *s)
-{
-    croak("%s not implemented on this architecture", s);
-    return -1;
-}
-
-
 static double
 constant(char *name, int arg)
 {
@@ -170,7 +163,7 @@ MODULE = File::Glob		PACKAGE = File::Glob
 void
 doglob(pattern,...)
     char *pattern
-PROTOTYPE:
+PROTOTYPE: $;$
 PREINIT:
     glob_t pglob;
     int i;
@@ -206,4 +199,4 @@ double
 constant(name,arg)
     char *name
     int   arg
-PROTOTYPE:
+PROTOTYPE: $$