Explorar el Código

fix 32-bit bug in source, with a hack. oh well

Mike Hamburg hace 16 años
padre
commit
eb77f084b5
Se han modificado 1 ficheros con 1 adiciones y 1 borrados
  1. 1 1
      compress/digitize.pl

+ 1 - 1
compress/digitize.pl

@@ -9,7 +9,7 @@
 sub digitize {
     my $number = shift;
     if ($number >= 256) {
-	my $nn = sprintf("%x", $number);
+	my $nn = `printf "%x" $number`;
 	if ($nn =~ /^[01f]+$/i) { return "0x$nn"; }
     }
     return $number;