Mercurial > hg > octave-lyh

diff scripts/strings/str2double.m @ 8507:cadc73247d65

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
style fixes
author John W. Eaton <jwe@octave.org>
date Tue, 13 Jan 2009 14:08:36 -0500
parents bc982528de11
children eb63fbe60fab
line wrap: on
line diff
--- a/scripts/strings/str2double.m
+++ b/scripts/strings/str2double.m
@@ -184,7 +184,7 @@
     endfor
     CD = RD;
     for k = 1:length (cdelim),
-      CD = CD | (s==cdelim(k));
+      CD = CD | (s == cdelim(k));
     endfor
 
     curr_row = 1;
@@ -263,7 +263,7 @@
 	  num(curr_row,curr_col) = NaN;
 	else
 	  if (ddelim == ".")
-	    t(t==ddelim) = ".";
+	    t(t == ddelim) = ".";
 	  endif
 	  [v, tmp2, c] = sscanf(char(t), "%f %s", "C");
 	  ## [v,c,em,ni] = sscanf(char(t),"%f %s");