From ff6df2a4ad46ae41d5cd947afba84a7ad5a6feb3 Mon Sep 17 00:00:00 2001
From: Igor Pashev <pashev.igor@gmail.com>
Date: Sat, 2 Apr 2016 11:55:41 +0300
Subject: restrict -> rstrct (reserved word)

---
 gcl/o/pathname.d | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/gcl/o/pathname.d b/gcl/o/pathname.d
index 67b522dc..1f9e6027 100644
--- a/gcl/o/pathname.d
+++ b/gcl/o/pathname.d
@@ -563,19 +563,19 @@ object host, device, directory, name, type, version, casekey;
  */
 
 static int
-parse_namestring_check(s,start,end,c,restrict)
+parse_namestring_check(s,start,end,c,rstrct)
 object s;
 int start, end;
 char c;
-int restrict;
+int rstrct;
 {	
   int i;
 	for (i=start; (s->st.st_self[i]!=c) && (i<end); i++) {
-	    if ((restrict==':') &&
+	    if ((rstrct==':') &&
 	    	!( isalnum(s->st.st_self[i]) || (s->st.st_self[i]=='-') || (s->st.st_self[i]=='.') ))
 	    	return -2;
 #ifdef ANSI
-	    if ((restrict==';') && pathname_resolve(pathKansi) &&
+	    if ((rstrct==';') && pathname_resolve(pathKansi) &&
 	    	!( isalnum(s->st.st_self[i]) || (s->st.st_self[i]=='-') ||
 		     (s->st.st_self[i]=='*') || (s->st.st_self[i]=='?') ))
 	    	return -2;
-- 
cgit v1.2.3