Annotation of coherent/a/usr/bob/mwc_cr, revision 1.1.1.1

1.1       root        1: : mwc_cr 10/20/91
                      2: : Usage: mwc_cr file ...
                      3: : Add Mark Williams copyright banner to given files.
                      4: 
                      5: T01="  COHERENT Version 3.2"
                      6: T02="  Copyright (c) 1982, 1991 by Mark Williams Company."
                      7: T03="  All rights reserved. May not be copied without permission."
                      8: 
                      9: for f in $*
                     10: do
                     11:        case $f in
                     12:        *.c|*.h|*.y)
                     13:                CMT0='/* (-lgl'
                     14:                CMT1=' *'
                     15:                CMT2=' -lgl) */'
                     16:        ;;
                     17:        *.s|*.t|*.f)
                     18:                CMT0='/ (lgl-'
                     19:                CMT1='/'
                     20:                CMT2='/ -lgl)'
                     21:        ;;
                     22:        *.a86|*.asm|*.as2|*.a68|*.csd)
                     23:                CMT0='; (lgl-'
                     24:                CMT1=';'
                     25:                CMT2='; -lgl)'
                     26:        ;;
                     27:        *Makefile|*makefile)
                     28:                CMT0='# (lgl-'
                     29:                CMT1='#'
                     30:                CMT2='# -lgl)'
                     31:        ;;
                     32:        *)
                     33:                continue
                     34:        ;;
                     35:        esac
                     36: echo $f:
                     37: ed - $f <<%
                     38: 0a
                     39: $CMT0
                     40: $CMT1 $T01
                     41: $CMT1 $T02
                     42: $CMT1 $T03
                     43: $CMT2
                     44: .
                     45: wq
                     46: %
                     47: done

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.