Download Implementing Activity Structures Process Modeling On Top Of The

43
#
#
#
#
# build envelope
#
ENVELOPE build;
SHELL sh;
The Trustees of Columbia University
in the City of New York
All Rights Reserved
INPUT
set_of binary: ofiles;
binary: execfile;
OUTPUT
none;
BEGIN
cc $ofiles -o $execfile
if [ $? -ne 0 ]
then
echo "Build failed."
RETURN "1";
fi
mkdir $tmp_dir
# Now the header files
for i in $hfiles
do
ln -s $i $tmp_dir
done
echo "cc -g -c -ll -lc -lm -lX11 -I$tmp_dir -in: $thefile -out:$thebinary"
cc -g -c -I$tmp_dir $thefile -ll -lc -lm -lX11 -o $thebinary
CCSTATUS=$?
if [ "x$tmp_dir" != "x" ]
then
rm -r $tmp_dir
fi
if [ $CCSTATUS -eq 0 ]
then
echo compile successful
RETURN "0";
else
echo compile failed
RETURN "1";
fi
ENVELOPE
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
Marvel Software Development Environment
#
#
Marvel Software Development Environment
#
#
Copyright 1989
#
The Trustees of Columbia University
#
in the City of New York
#
All Rights Reserved
#
# compile envelope
#
# usage: compile [CFILE]
#
ENVELOPE
OUTPUT
END
SHELL ksh;
;
RETURN "0";
INPUT
text
: thefile;
binary
: thebinary;
set_of HFILE : hfiles;
OUTPUT
none;
BEGIN
END
BEGIN
echo
echo Editing source file in $thefile ...
Created="YES"
SaveReport=‘ls -l $thefile‘
if [ $? -eq 0 ]
then
INPUT
text : thefile;
SHELL sh;
This edits the chosen file, and sends along the library which has
power over it so that emacs will read in the TAGS file associated
with it. This also incorporates a simple locking mechanism by
making the file writable when it edits it, and removing this capability
when it leaves.
Copyright 1991
The Trustees of Columbia University
in the City of New York
All Rights Reserved
thedir=‘dirname $thefile‘
FILENAME=‘basename $thefile‘
editor envelope
echo "$0 $thefile on ‘date‘"
echo
usage: edit [FILE]
echo "$0 $1 on ‘date‘"
echo
# we need to make the -I list
tmp_dir=/tmp/compile$$