Mercurial > octave-nkf

annotate test/octave.test/eval-catch/eval-catch-7.m @ 4699:5e2c68946f30

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2004-01-20 23:04:46 by jwe]
author jwe
date Tue, 20 Jan 2004 23:04:47 +0000
parents f0ab8a324da7
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
3820
f0ab8a324da7 [project @ 2001-04-24 16:06:59 by jwe]
jwe
parents:
diff changeset
1 function ms = mangle (s)
f0ab8a324da7 [project @ 2001-04-24 16:06:59 by jwe]
jwe
parents:
diff changeset
2 ## Wrap angle brackets around S.
f0ab8a324da7 [project @ 2001-04-24 16:06:59 by jwe]
jwe
parents:
diff changeset
3 ms = strcat ("<", s, ">");
f0ab8a324da7 [project @ 2001-04-24 16:06:59 by jwe]
jwe
parents:
diff changeset
4 endfunction
4699
5e2c68946f30 [project @ 2004-01-20 23:04:46 by jwe]
jwe
parents: 3820
diff changeset
5 eval ("clear a; a;", "mangle (lasterr)");