apinit

#!/usr/bin/env perl
use warnings;
use strict;

my $ARCH = $ENV{ARCH};
if (!defined $ARCH) {
    print "apinit: ARCH is not set\n";
    exit -1;
}

`cp apsymbols.h.$ARCH apsymbols.h`;