Index: mttroot/mtt/bin/trans/m/subs_arg.m ================================================================== --- mttroot/mtt/bin/trans/m/subs_arg.m +++ mttroot/mtt/bin/trans/m/subs_arg.m @@ -15,10 +15,13 @@ % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % %% Version control history % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % %% $Id$ % %% $Log$ +% %% Revision 1.5 1998/07/21 16:43:26 peterg +% %% Now writes to an explicit fileID - otherwise we may run out of IDs. +% %% % %% Revision 1.4 1996/12/10 16:04:11 peterg % %% Changed file handling on mtt_info. % %% % %% Revision 1.3 1996/12/07 18:19:39 peterg % %% Replaces null argument by a default and tells user. @@ -56,10 +59,11 @@ end; args_count = args_count+1; ch = str2ch(args,args_count); end; arg_out = args2arg(Args,i); + % Test for empty argument -- replace by default and tell user message = 'Argument %1.0f of component %s(%s) of system %s is undefined - \n replacing by %s'; if strcmp(arg_out,'') info = sprintf(message, ... @@ -72,11 +76,5 @@ mtt_info(info,fileID); args_out = [args_out, arg_out]; end; end; end; - - - - - -