Lines Matching refs:DEBUG
5 sub DEBUG () { 0 } subroutine
24 print STDERR "SWASHNEW @_\n" if DEBUG;
46 print "type = $type\n" if DEBUG;
120 print "canonical = $canonical\n" if DEBUG;
167 print "found it (file='$file')\n" if DEBUG;
178 print "Returning cached '$file' for \\p{$type}\n" if DEBUG;
231 print STDERR "$1 => $2\n" if DEBUG;
251 …class, TYPE => $type, BITS => $bits, NONE => $none\nEXTRAS =>\n$extras\nLIST =>\n$list\n" if DEBUG;
278 print STDERR "SWASHGET @_ [$type/$bits/$none]\n" if DEBUG;
301 print "$min $max $val\n" if DEBUG;
309 print STDERR "$key => $val\n" if DEBUG;
321 print STDERR "$key => $val\n" if DEBUG;
339 print STDERR "$key => 1\n" if DEBUG;
350 print STDERR "INDIRECT $1 $2\n" if DEBUG;
402 if (DEBUG) {