Lines Matching refs:debug

380 $opt_d && $debug++;
528 $| = 1 if $debug;
757 	print "$name is a typedef for some funky pointers: $pdecl\n" if $debug;
769 	print STDERR "intrinsic $ident in new type $typeno\n" if $debug;
796 	printf "new type $typeno is $name" if $debug;
798 	    print ", a typedef for a pointer to " , $type[$struct] if $debug;
801 	printf "%s is type %d", $name, $typeno if $debug;
802 	print ", a typedef for " , $type[$typeno] if $debug;
804     print "\n" if $debug;
814 	print "it's a bare array typedef -- that's pretty sick\n" if $debug;
824 	print STDERR "intrinsic $2 in new type $typeno\n" if $debug;
964 	print STDERR "no size for $name, punting with $fmt..." if $debug;
991     warn "pdecl: $pdecl\n" if $debug;
1005 	print "type[$_] is $tname\n" if $debug;
1045 		if $debug;
1047 	    ##printf "new type $typeno is $name" if $debug;
1066     #local($wasdef) = defined($type[$typeno]) && $debug;
1075     print "type[$arraytype] is $type[$arraytype]\n" if $debug;
1076     print "$prefix.$fieldname is an array of $type[$arraytype]\n" if $debug;
1093 	warn "sdecl $_\n" if $debug;
1107 	    warn "weird field $_ of $line" if $debug;
1136 		print "anon type $typeno is $prefix.$fieldname\n" if $debug;
1141 	    print "anon ".($isastruct{$name}) ? "struct":"union"." for $prefix.$fieldname\n" if $debug;
1158 	print "start of $prefix is $start, size of $sizeof{$prefix}\n" if $debug;
1176 	    print "type[$i] $type[$i]\n" if $debug;
1179 	print "type[$i] $_ ==> " if $debug;
1188 	print "$_\n" if $debug;
1197 	print "start: $_ @ $start{$_}\n" if $debug;
1245     print "$scrunch_code" if $debug;
1318 	print "intrinsic $_[1] is size $_[0]\n" if $debug;
1356     print STDERR "TEMPLATE for $name is ", $template{&psou($name)}, "\n" if $debug;