simplify nested include file handling
This commit is contained in:
@ -77,7 +77,6 @@ Input::Input(LAMMPS *lmp, int argc, char **argv) : Pointers(lmp)
|
|||||||
|
|
||||||
echo_screen = 0;
|
echo_screen = 0;
|
||||||
echo_log = 1;
|
echo_log = 1;
|
||||||
eof_return = 0;
|
|
||||||
|
|
||||||
label_active = 0;
|
label_active = 0;
|
||||||
labelstr = NULL;
|
labelstr = NULL;
|
||||||
@ -206,18 +205,7 @@ void Input::file()
|
|||||||
MPI_Bcast(&n,1,MPI_INT,0,world);
|
MPI_Bcast(&n,1,MPI_INT,0,world);
|
||||||
if (n == 0) {
|
if (n == 0) {
|
||||||
if (label_active) error->all(FLERR,"Label wasn't found in input script");
|
if (label_active) error->all(FLERR,"Label wasn't found in input script");
|
||||||
if (eof_return) break;
|
break;
|
||||||
if (me == 0) {
|
|
||||||
if (infile != stdin) {
|
|
||||||
fclose(infile);
|
|
||||||
infile = NULL;
|
|
||||||
}
|
|
||||||
nfile--;
|
|
||||||
}
|
|
||||||
MPI_Bcast(&nfile,1,MPI_INT,0,world);
|
|
||||||
if (nfile == 0) break;
|
|
||||||
if (me == 0) infile = infiles[nfile-1];
|
|
||||||
continue;
|
|
||||||
}
|
}
|
||||||
|
|
||||||
if (n > maxline) reallocate(line,maxline,n);
|
if (n > maxline) reallocate(line,maxline,n);
|
||||||
@ -1053,9 +1041,8 @@ void Input::include()
|
|||||||
error->one(FLERR,str);
|
error->one(FLERR,str);
|
||||||
}
|
}
|
||||||
infiles[nfile++] = infile;
|
infiles[nfile++] = infile;
|
||||||
eof_return = 1;
|
|
||||||
file();
|
file();
|
||||||
eof_return = 0;
|
fclose(infile);
|
||||||
nfile--;
|
nfile--;
|
||||||
infile = infiles[nfile-1];
|
infile = infiles[nfile-1];
|
||||||
}
|
}
|
||||||
|
|||||||
@ -46,7 +46,6 @@ class Input : protected Pointers {
|
|||||||
char *command; // ptr to current command
|
char *command; // ptr to current command
|
||||||
int echo_screen; // 0 = no, 1 = yes
|
int echo_screen; // 0 = no, 1 = yes
|
||||||
int echo_log; // 0 = no, 1 = yes
|
int echo_log; // 0 = no, 1 = yes
|
||||||
int eof_return; // if 1: at EOF return from parsing in file()
|
|
||||||
|
|
||||||
private:
|
private:
|
||||||
int me; // proc ID
|
int me; // proc ID
|
||||||
|
|||||||
Reference in New Issue
Block a user