various tweaks: fix signed vs. unsigned problems that prevented C++

builds; add sundry PERL_OBJECT scaffolding to get it to build; fix
lexical warning testsuite for win32

p4raw-id: //depot/perl@1777

1 files changed, 22 insertions, 17 deletions

diff --git a/proto.h b/proto.h
index 56d62a75d6..5b71f63428 100644
--- a/proto.h
+++ b/proto.h
@@ -225,15 +225,15 @@ VIRTUAL bool	is_uni_print_lc _((U32 c));
 VIRTUAL U32	to_uni_upper_lc _((U32 c));
 VIRTUAL U32	to_uni_title_lc _((U32 c));
 VIRTUAL U32	to_uni_lower_lc _((U32 c));
-VIRTUAL bool	is_utf8_alnum _((unsigned char *p));
-VIRTUAL bool	is_utf8_idfirst _((unsigned char *p));
-VIRTUAL bool	is_utf8_alpha _((unsigned char *p));
-VIRTUAL bool	is_utf8_space _((unsigned char *p));
-VIRTUAL bool	is_utf8_digit _((unsigned char *p));
-VIRTUAL bool	is_utf8_upper _((unsigned char *p));
-VIRTUAL bool	is_utf8_lower _((unsigned char *p));
-VIRTUAL bool	is_utf8_print _((unsigned char *p));
-VIRTUAL bool	is_utf8_mark _((unsigned char *p));
+VIRTUAL bool	is_utf8_alnum _((U8 *p));
+VIRTUAL bool	is_utf8_idfirst _((U8 *p));
+VIRTUAL bool	is_utf8_alpha _((U8 *p));
+VIRTUAL bool	is_utf8_space _((U8 *p));
+VIRTUAL bool	is_utf8_digit _((U8 *p));
+VIRTUAL bool	is_utf8_upper _((U8 *p));
+VIRTUAL bool	is_utf8_lower _((U8 *p));
+VIRTUAL bool	is_utf8_print _((U8 *p));
+VIRTUAL bool	is_utf8_mark _((U8 *p));
 VIRTUAL OP*	jmaybe _((OP* arg));
 VIRTUAL I32	keyword _((char* d, I32 len));
 VIRTUAL void	leave_scope _((I32 base));
@@ -637,12 +637,12 @@ VIRTUAL void	sv_vsetpvfn _((SV* sv, const char* pat, STRLEN patlen,
 		       va_list* args, SV** svargs, I32 svmax,
 		       bool *used_locale));
 VIRTUAL SV*	swash_init _((char* pkg, char* name, SV* listsv, I32 minbits, I32 none));
-VIRTUAL UV	swash_fetch _((SV *sv, unsigned char *ptr));
+VIRTUAL UV	swash_fetch _((SV *sv, U8 *ptr));
 VIRTUAL void	taint_env _((void));
 VIRTUAL void	taint_proper _((const char* f, char* s));
-VIRTUAL UV	to_utf8_lower _((unsigned char *p));
-VIRTUAL UV	to_utf8_upper _((unsigned char *p));
-VIRTUAL UV	to_utf8_title _((unsigned char *p));
+VIRTUAL UV	to_utf8_lower _((U8 *p));
+VIRTUAL UV	to_utf8_upper _((U8 *p));
+VIRTUAL UV	to_utf8_title _((U8 *p));
 #ifdef UNLINK_ALL_VERSIONS
 VIRTUAL I32	unlnk _((char* f));
 #endif
@@ -654,10 +654,10 @@ VIRTUAL void	unshare_hek _((HEK* hek));
 VIRTUAL void	utilize _((int aver, I32 floor, OP* version, OP* id, OP* arg));
 VIRTUAL U8*	utf16_to_utf8 _((U16* p, U8 *d, I32 bytelen));
 VIRTUAL U8*	utf16_to_utf8_reversed _((U16* p, U8 *d, I32 bytelen));
-VIRTUAL I32	utf8_distance _((unsigned char *a, unsigned char *b));
-VIRTUAL U8*	utf8_hop _((unsigned char *s, I32 off));
-VIRTUAL UV	utf8_to_uv _((unsigned char *s, I32* retlen));
-VIRTUAL char*	uv_to_utf8 _((unsigned char *d, UV uv));
+VIRTUAL I32	utf8_distance _((U8 *a, U8 *b));
+VIRTUAL U8*	utf8_hop _((U8 *s, I32 off));
+VIRTUAL UV	utf8_to_uv _((U8 *s, I32* retlen));
+VIRTUAL U8*	uv_to_utf8 _((U8 *d, UV uv));
 VIRTUAL void	vivify_defelem _((SV* sv));
 VIRTUAL void	vivify_ref _((SV* sv, U32 to_what));
 VIRTUAL I32	wait4pid _((int pid, int* statusp, int flags));
@@ -835,7 +835,9 @@ regnode *reganode _((U8, U32));
 regnode *regatom _((I32 *));
 regnode *regbranch _((I32 *, I32));
 void regc _((U8, char *));
+void reguni _((UV, char *, I32*));
 regnode *regclass _((void));
+regnode *regclassutf8 _((void));
 I32 regcurly _((char *));
 regnode *reg_node _((U8));
 regnode *regpiece _((I32 *));
@@ -855,8 +857,11 @@ I32 regrepeat _((regnode *p, I32 max));
 I32 regrepeat_hard _((regnode *p, I32 max, I32 *lp));
 I32 regtry _((regexp *prog, char *startpos));
 bool reginclass _((char *p, I32 c));
+bool reginclassutf8 _((regnode *f, U8* p));
 CHECKPOINT regcppush _((I32 parenfloor));
 char * regcppop _((void));
+U8 * reghop _((U8 *pos, I32 off));
+U8 * reghopmaybe _((U8 *pos, I32 off));
 void dump _((char *pat,...));
 #ifdef WIN32
 int do_aspawn _((void *vreally, void **vmark, void **vsp));