Artifact dd55a77a7644999b3aa29597ed22a1cdf720c15f5867c711f6b926cb188e8aa9:

• Executable file mttroot/mtt/bin/trans/mtt_pinclude — part of check-in [d4245be859] at 2000-12-28 11:58:07 on branch origin/master — Put under RCS (user: gawthrop@users.sourceforge.net, size: 515) [annotate] [blame] [check-ins using] [more...]

#!/bin/sh
# pinclude - explicitly includes Pascal files - p2c has probs. doing this

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
###############################################################



awk ' {
  if ( (match($1,"{\\$I")>0) || (match($1,"\\*\\$I")>0) ) {
    sub(/}/,"",$2); 
    command=sprintf("mtt_pinclude %s",$2); 
    system(command)
  }
  else{
  print $0
  }
  

}' <$1