|
Loading...
Searching...
No Matches
Go to the documentation of this file.
46 for( int i = pos; i < 80; i++)
55 while((beg <= end) && (buf[end] == BLANK))
58 while((beg <= end) && (buf[beg] == BLANK))
61 for( int i = beg; i <= end; i++)
67bool MPSInput::readLine()
97 len = int(strlen( m_buf));
99 for( int i = 0; i < len; i++)
109 len = int(strlen( m_buf));
114 assert(strlen( m_buf) >= 80);
122 assert( m_f0 != nullptr);
124 m_f1 = strtok( nullptr, " ");
135 else if(( m_buf[39] == '$') && ( m_buf[38] == ' '))
146 if(space == BLANK || len < 13)
152 bool number = isdigit( m_buf[24]) || isdigit( m_buf[25])
162 if(number || len < 13)
196 if( nullptr == ( m_f1 = strtok(s, " ")))
199 if(( nullptr == ( m_f2 = strtok( nullptr, " "))) || (* m_f2 == '$'))
205 if(!strcmp( m_f2, "'MARKER'"))
208 if(( nullptr == ( m_f3 = strtok( nullptr, " "))) || (* m_f3 == '$'))
216 if(!strcmp( m_f3, "'INTORG'"))
218 else if(!strcmp( m_f3, "'INTEND'"))
224 if(!strcmp( m_f3, "'MARKER'"))
227 if(( nullptr == ( m_f4 = strtok( nullptr, " "))) || (* m_f4 == '$'))
235 if(!strcmp( m_f4, "'INTORG'"))
237 else if(!strcmp( m_f4, "'INTEND'"))
243 if(( nullptr == ( m_f5 = strtok( nullptr, " "))) || (* m_f5 == '$'))
250 SPxOut::debug( this, "DMPSIN02 -----------------------------------------------\n"
257 "DMPSIN09 -----------------------------------------------\n",
263 (( m_f5 == nullptr) ? "nil" : m_f5));
268void MPSInput::insertName( const char* name, bool second)
static void debug(const T *, Args &&... args)
Everything should be within this namespace.
static void patch_field(char *buf, int beg, int end) change all blanks inside a field to PATCH_CHAR.
static void clear_from(char *buf, int pos) fill the line from pos up to column 80 with blanks.
Debugging, floating point type and parameter definitions.
Wrapper for different output streams and verbosity levels.
|