Lines Matching refs:NEW
48 open(MEPHO, "> include/elf/mep.h.new") || die("mep.h.new create: $!");
53 print (MEPHO "$pre$rel, $val$rest\n") || die("mep.h.new write: $!");
68 print(MEPHO) || die("mep.h.new write: $!");
72 close(MEPHO) || die("mep.h.new close: $!");
142 printf(NEW " MEPREL (R_MEP_%-10s%d,%3d,%2d,%2d,%2d,%2s, 0x%s),\n",
158 print NEW " case R_MEP_$relocs[$i]: /* $pattern[$i] */\n";
160 print NEW " $v -= mep_tpoff_base(rel->r_offset);\n";
163 print NEW " $v -= mep_sdaoff_base(rel->r_offset);\n";
168 print NEW " if (u > $max) r = bfd_reloc_overflow;\n";
172 print NEW " if ($min > s || s > $max) r = bfd_reloc_overflow;\n";
183 print NEW " byte[$bb$e] = ";
184 print NEW "(byte[$bb$e] & 0x$rmask) | " if $rmask ne "00";
186 print NEW "(($v << $left) & 0x$mask)";
188 print NEW "(($v >> $right) & 0x$mask)";
190 print NEW "($v & 0x$mask)";
192 print NEW ";\n";
195 print NEW " break;\n";
205 open(NEW, "> $file.new") || die("$file.new create: $!");
217 print NEW while <OLD>;
223 print NEW;
229 print NEW $prefix;
235 printf (NEW "$pattern", $relocs[$i]) || die("$file.new write: $!");
239 print NEW $suffix;
243 print NEW;
247 close(NEW) || die("$file.new close: $!");
259 open(NEW, "$f.new");
261 $n = <NEW>;
264 close(NEW);
267 rename "$f.new", "$f";
272 close(NEW);
274 unlink "$f.new";
