fix #5 using a modified fast parser and eval

Author: fangq

loadjson.m

@@ -153,7 +153,6 @@
     if(isfield(varargin{1},'progressbar_'))
         pbar=varargin{1}.progressbar_;
     end
-    fastparserfailed=0;
 
     if next_char ~= ']'
 	if(jsonopt('FastArrayParser',1,varargin{:})>=1 && arraydepth>=jsonopt('FastArrayParser',1,varargin{:}))
@@ -205,15 +204,13 @@
               end
               arraystr=regexprep(arraystr,'\]\s*,','];');
             catch
-              fastparserfailed=1;
             end
 	else
             arraystr='[';
 	end
         try
-           if(fastparserfailed)
-                throw;
-           end
+           arraystr=regexprep(arraystr,'^\s*\[','{','once');
+           arraystr=regexprep(arraystr,'\]\s*$','}','once');
            if(isoct && regexp(arraystr,'"','once'))
                 error('Octave eval can produce empty cells for JSON-like input');
            end