Mercurial > hg > Members > tobaru > CbC_xv6
comparison src/gearsTools/pmake.pl @ 90:dd1d9ea1b7b5
tweak pmake.pl
author | anatofuz <anatofuz@cr.ie.u-ryukyu.ac.jp> |
---|---|
date | Thu, 17 Oct 2019 10:42:54 +0900 |
parents | df104b2de895 |
children | 0956648d24e5 |
comparison
equal
deleted
inserted
replaced
89:df104b2de895 | 90:dd1d9ea1b7b5 |
---|---|
35 | 35 |
36 $cflags =~ s/\n//g; | 36 $cflags =~ s/\n//g; |
37 create_link_script(); | 37 create_link_script(); |
38 my $curdir = getcwd; | 38 my $curdir = getcwd; |
39 my $xv6_src_dir = $FindBin::Bin; | 39 my $xv6_src_dir = $FindBin::Bin; |
40 $xv6_src_dir =~ s|(.*)/gearsTools/(.*)|$1|; | 40 $xv6_src_dir =~ s|(.*)/gearsTools(.*)|$1|; |
41 | 41 |
42 print_exec_system($cmake, | 42 print_exec_system($cmake, |
43 "-DCBC_COM=$cc", | 43 "-DCBC_COM=$cc", |
44 "-DPMAKE_ARGS=\"$cflags\"", | 44 "-DPMAKE_ARGS=\"$cflags\"", |
45 "-DCMAKE_ASM_COMPILER=$cc", | 45 "-DCMAKE_ASM_COMPILER=$cc", |
73 } | 73 } |
74 | 74 |
75 sub print_exec_system { | 75 sub print_exec_system { |
76 my @query = @_; | 76 my @query = @_; |
77 print(join(' ',@query), "\n"); | 77 print(join(' ',@query), "\n"); |
78 #system(join(' ',@query)); | 78 system(join(' ',@query)); |
79 } | 79 } |
80 | 80 |
81 | 81 |
82 | 82 |
83 __DATA__ | 83 __DATA__ |