PerlIO_read() can return negative.

[p5sagit/p5-mst-13.2.git] / ext / DynaLoader / dl_dyld.xs

diff --git a/ext/DynaLoader/dl_dyld.xs b/ext/DynaLoader/dl_dyld.xs
index 45ae10f..2ac2baa 100644 (file)
--- a/ext/DynaLoader/dl_dyld.xs
+++ b/ext/DynaLoader/dl_dyld.xs
@@ -54,7 +54,7 @@ static char *dlerror()
     return dl_last_error;
 }
 
-int dlclose(handle) /* stub only */
+static int dlclose(handle) /* stub only */
 void *handle;
 {
     return 0;
@@ -122,7 +122,7 @@ static char *dlopen(char *path, int mode /* mode is ignored */)
     return handle;
 }
 
-void *
+static void *
 dlsym(handle, symbol)
 void *handle;
 char *symbol;