Lines Matching +full:sub +full:- +full:spaces
1 #!env perl -w
26 eval 'exec perl -S $0 ${1+"$@"}'
33 # stlibobjs will usually be empty, or include spaces.
55 sub my_qm {
62 sub strrep {
68 if ($i == -1) {
84 sub do_subs {
91 s,^([a-zA-Z0-9_\-]*)\.o:,$1.so $1.po \$(OUTPRE)$1.\$(OBJEXT):,;
93 s,^([a-zA-Z0-9_\-]*)\.o:,\$(OUTPRE)$1.\$(OBJEXT):,;
99 while ($srct =~ m,/[a-z][a-zA-Z0-9_.\-]*/\.\./,) {
100 $srct =~ s,/[a-z][a-zA-Z0-9_.\-]*/\.\./,/,;
110 while ($pat =~ m,/[a-z][a-zA-Z0-9_.\-]*/$,) {
111 $pat =~ s,/[a-z][a-zA-Z0-9_.\-]*/$,/,;
123 sub do_subs_2 {
127 # Remove excess spaces.
132 while (m/\/[a-z][a-z0-9_.\-]*\/\.\.\//) {
143 s;\$\(BUILDTOP\)/include/db-config.h \$\(BUILDTOP\)/include/db.h ;\$(DB_DEPS) ;g;
145 if ($thisdir eq "util/gss-kernel-lib") {
164 sub uniquify {
165 # Apparently some versions of gcc -- like
166 # "gcc version 3.4.4 20050721 (Red Hat 3.4.4-2)"
167 # -- will sometimes emit duplicate header file names.
189 sub split_lines {
205 # Do directory-specific path substitutions on each filename read.