Overview
Comment:Initial revision
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: 8416c41d3089a034aed89f7dea83634f5d2c8c038b284bf0715b745cbbfa8c03
User & Date: gawthrop@users.sourceforge.net on 2000-10-12 19:26:42
Other Links: branch diff | manifest | tags
Context
2000-10-12
19:27:20
Now writes out the aliased args ... check-in: 13070a5161 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
19:26:42
Initial revision check-in: 8416c41d30 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
19:26:23
Modified to work inside mtt_make_sympar check-in: 9f6fba3779 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes

Added mttroot/mtt/bin/trans/m/mtt_save_alias.m version [f803bfd8d0].











































>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
function mtt_save_alias (arg,system_name)

  ## usage:  mtt_save_alias (arg,system_name,FileID)
  ##
  ##
  ##     ###################################### 
  ##     #### Model  Transformation Tools #####
  ##     ######################################

  ## ############################################################### 
  ## Version
  ## control history
  ## ############################################################### ## $Id:
  ## mtt_info.m,v 1.2 1997/02/11 10:06:42 peterg Exp peterg $ ## $Log:
  ## mtt_info.m,v $ ## Revision 1.2  1997/02/11 10:06:42  peterg ##
  ## ###############################################################

  fileid = fopen('mtt_aliased.txt','a');
  fprintf(fileid, "%s\t%s\n", arg,system_name);

endfunction

Added mttroot/mtt/bin/trans/mtt_make_sympar version [61c4432945].



































































































































>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
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
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
#!/bin/sh

     ###################################### 
     ##### Model Transformation Tools #####
     ######################################

# Bourne shell script: mtt_make_sympar
# Makes the sympar.txt file
# Copyright (C) 2000 by Peter J. Gawthrop

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
##
###############################################################


sys=$1 # System name
filename=$1_sympar.txt
# Inform user
echo Creating $filename

# Create list of all sympars including those that are aliased
sh $1_type.sh 'echo ' ' ' ' ' |\
awk '{print "abg2sympar_m2txt " $1, $2}' |\
sh | sort -u > mtt_all_sympar.txt

# Sort ther aliased list
sort -u  $1_aliased.txt > mtt_aliased_sort.txt

# Compare it with the aliased list and show the differences
diff mtt_all_sympar.txt mtt_aliased_sort.txt |\
grep '<' | awk '{printf("%s\t%s\n", $2,$3)}' > mtt_sympar.txt

# Assume same name in different system is the same
awk '{
    if ($1==name){
	sysname[i++]=$2
    }
    
    if ($1!=name){
        printf("%s\t",name)
        comma="";
        for (j=1;j<=i;j++){
          printf("%s%s", comma, sysname[j]);
          comma=",";
        }
        printf("\n")
        i=1;
        sysname[1]=$2;
    }
    name = $1
}
END{
        printf("%s\t",name)
        comma="";
        for (j=1;j<=i;j++){
          printf("%s%s", comma, sysname[j]);
          comma=",";
        }
        printf("\n")

}' < mtt_sympar.txt >$filename


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