Mercurial > hg > octave-lyh
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]; |