Lines Matching full:classname
71 my ($classname) = keys(%classDefs);
72 if (!($classname eq $basename)) {
75 print "$filename only includes one class, renaming to $classname.h\n";
76 system("svn rm --force $classname.h") if (-r "$classname.h");
77 system "svn mv $basename.h $classname.h";
80 while (my ($classname, $classDef) = each(%classDefs)) {
81 if (($classname eq $basename)) {
84 print "Using SVN to copy $basename.{h,cpp} to $classname.{h,cpp}\n";
86 system("svn rm --force $classname.h") if (-r "$classname.h");
87 system "svn cp $basename.h $classname.h";
89 system("svn rm --force $classname.cpp") if (-r "$classname.cpp");
90 system "svn cp $basename.cpp $classname.cpp";
93 print "Fixing $classname.h as much as possible.\n";
94 open(NEWHEADER, ">", "$classname.h") or die "File does not exist: $filename\n";
98 if ($1 eq $classname) {
107 print "Fixing $classname.cpp as much as possible.\n";
108 copy("$classname.cpp", "$classname.cpp.original");
109 open(OLDCPP, "<", "$classname.cpp.original") or die "Failed to copy file for reading: $filename\n";
110 open(NEWCPP, ">", "$classname.cpp") or die "File does not exist: $filename\n";
127 print NEWCPP "#include \"$classname.h\"\n";
138 $shouldPrintMemberFunction = ($classname eq $3);
153 unlink("$classname.cpp.original");
