blob: da237ca9edcf8442d974e17541b5d3bbc3764bdc (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
|
#!/bin/csh -f
# This file is part of the Project Athena Zephyr Notification System.
# It is one of the source files comprising zwgc, the Zephyr WindowGram
# client.
#
# Created by: Marc Horowitz <marc@athena.mit.edu>
#
# $Source$
# $Author$
#
# Copyright (c) 1989 by the Massachusetts Institute of Technology.
# For copying and distribution information, see the file
# "mit-copyright.h".
#
set rcsid_generate_stack_instance='$Id$'
set source=$1
shift
if (z$1x == zx) then
echo "usage: generate_stack_instance <srcdir> <typename> [<include file>]"
exit 1
endif
if (-r $source/stack.h) then
else
echo "generate_stack_instance: unable to open" $source/stack.h
exit 2
endif
if (z$2x == zx) then
echo > $1_stack.h
else
echo "#include" '"'$2'"' > $1_stack.h
endif
sed "s/TYPE_T/$1/g" $source/stack.h >> $1_stack.h
|
