Overview
Comment:Checks for the existence of .pm files in either the working directory
or the mtt subdirectory (copied from cr/perl/).
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: 05c5e3fed7d1b334668d16cf2000f255df144442a28d44cd59a13c2e39f06bce
User & Date: geraint@users.sourceforge.net on 2004-09-03 08:36:57
Other Links: branch diff | manifest | tags
Context
2004-09-03
08:38:28
Evaluates standard CRs (mtt::$cr) after user-defined CRs ($cr). check-in: 0610867d71 user: geraint@users.sourceforge.net tags: origin/master, trunk
08:36:57
Checks for the existence of .pm files in either the working directory
or the mtt subdirectory (copied from cr/perl/).
check-in: 05c5e3fed7 user: geraint@users.sourceforge.net tags: origin/master, trunk
08:35:27
Copies Perl CRs to an mtt subdirectory (=> mtt:: workspace). check-in: 9d047c0906 user: geraint@users.sourceforge.net tags: origin/master, trunk
Changes

Modified mttroot/mtt/bin/trans/apply_crs from [c893c6e23b] to [fe36e405ae].

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
#! /bin/sh

sys=$1

# check for the existence of CRs that we need
crs=''
for cr in `cat ${sys}_cr.txt`; do
  if [ -f ${cr}.pm ]; then
      crs="$crs $cr"
  fi
done

# should be reading the output from ese_r2make
# on standard input
${MTT_LIB}/cr/perl/apply_cr.pl ${crs}
echo ";end;"







|








1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
#! /bin/sh

sys=$1

# check for the existence of CRs that we need
crs=''
for cr in `cat ${sys}_cr.txt`; do
  if [ -f ${cr}.pm -o -f mtt/${cr}.pm ]; then
      crs="$crs $cr"
  fi
done

# should be reading the output from ese_r2make
# on standard input
${MTT_LIB}/cr/perl/apply_cr.pl ${crs}
echo ";end;"


MTT: Model Transformation Tools
GitHub | SourceHut | Sourceforge | Fossil RSS ]