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

fixed problem with uppercase module names [Gerardo] 

git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@413 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
ballabio 2003-11-21 09:53:37 +00:00
parent 3c7e4111d2
commit 47c8a5dd1c
2 changed files with 22 additions and 20 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
install/moduledep.sh
View File

@ -17,22 +17,23 @@ rm -f moduledep.tmp1 moduledep.tmp2 # destroy previous contents
# create list of module dependencies
# each line is of the form:
# file_name.o : @module_name@
egrep -i "^ *use " $sources | # look for "USE name"
# cast all module names to lowercase because Fortran is case insensitive
egrep -i "^ *use " $sources | # look for "USE name"
sed 's/f90:/o /
s/,/ /' | # replace extension, insert space
# # and remove trailing comma
awk '{print $1 " : @" $3 "@"}' | # create dependency entry
sort | uniq > moduledep.tmp1 # remove duplicates
s/,/ /' | # replace extension, insert space
# # and remove trailing comma
awk '{print $1 " : @" tolower($3) "@"}' | # create dependency entry
sort | uniq > moduledep.tmp1 # remove duplicates
# create list of available modules
# for each module, create a line of the form:
# s/@module_name@/file_name/g
egrep -i "^ *module " $sources_all | # look for "MODULE name"
egrep -i "^ *module " $sources_all | # look for "MODULE name"
sed 's/f90:/o /
s/\//\\\//g' | # replace extension, insert space
# # and escape slashes
awk '{print "s/@" $3 "@/" $1 "/" }' | # create substitution line
sort | uniq > moduledep.tmp2 # remove duplicates
s/\//\\\//g' | # replace extension, insert
# # space and escape slashes
awk '{print "s/@" tolower($3) "@/" $1 "/" }' | # create substitution line
sort | uniq > moduledep.tmp2 # remove duplicates
# replace module names with file names
# by applying the file of substitution patterns just created

21
moduledep.sh
View File

@ -17,22 +17,23 @@ rm -f moduledep.tmp1 moduledep.tmp2 # destroy previous contents
# create list of module dependencies
# each line is of the form:
# file_name.o : @module_name@
egrep -i "^ *use " $sources | # look for "USE name"
# cast all module names to lowercase because Fortran is case insensitive
egrep -i "^ *use " $sources | # look for "USE name"
sed 's/f90:/o /
s/,/ /' | # replace extension, insert space
# # and remove trailing comma
awk '{print $1 " : @" $3 "@"}' | # create dependency entry
sort | uniq > moduledep.tmp1 # remove duplicates
s/,/ /' | # replace extension, insert space
# # and remove trailing comma
awk '{print $1 " : @" tolower($3) "@"}' | # create dependency entry
sort | uniq > moduledep.tmp1 # remove duplicates
# create list of available modules
# for each module, create a line of the form:
# s/@module_name@/file_name/g
egrep -i "^ *module " $sources_all | # look for "MODULE name"
egrep -i "^ *module " $sources_all | # look for "MODULE name"
sed 's/f90:/o /
s/\//\\\//g' | # replace extension, insert space
# # and escape slashes
awk '{print "s/@" $3 "@/" $1 "/" }' | # create substitution line
sort | uniq > moduledep.tmp2 # remove duplicates
s/\//\\\//g' | # replace extension, insert
# # space and escape slashes
awk '{print "s/@" tolower($3) "@/" $1 "/" }' | # create substitution line
sort | uniq > moduledep.tmp2 # remove duplicates
# replace module names with file names
# by applying the file of substitution patterns just created