* regparse.c (fetch_token_in_cc): warn when \p is not

followed by property name.

* regparse.c (fetch_token): ditto.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@25296 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

ChangeLog

@@ -1,3 +1,10 @@
+Sun Oct 11 10:04:35 2009  NARUSE, Yui  <naruse@ruby-lang.org>
+
+	* regparse.c (fetch_token_in_cc): warn when \p is not
+	  followed by property name.
+
+	* regparse.c (fetch_token): ditto.
+
 Sun Oct 11 09:44:46 2009  NARUSE, Yui  <naruse@ruby-lang.org>
 
 	* regerror.c (onig_vsnprintf_with_pattern): added.

regparse.c

@@ -3069,6 +3069,9 @@ fetch_token_in_cc(OnigToken* tok, UChar** src, UChar* end, ScanEnv* env)
 	    PUNFETCH;
 	}
       }
+      else {
+	  onig_syntax_warn(env, "invalid Unicode Property \\%c", c);
+      }
       break;
 
     case 'x':
@@ -3634,6 +3637,9 @@ fetch_token(OnigToken* tok, UChar** src, UChar* end, ScanEnv* env)
 	    PUNFETCH;
 	}
       }
+      else {
+	  onig_syntax_warn(env, "invalid Unicode Property \\%c", c);
+      }
       break;
 
     default: