sbsv1_os/e32toolp/platform/cl_win.pm
branchRCL_3
changeset 73 22bdd8a90cc4
parent 18 99082257a271
equal deleted inserted replaced
62:7416fe50a180 73:22bdd8a90cc4
    44 			PMEndSrcBld
    44 			PMEndSrcBld
    45 		PMEndSrc
    45 		PMEndSrc
    46 	PMEndSrcList
    46 	PMEndSrcList
    47 );
    47 );
    48 
    48 
    49 use strict;
       
    50 use Winutl;
    49 use Winutl;
    51 use cl_generic;
    50 use cl_generic;
    52 use Pathutl;
    51 use Pathutl;
    53 
    52 
    54 sub PMHelp_Mmp {
    53 sub PMHelp_Mmp {
   418 			"\n",
   417 			"\n",
   419 			"\n",
   418 			"\n",
   420 			"# REAL TARGET - LIBRARY\n",
   419 			"# REAL TARGET - LIBRARY\n",
   421 			"\n",
   420 			"\n",
   422 			"\"\$(EPOCLIB)\\UDEB\\$ExportLibrary.lib\" : \"$DefFile\"\n",
   421 			"\"\$(EPOCLIB)\\UDEB\\$ExportLibrary.lib\" : \"$DefFile\"\n",
   423 			"\tperl -w -S prepdef.pl \"$DefFile\" \"\$(EPOCBLD)\\$ExportLibrary.prep.def\"\n",
   422 			"\tperl -S prepdef.pl \"$DefFile\" \"\$(EPOCBLD)\\$ExportLibrary.prep.def\"\n",
   424 			"\tlib.exe /nologo /machine:i386 /nodefaultlib /name:\"$LibLinkAs\"    /def:\"\$(EPOCBLD)\\$ExportLibrary.prep.def\" /out:\"\$(EPOCLIB)\\UDEB\\$ExportLibrary.lib\"\n",
   423 			"\tlib.exe /nologo /machine:i386 /nodefaultlib /name:\"$LibLinkAs\"    /def:\"\$(EPOCBLD)\\$ExportLibrary.prep.def\" /out:\"\$(EPOCLIB)\\UDEB\\$ExportLibrary.lib\"\n",
   425 			"\tdel \"\$(EPOCLIB)\\UDEB\\$ExportLibrary.exp\"\n"
   424 			"\tdel \"\$(EPOCLIB)\\UDEB\\$ExportLibrary.exp\"\n"
   426 		);
   425 		);
   427 	}
   426 	}
   428 	&main::Output(
   427 	&main::Output(
   431 		"FREEZE :\n"
   430 		"FREEZE :\n"
   432 	);
   431 	);
   433 	if ($DefFile and $BasicTrgType !~ /^IMPLIB$/io) {
   432 	if ($DefFile and $BasicTrgType !~ /^IMPLIB$/io) {
   434 		&main::Output(
   433 		&main::Output(
   435 #			call perl on the script here so nmake will die if there are errors - this doesn't happen if calling perl in a batch file
   434 #			call perl on the script here so nmake will die if there are errors - this doesn't happen if calling perl in a batch file
   436 			"\tperl -w -S efreeze.pl \$(EFREEZE_ALLOW_REMOVE) \"$DefFile\" \"\$(EPOCBLD)\\$ExportLibrary.def\" \n"
   435 			"\tperl -S efreeze.pl \$(EFREEZE_ALLOW_REMOVE) \"$DefFile\" \"\$(EPOCBLD)\\$ExportLibrary.def\" \n"
   437 		);
   436 		);
   438 	}
   437 	}
   439 	&main::Output(
   438 	&main::Output(
   440 		"\n",
   439 		"\n",
   441 		"CLEANLIBRARY :\n"
   440 		"CLEANLIBRARY :\n"
   571 		"WHAT$Bld : WHATGENERIC\n",
   570 		"WHAT$Bld : WHATGENERIC\n",
   572 		"\n",
   571 		"\n",
   573 		"CLEAN$Bld : CLEANBUILD$Bld CLEANRELEASE$Bld\n",
   572 		"CLEAN$Bld : CLEANBUILD$Bld CLEANRELEASE$Bld\n",
   574 		"\n",
   573 		"\n",
   575 		"CLEANBUILD$Bld : CLEANILK$Bld\n",
   574 		"CLEANBUILD$Bld : CLEANILK$Bld\n",
   576 		"\t\@perl -w -S ermdir.pl \"\$(EPOCBLD$Bld)\"\n",
   575 		"\t\@perl -S ermdir.pl \"\$(EPOCBLD$Bld)\"\n",
   577 		"\n",
   576 		"\n",
   578 		"CLEANRELEASE$Bld : CLEANGENERIC CLEANILK$Bld\n",
   577 		"CLEANRELEASE$Bld : CLEANGENERIC CLEANILK$Bld\n",
   579 		"\n",
   578 		"\n",
   580 		"CLEANILK$Bld :\n",
   579 		"CLEANILK$Bld :\n",
   581 		"\t-\$(ERASE) \"$BLDTRGPATH$BaseTrg.ILK\"\n",
   580 		"\t-\$(ERASE) \"$BLDTRGPATH$BaseTrg.ILK\"\n",
   959 		);
   958 		);
   960 
   959 
   961 #		call makedef to reorder the export information
   960 #		call makedef to reorder the export information
   962 		&main::Output(
   961 		&main::Output(
   963 #			call perl on the script here so nmake will die if there are errors - this doesn't happen if calling perl in a batch file
   962 #			call perl on the script here so nmake will die if there are errors - this doesn't happen if calling perl in a batch file
   964 			"\tperl -w -S makedef.pl $AbsentSubst -Inffile \"\$(EPOCBLD$Bld)\\$ExportLibrary.inf\""
   963 			"\tperl -S makedef.pl $AbsentSubst -Inffile \"\$(EPOCBLD$Bld)\\$ExportLibrary.inf\""
   965 		);
   964 		);
   966 		if (SysTrg()) {
   965 		if (SysTrg()) {
   967     			&main::Output( "\t\t-SystemTargetType \\\n" );
   966     			&main::Output( "\t\t-SystemTargetType \\\n" );
   968     		}
   967     		}
   969 		if (-e $DefFile) { # effectively "if project frozen ..."
   968 		if (-e $DefFile) { # effectively "if project frozen ..."
  1116 	my $Bld;
  1115 	my $Bld;
  1117 	foreach $Bld (@BldList) {
  1116 	foreach $Bld (@BldList) {
  1118 		my $file="\$(EPOCTRG$Bld)$TrgDir\\$$AifRef{Trg}";
  1117 		my $file="\$(EPOCTRG$Bld)$TrgDir\\$$AifRef{Trg}";
  1119 		&main::Output(
  1118 		&main::Output(
  1120 			"\"$file\" : \"$$AifRef{GenericTrg}\"\n",
  1119 			"\"$file\" : \"$$AifRef{GenericTrg}\"\n",
  1121 			"\tperl -w -S ecopyfile.pl \$? \$\@\n",
  1120 			"\tperl -S ecopyfile.pl \$? \$\@\n",
  1122 			"\n"
  1121 			"\n"
  1123 		);
  1122 		);
  1124 	}
  1123 	}
  1125 }
  1124 }
  1126 
  1125