File mttroot/mtt/bin/trans/mtt_pinclude artifact dd55a77a76 part of check-in 2c7a793ee5
#!/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