Changeset 465 in dev for trunk/ab5.0/abdev/BasicCompiler_Common/OldStatement.cpp
- Timestamp:
- Mar 24, 2008, 8:05:20 PM (17 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/ab5.0/abdev/BasicCompiler_Common/OldStatement.cpp
r290 r465 41 41 if(Parameter[i2+1]==';') lstrcpy(buffer+i2,"? \""); 42 42 else if(Parameter[i2+1]==',') lstrcpy(buffer+i2,"\""); 43 else SetError(10,"Input",cp);43 else compiler.errorMessenger.Output(10,"Input",cp); 44 44 i2+=2; 45 45 } … … 57 57 if(Parameter[i2+1]==';') lstrcpy(buffer+i2,"? \""); 58 58 else if(Parameter[i2+1]==',') lstrcpy(buffer+i2,"\""); 59 else SetError(10,"Input",cp);59 else compiler.errorMessenger.Output(10,"Input",cp); 60 60 i2+=2; 61 61 } … … 89 89 } 90 90 if(temporary[0]=='\0'){ 91 SetError(10,"Input",cp);91 compiler.errorMessenger.Output(10,"Input",cp); 92 92 return; 93 93 } … … 122 122 else pUserProc=GetSubHash("INPUT_FromPrompt"); 123 123 if(!pUserProc){ 124 SetError(3,"Input",cp);124 compiler.errorMessenger.Output(3,"Input",cp); 125 125 return; 126 126 } … … 189 189 } 190 190 if(temporary[0]=='\0'){ 191 SetError(10,"Print",cp);191 compiler.errorMessenger.Output(10,"Print",cp); 192 192 return; 193 193 } … … 224 224 else pUserProc=GetSubHash("PRINTUSING_ToPrompt"); 225 225 if(!pUserProc){ 226 SetError(3,"Print",cp);226 compiler.errorMessenger.Output(3,"Print",cp); 227 227 return; 228 228 } … … 328 328 else pUserProc=GetSubHash("PRINT_ToPrompt"); 329 329 if(!pUserProc){ 330 SetError(3,"Print",cp);330 compiler.errorMessenger.Output(3,"Print",cp); 331 331 return; 332 332 }
Note:
See TracChangeset
for help on using the changeset viewer.