Mercurial > forge

changeset 12009:b890b4d73ca7 octave-forge

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Added test section supplied by Keith Sheppard (bug #39420)
author prnienhuis
date Thu, 15 Aug 2013 20:14:56 +0000
parents c92b21c7b3e9
children 34572b7b7450
files main/io/inst/object2json.m
diffstat 1 files changed, 12 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/main/io/inst/object2json.m	Thu Aug 15 19:40:05 2013 +0000
+++ b/main/io/inst/object2json.m	Thu Aug 15 20:14:56 2013 +0000
@@ -196,3 +196,15 @@
   object = regexprep (object, '(?<!\\)\\(?=(\\\\)*(?!([\"\\\/bfnrt]|([u][0-9A-Fa-f]{4}))+?))', "\\\\");
 
 endfunction
+
+
+%!test
+%! assert(object2json([logical(1), logical(0)]), '[true,false]');
+
+%!test
+%! car.name = 'Mzd R8';
+%! car.speedsamples = [98, 33, 50; 56, 120, 102; 77, 82, 93];
+%! car.toofast = car.speedsamples >= 90;
+%! car.leased = logical(1);
+%! car.european = logical(0);
+%! assert(object2json(car), '{"name":"Mzd R8","speedsamples":[[98,33,50],[56,120,102],[77,82,93]],"toofast":[[true,false,false],[false,true,true],[false,false,true]],"leased":true,"european":false}');