271d1e4589
Start moving away from files.bkl as the primary source for the files -- and away from bakefile itself as the make/project file generator -- by storing the list of files in a new build/files file and provide a simple build/upmake script for updating files.bkl and the manually maintained MSVC10+ projects from this file contents. git-svn-id: https://svn.wxwidgets.org/svn/wx/wxWidgets/trunk@76610 c3d73ce0-8a6f-49c7-b76d-6d57e0e08775
48 lines
916 B
Perl
48 lines
916 B
Perl
use strict;
|
|
use warnings;
|
|
use autodie;
|
|
use Test::More;
|
|
|
|
BEGIN { use_ok('Text::Upmake::Bakefile0'); }
|
|
|
|
my $vars = {
|
|
VAR1 => [qw(file1 file2 fileNew)],
|
|
VAR2 => [qw(file3 file4 file5 fileNew2)],
|
|
};
|
|
|
|
open my $out, '>', \my $outstr;
|
|
update_bakefile_0(*DATA, $out, $vars);
|
|
|
|
note("Result: $outstr");
|
|
|
|
like($outstr, qr/file1/, 'existing file was preserved');
|
|
like($outstr, qr/fileNew$/m, 'new file was added');
|
|
unlike($outstr, qr/fileOld/, 'old file was removed');
|
|
like($outstr, qr/fileNew2/, 'another new file was added');
|
|
like($outstr, qr/file3\s+file4/s, 'files remain in correct order');
|
|
|
|
done_testing()
|
|
|
|
__DATA__
|
|
<?xml version="1.0" ?>
|
|
<makefile>
|
|
|
|
<!--
|
|
Some comment
|
|
-->
|
|
|
|
<set var="VAR1" hints="files">
|
|
file1
|
|
<!-- comment between the files -->
|
|
file2
|
|
</set>
|
|
|
|
<set var="VAR2" hints="files">
|
|
file3
|
|
file4 <!-- comment after the file -->
|
|
file5
|
|
fileOld
|
|
</set>
|
|
|
|
</makefile>
|