BEGIN { n = 1 }
/^#/ { print }
{
       if (NF > 0 && substr($0, 1, 1) != "#") {
               files[n++] = $0;
       }
       next;
}
END {
       split(COMPATDIRS, dirs);
       for (d in dirs) {
               for (f = 1; f < n; f++) {
                       x=files[f]; sub("@ARCH_SUBDIR@", dirs[d], x);
                       print x;
               }
       }
}