Overview
Comment:Default file when no second argument
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: 52245d1decfb07db46153c9798259a8fb3b901672d7e2722c52a9db743072577
User & Date: gawthrop@users.sourceforge.net on 2003-03-24 12:18:00.000
Other Links: branch diff | manifest | tags
Context
2003-03-24
12:19:47
Alias CRs (as well ars args) check-in: d4e11f9ca5 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
12:18:00
Default file when no second argument check-in: 52245d1dec user: gawthrop@users.sourceforge.net tags: origin/master, trunk
12:17:10
Put equation on one line - easier for gino to parse check-in: 6c46f9f457 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes
Unified Diff Ignore Whitespace Patch
Modified mttroot/mtt/bin/trans/m/mtt_info.m from [797b0982e0] to [0d1963332d].
︙︙
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

  ##     ######################################

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




  ## ## Revision 1.2  1997/02/11 10:06:42  peterg
  ## ## Removed a debugging line.
  ## ##
  ## ## Revision 1.1  1996/08/18  20:06:57  peter
  ## ## Initial revision
  ## ##
  ## ###############################################################

  ## Set default file if it isn't there already

  if nargin<2








    infofile = fopen("mtt_info.txt","a");
  end;

  fprintf(infofile, "INFORMATION: %s\n", info);

  if nargin<2
    fclose(infofile);
  end;

endfunction











>
>
>
>









>

>
>
>
>
>
>
>
>





|








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

  ##     ######################################

  ## ###############################################################
  ## ## Version control history
  ## ###############################################################
  ## ## $Id$
  ## ## $Log$
  ## ## Revision 1.3  2000/11/12 17:10:51  peterg
  ## ## Close file if it is opened
  ## ## Reformated  octave style
  ## ##
  ## ## Revision 1.2  1997/02/11 10:06:42  peterg
  ## ## Removed a debugging line.
  ## ##
  ## ## Revision 1.1  1996/08/18  20:06:57  peter
  ## ## Initial revision
  ## ##
  ## ###############################################################

  ## Set default file if it isn't there already

  if nargin<2
    nofile = 1;
  elseif infofile<0
    nofile = 1;
  else
    nofile = 0;
  endif
  
  if nofile
    infofile = fopen("mtt_info.txt","a");
  end;

  fprintf(infofile, "INFORMATION: %s\n", info);

  if nofile
    fclose(infofile);
  end;

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