comparison liboctave/dbleSCHUR.cc @ 7482:29980c6b8604

don't check f77_exception_encountered
author John W. Eaton <jwe@octave.org>
date Thu, 14 Feb 2008 21:57:50 -0500
parents a1dbe9d80eee
children eb63fbe60fab
comparison
equal deleted inserted replaced
7481:78f3811155f7 7482:29980c6b8604
135 pwork, lwork, piwork, liwork, pbwork, info 135 pwork, lwork, piwork, liwork, pbwork, info
136 F77_CHAR_ARG_LEN (1) 136 F77_CHAR_ARG_LEN (1)
137 F77_CHAR_ARG_LEN (1) 137 F77_CHAR_ARG_LEN (1)
138 F77_CHAR_ARG_LEN (1))); 138 F77_CHAR_ARG_LEN (1)));
139 139
140 if (f77_exception_encountered)
141 (*current_liboctave_error_handler) ("unrecoverable error in dgeesx");
142
143 return info; 140 return info;
144 } 141 }
145 142
146 std::ostream& 143 std::ostream&
147 operator << (std::ostream& os, const SCHUR& a) 144 operator << (std::ostream& os, const SCHUR& a)