Mercurial > octave-nkf

diff src/ov-base.cc @ 5054:d112fc15399c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2004-10-21 06:30:38 by jwe]
author jwe
date Thu, 21 Oct 2004 06:30:39 +0000
parents 44046bbaa52c
children e35b034d3523
line wrap: on
line diff
--- a/src/ov-base.cc	Tue Oct 19 23:10:55 2004 +0000
+++ b/src/ov-base.cc	Thu Oct 21 06:30:39 2004 +0000
@@ -264,9 +264,10 @@
       { \
 	if (require_int && D_NINT (d) != d) \
 	  error ("conversion of %g to " #T " value failed", d); \
-	else if (d < MIN_LIMIT || d > MAX_LIMIT) \
-	  error ("conversion of %g to short int out of range (%d, %d)", \
-		 d, MIN_LIMIT, MAX_LIMIT); \
+	else if (d < MIN_LIMIT) \
+	  retval = MIN_LIMIT; \
+	else if (d > MAX_LIMIT) \
+	  retval = MAX_LIMIT; \
 	else \
 	  retval = static_cast<T> (fix (d)); \
       } \