#!/usr/bin/perl
-$bit= 1;
-printf "/* autogenerated - do not edit */\n" or die $!;
foreach $f (qw(
picio
picioh
picdebug
)) {
- printf "#define sel_%-10s 0x%08lxLU\n", $f, $bit;
+ printf "#define sel_%-10s 0x%08lxLU\n", $f, $bit
+ or die $!;
$bit <<= 1;
}