chiark / gitweb /
merge changes from trunk into our branch; cvs up -j branchpoint-hostside-wip-2006...
[trains.git] / hostside / selectors.h.gen
index ec5dbb78a3c41176ca439230e363dd7ca8624e69..595066837b981d998d61a7b7d61369e958d4f72c 100755 (executable)
@@ -1,9 +1,10 @@
 #!/usr/bin/perl
-$bit= 1;
 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;
 }