From 710a97992705d67c3ded0d4b270c5978ce29b11f Mon Sep 17 00:00:00 2001
From: Bryan Newbold <bnewbold@robocracy.org>
Date: Mon, 20 Feb 2017 00:05:37 -0800
Subject: Import Upstream version 5e4

---
 rgx.c | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

(limited to 'rgx.c')

diff --git a/rgx.c b/rgx.c
index 1f3b4f0..81af5c4 100644
--- a/rgx.c
+++ b/rgx.c
@@ -55,7 +55,7 @@
 #endif
 
 static char rcsid[] =
-   "$Id: rgx.c,v 1.16 2002/11/25 20:34:31 jaffer Exp $";
+   "$Id: rgx.c,v 1.18 2007/11/24 19:56:56 jaffer Exp $";
 
 #ifdef HAVE_ALLOCA
 # include <alloca.h>
@@ -135,9 +135,9 @@ int prinregex(exp, port, writing)
      SCM exp; SCM port; int writing;
 {
   lputs("#<regex ", port);
-  intprint(CDR(exp), -16, port);
+  scm_intprint(CDR(exp), -16, port);
   lputc(' ', port);
-  iprin1(RGX_PATTERN(exp), port, writing);
+  scm_iprin1(RGX_PATTERN(exp), port, writing);
   lputc('>', port);
   return 1;
 }
@@ -201,12 +201,12 @@ SCM lregcomp(pattern, flags)
   info=(regex_info*)CHARS(z);
   prog = &(info->rgx);
 #ifdef __REGEXP_LIBRARY_H__
-  for(i=sizeof(regex_t);i--;((char *)prog)[i] = 0);
+  for (i=sizeof(regex_t);i--;((char *)prog)[i] = 0);
 # ifndef _GNU_SOURCE
   {
     regex_t *prog2;
     prog2 = &(info->rgx_anchored);
-    for(i=sizeof(regex_t);i--;((char *)prog2)[i] = 0);
+    for (i=sizeof(regex_t);i--;((char *)prog2)[i] = 0);
   }
 # endif
 #endif
-- 
cgit v1.2.3