comparison scripts/strings/strcat.m @ 5426:ee16a0a46351

[project @ 2005-08-15 19:59:39 by jwe]
author jwe
date Mon, 15 Aug 2005 19:59:49 +0000
parents 4c8a2e4e0717
children 66ad03c58880
comparison
equal deleted inserted replaced
5425:8b7e98073ff5 5426:ee16a0a46351
33 33
34 ## Author: jwe 34 ## Author: jwe
35 35
36 function st = strcat (s, t, varargin) 36 function st = strcat (s, t, varargin)
37 37
38 if (nargin > 1) 38 if (nargin > 0)
39 save_warn_empty_list_elements = warn_empty_list_elements; 39 save_warn_empty_list_elements = warn_empty_list_elements;
40 unwind_protect 40 unwind_protect
41 warn_empty_list_elements = 0; 41 warn_empty_list_elements = 0;
42 if (isstr (s) && isstr (t)) 42 if (isstr (s) && isstr (t))
43 tmpst = [s, t]; 43 tmpst = [s, t];