gcl_mprotect prototype mod - gcl.git - GNU Common Lisp

diff --git a/gcl/h/protoize.h b/gcl/h/protoize.h
index 729681c6f..b3a4fc380 100644
--- a/gcl/h/protoize.h
+++ b/gcl/h/protoize.h

@@ -1910,4 +1910,4 @@ void

prelink_init(void);

int

-gcl_mprotect(void *,size_t,int);

+gcl_mprotect(void *,unsigned long,int);

diff --git a/gcl/o/main.c b/gcl/o/main.c
index d247f25b0..6a11c5f8e 100755
--- a/gcl/o/main.c
+++ b/gcl/o/main.c

@@ -333,7 +333,7 @@ random_ulong() {

#endif

int

-gcl_mprotect(void *v,size_t l,int p) {

+gcl_mprotect(void *v,unsigned long l,int p) {

int i;

char b[80];