possible fix to cgcc issue in sparse 0.4.2:

Use of uninitialized value $bits in exists at /usr/bin/cgcc line 139.
/usr/bin/cgcc: weird number of bits. at /usr/bin/cgcc line 139.

Signed-off-by: Joel Soete <rubisher@scarlet.be>
Signed-off-by: Christopher Li <sparse@chrisli.org>

1 files changed, 1 insertions, 1 deletions

diff --git a/cgcc b/cgcc
index d37cf888..6636cc65 100755
--- a/cgcc
+++ b/cgcc
@@ -120,7 +120,7 @@ sub integer_types {
     my @types = (['SCHAR',''], ['SHRT',''], ['INT',''], ['LONG','L'], ['LONG_LONG','LL'], ['LONG_LONG_LONG','LLL']);
 
     my $result = " -D__CHAR_BIT__=$char";
-    while (@types) {
+    while (@types && @_) {
 	my $bits = shift @_;
 	my ($name,$suffix) = @{ shift @types };
 	die "$0: weird number of bits." unless exists $pow2m1{$bits};