--- parser3/src/main/pa_common.C	2013/10/14 21:17:38	1.279
+++ parser3/src/main/pa_common.C	2015/04/02 22:04:41	1.281
@@ -47,7 +47,7 @@
 #define pa_mkdir(path, mode) mkdir(path, mode)
 #endif
 
-volatile const char * IDENT_PA_COMMON_C="$Id: pa_common.C,v 1.279 2013/10/14 21:17:38 moko Exp $" IDENT_PA_COMMON_H IDENT_PA_HASH_H IDENT_PA_ARRAY_H IDENT_PA_STACK_H; 
+volatile const char * IDENT_PA_COMMON_C="$Id: pa_common.C,v 1.281 2015/04/02 22:04:41 moko Exp $" IDENT_PA_COMMON_H IDENT_PA_HASH_H IDENT_PA_ARRAY_H IDENT_PA_STACK_H; 
 
 // some maybe-undefined constants
 
@@ -863,26 +863,6 @@ void back_slashes_to_slashes(char* s) {
 }
 #endif
 
-bool StrStartFromNC(const char* str, const char* substr, bool equal){
-	while(true) {
-		if(!(*substr)){
-			if(!(*str))
-				return true;
-			else
-				return !equal;
-		}
-		if(!(*str))
-			return false;
-		if(isalpha((unsigned char)*str)) {
-			if(tolower((unsigned char)*str)!=tolower((unsigned char)*substr))
-				return false;
-		} else if((*str) != (*substr))
-			return false;
-		str++; 
-		substr++; 
-	}
-}
-
 size_t strpos(const char *str, const char *substr) {
 	const char *p = strstr(str, substr);
 	return (p==0)?STRING_NOT_FOUND:p-str;