bool Parser::Read() { if (!("read" == lex)) { std::cout << "Expected read\n"; return false; } else { L.getTokLex(tok,lex); } if (!("(" == lex)) { std::cout << "'read' keyword not followed by '('\n"; return false; } else { L.getTokLex(tok,lex); } if (!VarList()) return false; if (!(")" == lex)) { std::cout << "Argument list in Read not followed by ')'\n"; return false; } else { L.getTokLex(tok,lex); } if (!(";" == lex)) { std::cout << "Read statement not ended with ';'\n"; return false; } else { L.getTokLex(tok,lex); } std::cout << "Read => read ( VarList ) ;\n"; return true; }
bool Parser::Decl() { if (!Type()) return false; if (!VarList()) return false; if (";" == lex) { L.getTokLex(tok,lex); std::cout << "Decl => Type VarList ;\n"; return true; } else { std::cout << "Declaration did not end with ';'\n"; return false; } }
static void DoData( void ) { //======================== // Process one vlist/dlist/ pair. STMT save_stmtproc; StmtSw |= SS_DATA_INIT; save_stmtproc = StmtProc; StmtProc = PR_READ; // so I/O processing works correctly IOData = 0; // ... AError = false; VarList(); if( !AError ) { GEndVarSet(); ConList(); } StmtProc = save_stmtproc; StmtSw &= ~SS_DATA_INIT; }
STATUS CommandParser::Execute() { STATUS status = STATUS_OK; scanner_.AcceptPara(); std::string FileName; switch (cmd_) { case COMMAND_LOAD: FileName = scanner_.Symbol(); status = Load(FileName); break; case COMMAND_FUNCTION: FunList(); break; case COMMAND_HELP: Help(); break; case COMMAND_VARIABLE: VarList(); break; case COMMAND_SAVE: FileName = scanner_.Symbol(); status = Save(FileName); break; case COMMAND_QUIT: std::cout<<"Good bye!"<<std::endl; status = STATUS_QUIT; break; default: std::cout<<"Unknown command: "<<"\""<<cmdName_<<"\"."<<std::endl; status = STATUS_ERROR; } return status; }
void HostStatus::returnSlaveFrames( bool commitHostStatus ) { Database::current()->beginTransaction(); Database::current()->exec( "SELECT return_slave_tasks_3(?)", VarList() << host().key() ); Database::current()->commitTransaction(); }
void TimeEntryDialog::setupSuggestedTimeSheet() { VarList v; v += QDate::currentDate(); v += User::currentUser().key(); ScheduleList sl = Schedule::select( "date = ? and fkeyuser = ?", v ); if( !sl.isEmpty() ) { Schedule s = sl[0]; setElementList( s.element() ); } else { TimeSheetList recent = TimeSheet::select( "fkeyemployee=? order by dateTime desc limit 1", VarList() += User::currentUser().key() ); if( !recent.isEmpty() ) { TimeSheet ts = recent[0]; setProject( ts.project() ); setAssetType( ts.assetType() ); setElementList( ts.element() ); } } }
JobAssignmentList Host::activeAssignments() const { return JobAssignment::select( "WHERE fkeyhost=? AND fkeyjobassignmentstatus IN (SELECT keyjobassignmentstatus FROM jobassignmentstatus WHERE status IN ('ready','copy','busy'))", VarList() << key() ); }