#!/usr/bin/perl
# imd           [vmake_options] targets
#
# @(#)imd		1998-07-21
#

splice @ARGV, $ARGV[0] eq "-t" ? 1 : 0 , 0, ( "-q", "--" );
$ENV{DIAGNOSE} = "DIAGNOSE";
$rc = do "$ENV{'TOOL'}/bin/imake$ENV{'TOOLEXT'}";
die $@ if $@;
caller() ? $rc : exit $rc ;
