scnc
/
quantum-espresso
mirror of https://gitlab.com/QEF/q-e.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

- module files self-dependencies eliminated 

carlo


git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@18 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
cavazzon 2003-01-24 16:55:36 +00:00
parent 9ff317d9f7
commit 00f576f3db
1 changed files with 9 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
install/moduledep.c
View File

@ -182,13 +182,15 @@ int main(int argc,char *argv[])
len = strlen( use[i].filename ) + 3;
for( nm = 0; nm < use[i].nmodules; nm ++ ) {
for( j = 0; j < ndepend; j++ ) {
for( k = 0; k < module[j].nmodules; k ++ ) {
if( DEBUG ) printf("%s %s\n",use[i].modules[nm], module[j].modules[k]);
if( ! strcmp( use[i].modules[nm], module[j].modules[k] ) ) {
lobj = strlen( module[j].filename );
if( (len+lobj) > 70 ) { printf(" \\\n "); len = 4; }
printf("%s ", module[j].filename );
len += lobj;
if( strcmp( use[i].filename, module[j].filename ) ) {
for( k = 0; k < module[j].nmodules; k ++ ) {
if( DEBUG ) printf("%s %s\n",use[i].modules[nm], module[j].modules[k]);
if( ! strcmp( use[i].modules[nm], module[j].modules[k] ) ) {
lobj = strlen( module[j].filename );
if( (len+lobj) > 70 ) { printf(" \\\n "); len = 4; }
printf("%s ", module[j].filename );
len += lobj;
}
}
}
}