# HG changeset patch
# User jwe
# Date 769675385 0
# Node ID b61c335c45c52e1c52f3e17a5f69ace2a4544175
# Parent  c18892d88a177220db5a7d8473f28a4b03390e5b
[project @ 1994-05-23 06:43:05 by jwe]

diff --git a/scripts/general/int2str.m b/scripts/general/int2str.m
--- a/scripts/general/int2str.m
+++ b/scripts/general/int2str.m
@@ -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