New perldelta

[perl5.git] / win32 / fcrypt.c

diff --git a/win32/fcrypt.c b/win32/fcrypt.c
index 4c9f273..ec689e5 100644 (file)
--- a/win32/fcrypt.c
+++ b/win32/fcrypt.c
@@ -336,10 +336,10 @@ static int body(
 static int
 des_set_key(des_cblock *key, des_key_schedule schedule)
        {
-       register unsigned long c,d,t,s;
-       register unsigned char *in;
-       register unsigned long *k;
-       register int i;
+       unsigned long c,d,t,s;
+       unsigned char *in;
+       unsigned long *k;
+       int i;
 
        k=(unsigned long *)schedule;
        in=(unsigned char *)key;
@@ -533,13 +533,13 @@ body(     unsigned long *out0,
        unsigned long Eswap0,
        unsigned long Eswap1)
        {
-       register unsigned long l,r,t,u,v;
+       unsigned long l,r,t,u,v;
 #ifdef ALT_ECB
-       register unsigned char *des_SP=(unsigned char *)SPtrans;
+       unsigned char *des_SP=(unsigned char *)SPtrans;
 #endif
-       register unsigned long *s;
-       register int i,j;
-       register unsigned long E0,E1;
+       unsigned long *s;
+       int i,j;
+       unsigned long E0,E1;
 
        l=0;
        r=0;