Mercurial > hg > octave-nkf

diff src/ov.cc @ 8039:cd90e2842080

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add additional integer math and conversion warnings, set their default state to be off and add the intwarning function
author David Bateman <dbateman@free.fr>
date Tue, 19 Aug 2008 14:46:35 -0400
parents dc36eb214129
children 283989f2da9b
line wrap: on
line diff
--- a/src/ov.cc
+++ b/src/ov.cc
@@ -1368,14 +1368,14 @@
   Array<int> retval (A.dims ());
   octave_idx_type n = A.numel ();
 
-  octave_int<int>::clear_trunc_flag ();
+  octave_int<int>::clear_conv_flag ();
   for (octave_idx_type i = 0; i < n; i++)
     retval.xelem (i) = octave_int<int> (A.xelem (i));
+
   if (octave_int<int>::get_trunc_flag ())
-    {
-      gripe_truncated_conversion (octave_int<T>::type_name (), "int");
-      octave_int<int>::clear_trunc_flag ();
-    }
+    gripe_truncated_conversion (octave_int<T>::type_name (), "int");
+
+  octave_int<int>::clear_conv_flag ();
 
   return retval;
 }