Mercurial > hg > octave-nkf
comparison liboctave/DASPK.cc @ 5765:7ba9ad1fec11
[project @ 2006-04-17 05:05:15 by jwe]
author | jwe |
---|---|
date | Mon, 17 Apr 2006 05:05:17 +0000 |
parents | 4c8a2e4e0717 |
children | ace8d8d26933 |
comparison
equal
deleted
inserted
replaced
5764:80409c2defcc | 5765:7ba9ad1fec11 |
---|---|
26 #endif | 26 #endif |
27 | 27 |
28 #include <cfloat> | 28 #include <cfloat> |
29 #include <cmath> | 29 #include <cmath> |
30 | 30 |
31 #include <sstream> | |
32 | |
31 #include "DASPK.h" | 33 #include "DASPK.h" |
32 #include "f77-fcn.h" | 34 #include "f77-fcn.h" |
33 #include "lo-error.h" | 35 #include "lo-error.h" |
34 #include "lo-sstream.h" | |
35 #include "quit.h" | 36 #include "quit.h" |
36 | 37 |
37 typedef octave_idx_type (*daspk_fcn_ptr) (const double&, const double*, | 38 typedef octave_idx_type (*daspk_fcn_ptr) (const double&, const double*, |
38 const double*, const double&, | 39 const double*, const double&, |
39 double*, octave_idx_type&, double*, octave_idx_type*); | 40 double*, octave_idx_type&, double*, octave_idx_type*); |
685 std::string | 686 std::string |
686 DASPK::error_message (void) const | 687 DASPK::error_message (void) const |
687 { | 688 { |
688 std::string retval; | 689 std::string retval; |
689 | 690 |
690 OSSTREAM buf; | 691 std::ostringstream buf; |
691 buf << t << OSSTREAM_ENDS; | 692 buf << t; |
692 std::string t_curr = OSSTREAM_STR (buf); | 693 std::string t_curr = buf.str (); |
693 OSSTREAM_FREEZE (buf); | |
694 | 694 |
695 switch (istate) | 695 switch (istate) |
696 { | 696 { |
697 case 1: | 697 case 1: |
698 retval = "a step was successfully taken in intermediate-output mode."; | 698 retval = "a step was successfully taken in intermediate-output mode."; |