mirror of
https://github.com/FirebirdSQL/firebird.git
synced 2025-01-24 21:23:04 +01:00
Fixed Blas' corrections.
This commit is contained in:
parent
b5b1f121f2
commit
3657b2eaab
@ -20,7 +20,7 @@
|
|||||||
//
|
//
|
||||||
// All Rights Reserved.
|
// All Rights Reserved.
|
||||||
// Contributor(s): ______________________________________.
|
// Contributor(s): ______________________________________.
|
||||||
// $Id: gpre.cpp,v 1.57 2004-05-12 19:34:43 brodsom Exp $
|
// $Id: gpre.cpp,v 1.58 2004-05-13 06:48:41 eku Exp $
|
||||||
// Revision 1.2 2000/11/16 15:54:29 fsg
|
// Revision 1.2 2000/11/16 15:54:29 fsg
|
||||||
// Added new switch -verbose to gpre that will dump
|
// Added new switch -verbose to gpre that will dump
|
||||||
// parsed lines to stderr
|
// parsed lines to stderr
|
||||||
@ -1975,7 +1975,7 @@ static TOK get_token()
|
|||||||
if (sw_language == lang_cobol && !sw_ansi)
|
if (sw_language == lang_cobol && !sw_ansi)
|
||||||
while (line_position == 1) {
|
while (line_position == 1) {
|
||||||
c = skip_white();
|
c = skip_white();
|
||||||
start_line = line;
|
start_line = line_global;
|
||||||
}
|
}
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
@ -1985,9 +1985,9 @@ static TOK get_token()
|
|||||||
if (sw_language == lang_fortran) {
|
if (sw_language == lang_fortran) {
|
||||||
while (line_position == 6) {
|
while (line_position == 6) {
|
||||||
c = skip_white();
|
c = skip_white();
|
||||||
start_line = line;
|
start_line = line_global;
|
||||||
}
|
}
|
||||||
if (sw_sql && line != start_line) {
|
if (sw_sql && line_global != start_line) {
|
||||||
return_char(c);
|
return_char(c);
|
||||||
token_global.tok_string[0] = ';';
|
token_global.tok_string[0] = ';';
|
||||||
token_global.tok_string[1] = 0;
|
token_global.tok_string[1] = 0;
|
||||||
@ -1997,7 +1997,7 @@ static TOK get_token()
|
|||||||
token_global.tok_position = start_position + 1;
|
token_global.tok_position = start_position + 1;
|
||||||
token_global.tok_symbol = HSH_lookup(token_global.tok_string);
|
token_global.tok_symbol = HSH_lookup(token_global.tok_string);
|
||||||
token_global.tok_keyword = (KWWORDS) token_global.tok_symbol->sym_keyword;
|
token_global.tok_keyword = (KWWORDS) token_global.tok_symbol->sym_keyword;
|
||||||
return &token;
|
return &token_global;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
#endif
|
#endif
|
||||||
|
Loading…
Reference in New Issue
Block a user