This patch makes while loops with empty bodies more explicit and silences a g++ warning Robin Barker Mathematics and Scientific Computing group Office: F2-A7 | Ext: 7090 | www.npl.co.uk/ssfm diff -ur ../perl-current/op.c ./op.c --- ../perl-current/op.c 2008-10-25 13:23:51.000000000 +0100 +++ ./op.c 2008-10-28 18:28:17.000000000 +0000 @@ -8083,7 +8083,7 @@ const char *p = proto; const char *const end = proto; contextclass = 0; - while (*--p != '['); + while (*--p != '[') {} bad_type(arg, Perl_form(aTHX_ "one of %.*s", (int)(end - p), p), gv_ename(namegv), o3); diff -ur ../perl-current/pp_sort.c ./pp_sort.c --- ../perl-current/pp_sort.c 2008-10-25 13:23:51.000000000 +0100 +++ ./pp_sort.c 2008-10-28 18:28:55.000000000 +0000 @@ -204,7 +204,7 @@ if (r >= t) p = r = t; /* too short to care about */ else { while (((cmp(aTHX_ *(p-1), *p) > 0) == sense) && - ((p -= 2) > q)); + ((p -= 2) > q)) {} if (p <= q) { /* b through r is a (long) run. ** Extend it as far as possible. End of patch <<while_empty.patch>> ------------------------------------------------------------------- This e-mail and any attachments may contain confidential and/or privileged material; it is for the intended addressee(s) only. If you are not a named addressee, you must not use, retain or disclose such information. NPL Management Ltd cannot guarantee that the e-mail or any attachments are free from viruses. NPL Management Ltd. Registered in England and Wales. No: 2937881 Registered Office: Serco House, 16 Bartley Wood Business Park, Hook, Hampshire, United Kingdom RG27 9UY -------------------------------------------------------------------Thread Next