Applied, thanks. Mike Lambert
Simon Glover wrote: > Date: Fri, 02 Aug 2002 21:00:19 GMT > From: Simon Glover <[EMAIL PROTECTED]> > Reply-To: [EMAIL PROTECTED] > To: [EMAIL PROTECTED] > Subject: [perl #15949] [PATCH] Silence warning in hash clone > Resent-Date: 2 Aug 2002 21:00:19 -0000 > Resent-From: [EMAIL PROTECTED] > Resent-To: [EMAIL PROTECTED] > > # New Ticket Created by Simon Glover > # Please include the string: [perl #15949] > # in the subject line of all future correspondence about this issue. > # <URL: http://rt.perl.org/rt2/Ticket/Display.html?id=15949 > > > > > hash->num_buckets is unsigned, so we were getting a "comparison between > signed and unsigned" warning. Patch below fixes. > > Simon > > --- hash.c.old Fri Aug 2 16:51:05 2002 > +++ hash.c Fri Aug 2 16:52:28 2002 > @@ -432,7 +432,7 @@ HASH * > hash_clone(struct Parrot_Interp * interp, HASH * hash) { > HASH * ret = new_hash(interp); > HASHBUCKET ** table = (HASHBUCKET **)hash->buffer.bufstart; > - int i; > + UINTVAL i; > for (i = 0; i < hash->num_buckets; i++) { > HASHBUCKET * b = table[i]; > while (b) { > > > > > >