Artifact 2dabecc7a79d193b56f6b6f3031dd8df38196bbefff8abf9f2788a196a9e7d52:

• Executable file mtt/bin/trans/mtt_pinclude — part of check-in [af3953deae] at 2021-03-01 11:39:42 on branch master — Cleanup repository after cvs2git conversion. (user: jeff@gridfinity.com, size: 581) [annotate] [blame] [check-ins using] [more...]
• Executable file mttroot/mtt/bin/trans/mtt_pinclude — part of check-in [66bb5feadf] at 2002-04-28 18:41:27 on branch origin/master — Fixed [ 549658 ] awk should be gawk.
  Replaced calls to awk with call to gawk. (user: geraint@users.sourceforge.net, size: 581) [annotate] [blame] [check-ins using]

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

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.1  2000/12/28 11:56:46  peterg
## Put under RCS
##
###############################################################



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

}' <$1