SQLITE_NOTICE(283): recovered 5 frames from WAL file /data/mtt.fossil-wal

Artifact 797b0982e0294488afb7428fc8cad83d7d36089b7e0f3061e3af1186fd2c869d:

• Executable file mttroot/mtt/bin/trans/m/mtt_info.m — part of check-in [b2c963fd73] at 2000-11-12 17:10:51 on branch origin/master — Close file if it is opened
  Reformated octave style (user: gawthrop@users.sourceforge.net, size: 962) [annotate] [blame] [check-ins using] [more...]

function mtt_info(info, infofile);
  ## mtt_info(info, infofile);

  ## function [bonds, status] = abg2cbg(bonds,components,system_name,filename)
  ## 
  ##     ###################################### 
  ##     ##### Model Transformation Tools #####
  ##     ######################################

  ## ###############################################################
  ## ## 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