Refactor gcc.c, pulling out the reusable code
[ghc-hetmet.git] / rules / build-perl.mk
1 # -----------------------------------------------------------------------------
2 #
3 # (c) 2009 The University of Glasgow
4 #
5 # This file is part of the GHC build system.
6 #
7 # To understand how the build system works and how to modify it, see
8 #      http://hackage.haskell.org/trac/ghc/wiki/Building/Architecture
9 #      http://hackage.haskell.org/trac/ghc/wiki/Building/Modifying
10 #
11 # -----------------------------------------------------------------------------
12
13
14 # Build a perl script.  Invoke like this:
15 #
16 # driver/mangler_PERL_SRC = ghc-asm.lprl
17 # driver/mangler_dist_PROG = ghc-asm
18 #
19 # $(eval $(call build-perl,driver/mangler,dist))
20
21 define build-perl
22 # $1 = dir
23 # $2 = distdir
24
25 ifeq "$$($1_$2_TOPDIR)" "YES"
26 $1_$2_INPLACE = $$(INPLACE_TOPDIR)/$$($1_$2_PROG)
27 else
28 $1_$2_INPLACE = $$(INPLACE_BIN)/$$($1_$2_PROG)
29 endif
30
31 $(call all-target,$1_$2,$$($1_$2_INPLACE))
32
33 $(call clean-target,$1,$2,$1/$2 $$($1_$2_INPLACE))
34 .PHONY: clean_$1
35 clean_$1 : clean_$1_$2
36
37 # INPLACE_BIN etc. might be empty if we're cleaning
38 ifeq "$(findstring clean,$(MAKECMDGOALS))" ""
39 ifneq "$$(BINDIST)" "YES"
40 $1/$2/$$($1_$2_PROG).prl: $1/$$($1_PERL_SRC) $$(UNLIT) | $$$$(dir $$$$@)/.
41         "$$(UNLIT)" $$(UNLIT_OPTS) $$< $$@
42
43 $1/$2/$$($1_$2_PROG): $1/$2/$$($1_$2_PROG).prl
44         "$$(RM)" $$(RM_OPTS) $$@
45         echo '#!$$(PERL)'                                  >> $$@
46         echo '$$$$TARGETPLATFORM  = "$$(TARGETPLATFORM)";' >> $$@
47         cat $$<                                            >> $$@
48         $$(EXECUTABLE_FILE) $$@
49
50 $$($1_$2_INPLACE): $1/$2/$$($1_$2_PROG) | $$$$(dir $$$$@)/.
51         "$$(CP)" $$< $$@
52         $$(EXECUTABLE_FILE) $$@
53 endif
54 endif
55
56 endef