/* "lexer" : Lexical analyser */
/* */
/* Part of Inform 6.35 */
-/* copyright (c) Graham Nelson 1993 - 2020 */
+/* copyright (c) Graham Nelson 1993 - 2021 */
/* */
/* Inform is free software: you can redistribute it and/or modify */
/* it under the terms of the GNU General Public License as published by */
extern void set_origsource_location(char *source, int32 line, int32 charnum)
{
+ int file_no;
+
if (!source) {
/* Clear the Origsource declaration. */
CurrentLB->orig_file = 0;
}
/* Get the file number for a new or existing InputFiles entry. */
- int file_no = register_orig_sourcefile(source);
+ file_no = register_orig_sourcefile(source);
CurrentLB->orig_file = file_no;
CurrentLB->orig_source = InputFiles[file_no-1].filename;