Mercurial > octave-nkf

changeset 419:b61c335c45c5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1994-05-23 06:43:05 by jwe]
author jwe
date Mon, 23 May 1994 06:43:05 +0000
parents c18892d88a17
children b8c0ee979c15
files scripts/general/int2str.m
diffstat 1 files changed, 4 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/general/int2str.m	Mon May 23 03:12:56 1994 +0000
+++ b/scripts/general/int2str.m	Mon May 23 06:43:05 1994 +0000
@@ -1,4 +1,4 @@
-# Copyright (C) 1993 John W. Eaton
+# Copyright (C) 1993, 1994 John W. Eaton
 # 
 # This file is part of Octave.
 # 
@@ -24,9 +24,11 @@
 #
 # See also: sprintf, num2str 
 
+# XXX FIXME XXX -- this will fail for very large values.
+
   if (nargin == 1)
     if (rows (x) == 1 && columns (x) == 1)
-      retval = sprintf ("%f\n", round (x));
+      retval = sprintf ("%d", round (x));
     else
       error ("int2str: expecting scalar argument");
     endif