#!/usr/bin/perl
##
## legOS - the independent LEGO Mindstorms OS
## fixdeps - fix kernel dependencies by removing the prefix.
## (c) 1999 by Markus L. Noga <markus@noga.de>
##
## usage: makedepend | fixdeps kernelprefix > .depend
##
$kerneldir=shift;

# convert global text, data and bss symbols (TDB)
#
while(<>) {
  ($name,$deps)=/(.*):(.*)/;
  if($name=~/^$kerneldir(.*)/) {
    $name=$1;
  }
  if($name) {
    print "$name:$deps\n";  
  }
}
