[project @ 2001-08-17 11:20:00 by rrt]
[ghc-hetmet.git] / mk / target.mk
1 #################################################################################
2 #
3 #                       target.mk
4 #
5 #               Standard targets for fptools
6 #
7 #################################################################################
8
9 #
10 # This file contain three groups of target rules:
11 #
12 # 1.  FPtools targets
13 #       depend*
14 #       runtests*
15 #
16 # 2.  GNU standard targets
17 #       all*
18 #       install* uninstall installcheck installdirs
19 #       clean* distclean* mostlyclean* maintainer-clean*
20 #       tags*
21 #       dvi ps (no info) FPTOOLS adds: pdf rtf html
22 #       check
23 #
24 # 3. Some of the above targets have a version that
25 #    recursively invokes that target in sub-directories.
26 #    This relies on the importing Makefile setting SUBDIRS
27 #
28 #    The recursive targets are marked with a * above
29 #
30
31
32
33 #
34
35
36 ##################################################################
37 #
38 #               Recursive stuff
39 #
40 # At the top of the file so that recursive makes happen before
41 # makes in the main directory. This is needed for some targets,
42 # e.g. when building DLLs in hslibs.
43 #
44 ##################################################################
45
46 # Here are the diabolically clever rules that
47
48 # (a) for each "recursive target" <t>
49 #     propagates "make <t>" to directories in SUBDIRS
50 #
51 # (b) when SUBDIRS is empty,
52 #     for each "multi-way-target" <t>
53 #     calls "make way=w <t>" for each w in $(WAYS)
54 #
55 #     This has the effect of making the standard target
56 #     in each of the specified ways (as well as in the normal way
57
58 # Controlling variables
59 #       WAYS    = extra (beyond the normal way) ways to build things in
60 #       SUBDIRS = subdirectories to recurse into
61
62 # No ways, so iterate over the SUBDIRS
63
64 # note about recursively invoking make: we'd like make to drop all the
65 # way back to the top level if it fails in any of the
66 # sub(sub-...)directories.  This is done by setting the -e flag to the
67 # shell during the loop, which causes an immediate failure if any of
68 # the shell commands fail.
69
70 # One exception: if the user gave the -i or -k flag to make in the
71 # first place, we'd like to reverse this behaviour.  So we check for
72 # these flags, and set the -e flag appropriately.  NOTE: watch out for
73 # the --no-print-directory flag which is passed to recursive
74 # invocations of make.
75 #
76 # NOTE: Truly weird use of exit below to stop the for loop dead in
77 # its tracks should any of the sub-makes fail. By my reckoning, 
78 #  "cmd || exit $?" should be equivalent to "cmd"
79
80 ifneq "$(SUBDIRS)" ""
81
82 # we override the boot & all targets in the top level Makefile
83 ifneq "$(NO_ALL_TARGETS)" "YES"
84 ALL_TARGET     = all
85 BOOT_TARGET    = boot
86 INSTALL_TARGET = install
87 endif
88
89 $(ALL_TARGET) docs runtests $(BOOT_TARGET) TAGS clean distclean mostlyclean maintainer-clean $(INSTALL_TARGET) html ps dvi txt::
90         @echo "------------------------------------------------------------------------"
91         @echo "===fptools== Recursively making \`$@' in $(SUBDIRS) ..."
92         @echo "PWD = $(shell pwd)"
93         @echo "------------------------------------------------------------------------"
94 # Don't rely on -e working, instead we check exit return codes from sub-makes.
95         @case '${MFLAGS}' in *-[ik]*) x_on_err=0;; *-r*[ik]*) x_on_err=0;; *) x_on_err=1;; esac; \
96         for i in $(SUBDIRS); do \
97           echo "------------------------------------------------------------------------"; \
98           echo "==fptools== $(MAKE) $@ $(MFLAGS);"; \
99           echo " in $(shell pwd)/$$i"; \
100           echo "------------------------------------------------------------------------"; \
101           $(MAKE) --no-print-directory -C $$i $(MFLAGS) $@; \
102           if [ $$? -eq 0 -o $$x_on_err -eq 0 ] ;  then true; else exit 1; fi; \
103         done
104         @echo "------------------------------------------------------------------------"
105         @echo "===fptools== Finished making \`$@' in $(SUBDIRS) ..."
106         @echo "PWD = $(shell pwd)"
107         @echo "------------------------------------------------------------------------"
108
109 endif
110
111 #
112 # Selectively building subdirectories.
113 #
114 #
115 ifneq "$(SUBDIRS)" ""
116 $(SUBDIRS) ::
117           $(MAKE) -C $@ $(MFLAGS)
118 endif
119
120 ##################################################################
121 #               FPtools standard targets
122 #
123 # depend:
124 #
125 #  The depend target has to cope with a set of files that may have
126 #  different ways of computing their dependencies, i.e., a Haskell
127 #  module's dependencies are computed differently from C files.
128 #
129 # Note that we don't compute dependencies automatically, i.e., have the
130 # .depend file be a target that is dependent on the Haskell+C sources,
131 # and then have the `depend' target depend on `.depend'. The reason for
132 # this is that when GNU make is processing the `include .depend' statement
133 # it records .depend as being a Makefile. Before doing any other processing,
134 # `make' will try to check to see if the Makefiles are up-to-date. And,
135 # surprisingly enough, .depend has a rule for it, so if any of the source
136 # files change, it will be invoked, *regardless* of what target you're making.
137 #
138 # So, for now, the dependencies has to be re-computed manually via `make depend'
139 # whenever a module changes its set of imports. Doing what was outlined above
140 # is only a small optimisation anyway, it would avoid the recomputation of
141 # dependencies if the .depend file was newer than any of the source modules.
142 #
143 .PHONY: depend
144
145 # Compiler produced files that are targets of the source's imports.
146 MKDEPENDHS_OBJ_SUFFICES=o
147
148 depend :: $(MKDEPENDHS_SRCS) $(MKDEPENDC_SRCS)
149         @$(RM) .depend
150         @touch .depend
151 ifneq "$(DOC_SRCS)" ""
152         $(MKDEPENDLIT) -o .depend $(MKDEPENDLIT_OPTS) $(filter %.lit,$(DOC_SRCS))
153 endif
154 ifneq "$(MKDEPENDC_SRCS)" ""
155         $(MKDEPENDC) -f .depend $(MKDEPENDC_OPTS) $(foreach way,$(WAYS),-s $(way)) -- $(CC_OPTS) -- $(MKDEPENDC_SRCS) 
156 endif
157 ifneq "$(MKDEPENDHS_SRCS)" ""
158         $(MKDEPENDHS) -M -optdep-f -optdep.depend $(foreach way,$(WAYS),-optdep-s -optdep$(way)) $(foreach obj,$(MKDEPENDHS_OBJ_SUFFICES),-osuf $(obj)) $(MKDEPENDHS_OPTS) $(filter-out -split-objs, $(HC_OPTS)) $(MKDEPENDHS_SRCS)
159 endif
160
161
162 ##################################################################
163 #                       boot
164 #
165 #  The boot target, at a minimum generates dependency information
166
167 .PHONY: boot
168 boot :: depend
169
170
171 ##################################################################
172 #               GNU Standard targets
173 #
174 #       Every Makefile should define the following targets
175
176 # `all'
177 #      Compile the entire program. This should be the default target.
178 #      This target need not rebuild any documentation files
179
180 # `install'
181 #      Compile the program and copy the executables, libraries, and so on
182 #      to the file names where they should reside for actual use. If
183 #      there is a simple test to verify that a program is properly
184 #      installed, this target should run that test.
185
186 #      The commands should create all the directories in which files are
187 #      to be installed, if they don't already exist. This includes the
188 #      directories specified as the values of the variables prefix and
189 #      exec_prefix , as well as all subdirectories that are needed. One
190 #      way to do this is by means of an installdirs target as described
191 #      below.
192
193 #      Use `-' before any command for installing a man page, so that make
194 #      will ignore any errors.  This is in case there are systems that
195 #      don't have the Unix man page documentation system installed.
196
197 # `uninstall'
198 #      Delete all the installed files that the `install' target would
199 #      create (but not the noninstalled files such as `make all' would
200 #      create).
201
202 # `clean'
203
204 #      Delete all files from the current directory that are normally
205 #      created by building the program.  Don't delete the files that
206 #      record the configuration. Also preserve files that could be made
207 #      by building, but normally aren't because the distribution comes
208 #      with them.
209
210 #      Delete `.dvi' files here if they are not part of the
211 #      distribution.
212
213 # `distclean'
214 #      Delete all files from the current directory that are created by
215 #      configuring or building the program. If you have unpacked the
216 #      source and built the program without creating any other files,
217 #      `make distclean' should leave only the files that were in the
218 #      distribution.
219
220 # `mostlyclean'
221 #      Like `clean', but may refrain from deleting a few files that
222 #      people normally don't want to recompile. For example, the
223 #      `mostlyclean' target for GCC does not delete `libgcc.a', because
224 #      recompiling it is rarely necessary and takes a lot of time.
225
226 # `maintainer-clean'
227 #      Delete everything from the current directory that can be
228 #      reconstructed with this Makefile.  This typically includes
229 #      everything deleted by distclean , plus more: C source files
230 #      produced by Bison, tags tables, and so on.
231
232 #      One exception, however: `make maintainer-clean' should not delete
233 #      `configure' even if `configure' can be remade using a rule in the
234 #      Makefile. More generally, `make maintainer-clean' should not delete
235 #      anything that needs to exist in order to run `configure' and then
236 #      begin to build the program.
237
238 # `TAGS'
239 #      Update a tags table for this program.
240
241 # `dvi' `ps' `pdf' `html' `pdf'
242 #      Generate DVI/PS/PDF files for LaTeX/DocBook docs. Not everything is
243 #      supported everywhere, but the intention is to standardise on DocBook
244 #      producing all formats.
245 #
246 # `check'
247 #      Perform self-tests (if any). The user must build the program
248 #      before running the tests, but need not install the program; you
249 #      should write the self-tests so that they work when the program is
250 #      built but not installed.
251
252 # The following targets are suggested as conventional names, for programs
253 # in which they are useful.
254
255 # installcheck
256 #      Perform installation tests (if any). The user must build and
257 #      install the program before running the tests. You should not
258 #      assume that `$(bindir)' is in the search path.
259
260 # installdirs
261 #      It's useful to add a target named `installdirs' to create the
262 #      directories where files are installed, and their parent
263 #      directories. There is a script called `mkinstalldirs' which is
264 #      convenient for this; find it in the Texinfo package.
265 #      (FPTOOLS: we use a close relative of the suggested script, situated
266 #       in glafp-utils/mkdirhier -- SOF)
267
268
269
270
271 ###########################################
272 #
273 #       Targets: "all"
274 #
275 ###########################################
276
277 # For each of these variables that is defined
278 # we generate one "all" rule and one rule for the variable itself:
279 #
280 #       HS_PROG         Haskell program
281 #       C_PROG          C program
282 #       LIBRARY         Library
283 #       SCRIPT_PROG     Script (e.g. Perl script)
284 #
285 # For details of exactly what rule is generated, see the
286 # relevant section below
287
288 .PHONY: all
289
290 #----------------------------------------
291 #       Haskell programs
292
293 ifneq "$(HS_PROG)" ""
294 all :: $(HS_PROG)
295
296 ifneq "$(BootingFromHc)" "YES"
297 $(HS_PROG) :: $(HS_OBJS)
298         $(HC) -o $@ $(HC_OPTS) $(LD_OPTS) $(HS_OBJS)
299 else
300 # see bootstrp.mk
301 $(HS_PROG) :: $(HS_OBJS)
302         $(CC) -o $@ $(HC_BOOT_CC_OPTS) $(HC_BOOT_LD_OPTS) $(HS_OBJS) $(HC_BOOT_LIBS)
303 endif
304
305 # for building a Haskell program, we add FptoolsHcOpts
306 SRC_HC_OPTS += $(FptoolsHcOpts)
307 endif
308
309 #----------------------------------------
310 #       C programs
311
312 ifneq "$(C_PROG)" ""
313 all :: $(C_PROG)
314
315 $(C_PROG) :: $(C_OBJS)
316         $(CC) -o $@ $(CC_OPTS) $(LD_OPTS) $(C_OBJS) $(LIBS)
317 endif
318
319
320 #----------------------------------------
321 #       Building HsLibs libraries.
322 #
323 # Inputs:
324 #   $(PACKAGE) is the name of the library to build
325 #   $(IS_CBITS_LIB) should be "YES" for a "cbits" library
326 #
327 # Outputs:
328 #   $(LIBRARY)          the name of the library.a
329 #   $(GHIC_LIBRARY)     the name of the library.o (for GHCi)
330 #   $(LIBOBJS)          objects to put in library
331 #   $(STUBOBJS)         more objects to put in library
332
333 # $(LIBOBJS) is set to $(HS_OBJS) or $(C_OBJS) depending
334 # on whether or not it's a "cbits" library.  But you can
335 # override this by setting $(LIBOBJS) yourself
336
337 ifneq "$(PACKAGE)" ""
338
339 # add syslib dependencies and current package name
340 SRC_HC_OPTS += -package-name $(PACKAGE)
341 SRC_HC_OPTS += $(patsubst %, -package %, $(PACKAGE_DEPS))
342
343 ifeq "$(IS_CBITS_LIB)" "YES"
344 _cbits := _cbits
345 STUBOBJS += $(HSC_C_OBJS)
346 # Add _hsc.c files to the cbits library
347 C_SRCS += $(wildcard ../*_hsc.c)
348 # Make .hsc.h include files from the directory above visible
349 # (and the cbits/ library too).
350 SRC_CC_OPTS += -I.. -I.
351 endif
352
353 ifneq "$(way)" "i"
354 LIBRARY      = libHS$(PACKAGE)$(_cbits)$(_way).a
355 GHCI_LIBRARY = HS$(PACKAGE)$(_cbits)$(_way).o
356 else
357 LIBRARY      = $(PACKAGE).dll
358 endif
359
360 ifneq "$(IS_CBITS_LIB)" "YES"
361 WAYS=$(GhcLibWays)
362 endif
363
364 ifeq "$(LIBOBJS)" ""
365   ifeq "$(IS_CBITS_LIB)" "YES"
366   LIBOBJS = $(C_OBJS)
367   else
368   LIBOBJS = $(HS_OBJS)
369   endif
370 endif
371
372 ifeq "$(IS_CBITS_LIB)" "YES"
373 override datadir:=$(libdir)/include
374 INSTALL_DATAS += Hs$(shell perl -e 'print ucfirst "$(PACKAGE)"').h
375 else
376 SRC_CC_OPTS += -Icbits
377 endif
378
379 endif # PACKAGE
380
381 #----------------------------------------
382 #       Libraries/archives
383 #
384 # Build $(LIBRARY) from $(LIBOBJS)+$(STUBOBJS)
385 #
386 # Inputs:
387 #   $(LIBOBJS)
388 #   $(STUBOBJS)
389 #
390 # Outputs:
391 #   Rule to build $(LIBRARY)
392
393 ifneq "$(LIBRARY)" ""
394 all :: $(LIBRARY)
395
396 ifneq "$(way)" "i"
397 define BUILD_LIB
398 $(RM) $@
399 $(AR) $(AR_OPTS) $@ $(STUBOBJS) $(LIBOBJS)
400 $(RANLIB) $@
401 endef
402 else
403 define BUILD_LIB
404 $(RM) $@
405 al -out:$@ $(STUBOBJS) $(LIBOBJS)
406 endef
407 endif
408
409 #
410 # For Haskell object files, we might have chosen to split
411 # up the object files. Test for whether the library being
412 # built is consisting of Haskell files by (hackily) checking
413 # whether HS_SRCS is empty or not.
414 #
415
416 ifneq "$(HS_SRCS)" ""
417 ifeq "$(SplitObjs)" "YES"
418
419 # can't split objs in way 'u', so we disable it here
420 ifneq "$(way)" "u"
421
422 SRC_HC_OPTS += -split-objs
423
424 ifeq "$(ArSupportsInput)" ""
425 define BUILD_LIB
426 $(RM) $@
427 (echo $(STUBOBJS); $(FIND) $(patsubst %.$(way_)o,%,$(LIBOBJS)) -name '*.$(way_)o') | xargs ar q $@
428 $(RANLIB) $@
429 endef
430 else
431 define BUILD_LIB
432 $(RM) $@
433 echo $(STUBOBJS) > $@.list
434 $(FIND) $(patsubst %.$(way_)o,%,$(LIBOBJS)) -name '*.$(way_)o' >> $@.list
435 $(AR) $(AR_OPTS) $@ $(ArSupportsInput) $@.list
436 $(RM) $@.list
437 $(RANLIB) $@
438 endef
439 endif
440
441 # Extra stuff for compiling Haskell files with $(SplitObjs):
442
443 HC_SPLIT_PRE = \
444     $(RM) $@; if [ ! -d $(basename $@) ]; then mkdir $(basename $@); else \
445     $(FIND) $(basename $@) -name '*.$(way_)o' | xargs $(RM) __rm_food; fi
446 ifeq "$(GhcWithInterpreter)" "YES"
447 HC_SPLIT_POST = ld -r -x -o $@ $(basename $@)/*.$(way_)o
448 else
449 HC_SPLIT_POST = touch $@
450 endif # GhcWithInterpreter == YES
451
452 SRC_HC_PRE_OPTS  += $(HC_SPLIT_PRE);
453 SRC_HC_POST_OPTS += $(HC_SPLIT_POST);
454
455 #
456 # If (Haskell) object files are split, cleaning up 
457 # consist of descending into the directories where
458 # the myriads of object files have been put.
459 #
460
461 extraclean ::
462         $(FIND) $(patsubst %.$(way_)o,%,$(HS_OBJS)) -name '*.$(way_)o' -print | xargs $(RM) __rm_food
463         -rmdir $(patsubst %.$(way_)o,%,$(HS_OBJS)) > /dev/null 2>&1
464
465 endif # $(way) == u
466 endif # $(SplitObjs)
467 endif # $(HS_SRCS)
468
469 #
470 # Remove local symbols from library objects if requested.
471 #
472
473 ifeq "$(StripLibraries)" "YES"
474 ifeq "$(SplitObjs)" "YES"
475 SRC_HC_POST_OPTS += \
476   for i in $(basename $@)/*; do \
477         ld -r -x -o $$i.tmp $$i; \
478         $(MV) $$i.tmp $$i; \
479   done
480 else
481 SRC_HC_POST_OPTS += \
482   ld -r -x -o $@.tmp $@; $(MV) $@.tmp $@
483 endif # SplitObjs
484 endif # StripLibraries
485
486 $(LIBRARY) :: $(STUBOBJS) $(LIBOBJS)
487         $(BUILD_LIB)
488 endif # LIBRARY = ""
489
490 #--------------------------------------------------------------
491 #       Build dynamically-linkable libraries for GHCi
492 #
493 # Build $(GHCI_LIBRARY) from $(LIBOBJS)+$(STUBOBJS)
494 #
495 # Why?  GHCi can only link .o files (at the moment), not .a files
496 # so we have to build libFoo.o as well as libFoo.a
497 #
498 # Furthermore, GHCi currently never loads 
499 # profiling libraries (or other non-std ways)
500 #
501 # Inputs:
502 #   $(GHCI_LIBRARY)
503 #
504 # Outputs:
505 #   Rule to build $(GHCI_LIBRARY)
506
507
508 ifneq "$(GHCI_LIBRARY)" ""
509 ifeq "$(way)" ""
510 ifeq "$(GhcWithInterpreter)" "YES"
511
512
513 INSTALL_LIBS += $(GHCI_LIBRARY)
514 CLEAN_FILES += $(GHCI_LIBRARY)
515
516 all :: $(GHCI_LIBRARY)
517
518 ifneq "$(GHCI_LIBRARY)" "HSstd.o"
519 # An annoying gotcha is that the Prelude is a bit special,
520 # for reasons described in ghc/lib/std/Makefile.
521 # So we only put in this standard rule for packages other than std
522 # The rule for the Prelude is in ghc/lib/std/Makefile
523 # We check for GHCI_LIBRARY being HSstd.o rather than
524 # PACKAGE being std, because we want to still use the boilerplate rule 
525 # for cbits.
526 $(GHCI_LIBRARY) :: $(LIBOBJS)
527         ld -r -x -o $@ $(LIBOBJS) $(STUBOBJS)
528 endif
529
530 endif # GhcWithInterpreter
531 endif # way
532 endif # GHCI_LIBRARY
533
534
535 #----------------------------------------
536 #       Building Win32 DLLs
537 #
538
539 ifeq "$(DLLized)" "YES"
540 SRC_CC_OPTS += -DDLLized
541
542 ifneq "$(PACKAGE)" ""
543
544 SRC_BLD_DLL_OPTS += --export-all --output-def=HS$(PACKAGE)$(_cbits)$(_way).def DllVersionInfo.$(way_)o
545
546 ifneq "$(PACKAGE) $(IS_CBITS_LIB)" "std YES"
547 ifneq "$(PACKAGE)" "rts"
548 SRC_BLD_DLL_OPTS += -lHSstd_cbits_imp -L$(GHC_LIB_DIR)/std/cbits
549 SRC_BLD_DLL_OPTS += -lHSrts_$(way_)imp -L$(GHC_RUNTIME_DIR)
550 ifneq "$(PACKAGE)" "std"
551   ifeq "$(IS_CBITS_LIB)" ""
552   SRC_BLD_DLL_OPTS += -lHSstd_$(way_)imp -L$(GHC_LIB_DIR)/std 
553   endif
554 endif
555 endif
556 endif
557
558 SRC_BLD_DLL_OPTS += -lgmp -L. -L$(GHC_RUNTIME_DIR)/gmp
559 ifeq "$(IS_CBITS_LIB)" ""
560 SRC_BLD_DLL_OPTS += $(patsubst %,-lHS%_$(way_)imp, $(PACKAGE_DEPS))
561 SRC_BLD_DLL_OPTS += $(patsubst %,-L../%, $(PACKAGE_DEPS))
562 endif
563 ifneq "$(HAS_CBITS)" ""
564 SRC_BLD_DLL_OPTS += -lHS$(PACKAGE)_cbits_imp -Lcbits
565 endif
566 SRC_BLD_DLL_OPTS += -lwsock32 -lwinmm
567
568 endif # PACKAGE != ""
569
570 SplitObjs = NO 
571
572 ifneq "$(LIBRARY)" ""
573
574 all :: DllVersionInfo.$(way_)o
575
576 ifeq "$(DLL_NAME)" ""
577 DLL_NAME = $(patsubst %.a,%.dll,$(subst lib,,$(LIBRARY)))
578 endif
579
580 ifneq "$(DLL_NAME)" ""
581 DLL_NAME := $(DLL_PEN)/$(DLL_NAME)
582 endif
583
584 all :: $(DLL_NAME)
585
586 ifeq "$(DLL_IMPLIB_NAME)" ""
587 DLL_IMPLIB_NAME = $(patsubst %.a,%_imp.a,$(LIBRARY))
588 endif
589
590 $(DLL_NAME) :: $(LIBRARY)
591         $(BLD_DLL) --output-lib $(DLL_IMPLIB_NAME) -o $(DLL_NAME) $(LIBRARY) $(BLD_DLL_OPTS)
592 endif # LIBRARY != ""
593
594 endif # DLLized
595
596 #
597 # Version information is baked into a DLL by having the DLL include DllVersionInfo.o.
598 # The version info contains two user tweakables: DLL_VERSION and DLL_VERSION_NAME.
599 # (both are given sensible defaults though.)
600 #
601 # Note: this will not work as expected with Cygwin B20.1; you need a more recent
602 #       version of binutils (to pick up windres bugfixes.)
603
604 ifndef DLL_VERSION
605 DLL_VERSION=$(ProjectVersion)
606 endif
607
608 ifndef DLL_VERSION_NAME
609 DLL_VERSION_NAME="http://www.haskell.org/ghc"
610 endif
611
612 ifndef DLL_DESCRIPTION
613 DLL_DESCRIPTION="A GHC-compiled DLL"
614 endif
615
616 ifndef EXE_VERSION
617 EXE_VERSION=$(ProjectVersion)
618 endif
619
620 ifndef EXE_VERSION_NAME
621 EXE_VERSION_NAME="http://www.haskell.org/ghc"
622 endif
623
624 ifndef EXE_DESCRIPTION
625 EXE_DESCRIPTION="A GHC-compiled binary"
626 endif
627
628 #
629 # Little bit of lo-fi mangling to get at the right set of settings depending
630 # on whether we're generating the VERSIONINFO for a DLL or EXE
631
632 DLL_OR_EXE=$(subst VersionInfo.$(way_)rc,,$@)
633 VERSION_FT=$(subst Dll, 0x2L, $(subst Exe, 0x1L, $(DLL_OR_EXE)))
634 VERSION_RES_NAME=$(subst Exe,$(EXE_VERSION_NAME), $(subst Dll, $(DLL_VERSION_NAME),$(DLL_OR_EXE)))
635 VERSION_RES=$(subst Exe,$(EXE_VERSION), $(subst Dll, $(DLL_VERSION),$(DLL_OR_EXE)))
636 VERSION_DESC=$(subst Exe,$(EXE_DESCRIPTION), $(subst Dll, $(DLL_DESCRIPTION),$(DLL_OR_EXE)))
637
638 DllVersionInfo.$(way_)rc ExeVersionInfo.$(way_)rc:
639         $(RM) DllVersionInfo.$(way_)rc
640         echo "1 VERSIONINFO"                > $@
641         echo "FILEVERSION 1,0,0,1"         >> $@
642         echo "PRODUCTVERSION 1,0,0,1"      >> $@
643         echo "FILEFLAGSMASK 0x3fL"         >> $@
644         echo "FILEOS 0x4L"                 >> $@
645         echo "FILETYPE $(VERSION_FT)"      >> $@
646         echo "FILESUBTYPE 0x0L"            >> $@
647         echo "BEGIN"                       >> $@
648         echo " BLOCK \"StringFileInfo\""   >> $@
649         echo " BEGIN"                      >> $@
650         echo "  BLOCK \"040904B0\""        >> $@
651         echo "  BEGIN"                     >> $@
652         echo "   VALUE \"CompanyName\", \"$(VERSION_RES_NAME)\\0\"" >> $@
653         echo "   VALUE \"FileVersion\", \"$(VERSION_RES)\\0\"" >> $@
654         echo "   VALUE \"ProductVersion\", \"$(VERSION_RES)\\0\"" >> $@
655         echo "   VALUE \"FileDescription\", \"$(VERSION_DESC)\\0\"" >> $@
656         echo "  END" >> $@
657         echo " END" >> $@
658         echo " BLOCK \"VarFileInfo\""  >> $@
659         echo " BEGIN" >> $@
660         echo "  VALUE \"Translation\", 0x0409, 1200" >> $@
661         echo " END" >> $@
662         echo "END" >> $@
663
664 #----------------------------------------
665 #       Script programs
666
667 ifneq "$(SCRIPT_PROG)" ""
668
669 # To produce a fully functional script, you may
670 # have to add some configuration variables at the top of 
671 # the script, i.e., the compiler driver needs to know
672 # the path to various utils in the build tree for instance.
673 #
674 # To have the build rule for the script automatically do this
675 # for you, set the variable SCRIPT_SUBST_VARS to the list of
676 # variables you need to put in.
677
678 #
679 # SCRIPT_SUBST creates a string of echo commands that
680 # will when evaluated append the (perl)variable name and its value 
681 # to the target it is used for, i.e.,
682 #
683 #    A=foo
684 #    B=bar
685 #    SCRIPT_SUBST_VARS = A B
686 #    SCRIPT_SUBST=echo "$""A=\"foo\";" >> $@; echo "$""B=\"bar\";" >> $@
687 #
688 #    so if you have a rule like the following
689 #    
690 #     foo:
691 #         @(RM) $@
692 #         @(TOUCH) $@
693 #         @eval $(SCRIPT_SUBST)
694 #
695 #    `make foo' would create a file `foo' containing the following
696 #
697 #    % cat foo
698 #    $A=foo;
699 #    $B=bar;
700 #    %
701 #
702 # ToDo: make this work for shell scripts (drop the initial $).
703 #
704 ifeq "$(INTERP)" "$(SHELL)"
705 SCRIPT_SUBST=$(foreach val,$(SCRIPT_SUBST_VARS),"echo \"$(val)=\\\"$($(val))\\\";\" >> $@;")
706 else
707 SCRIPT_SUBST=$(foreach val,$(SCRIPT_SUBST_VARS),"echo \"$$\"\"$(val)=\\\"$($(val))\\\";\" >> $@;")
708 endif
709
710 all :: $(SCRIPT_PROG)
711
712 $(SCRIPT_PROG) : $(SCRIPT_OBJS)
713         $(RM) $@
714         @echo Creating $@...
715 ifeq "$(INTERP)" "perl"
716         echo "#! "$(PERL) > $@
717 else
718 ifneq "$(INTERP)" ""
719         @echo "#!"$(INTERP) > $@
720 else
721         @touch $@
722 endif
723 endif
724 ifneq "$(SCRIPT_PREFIX_FILES)" ""
725         @cat $(SCRIPT_PREFIX_FILES) >> $@
726 endif
727 ifneq "$(SCRIPT_SUBST)" ""
728         @eval $(SCRIPT_SUBST) 
729 endif
730         @cat $(SCRIPT_OBJS) >> $@
731         @chmod a+x $@
732         @echo Done.
733 endif
734
735 # ---------------------------------------------------------------------------
736 # Symbolic links
737
738 # links to programs: we sometimes install a program as
739 # <name>-<version> with a link from <name> to the real program.
740
741 ifneq "$(LINK)" ""
742
743 all :: $(LINK)
744
745 CLEAN_FILES += $(LINK)
746
747 ifeq "$(LINK_TARGET)" ""
748 ifneq "$(SCRIPT_PROG)" ""
749 LINK_TARGET = $(SCRIPT_PROG)
750 else
751 ifneq "$(HS_PROG)" ""
752 LINK_TARGET = $(HS_PROG)
753 else
754 ifneq "$(C_PROG)" ""
755 LINK_TARGET = $(C_PROG)
756 else
757 LINK_TARGET = dunno
758 endif
759 endif
760 endif
761 endif
762
763 #
764 # Don't want to overwrite $(LINK)s that aren't symbolic
765 # links. Testing for symbolic links is problematic to do in
766 # a portable fashion using a /bin/sh test, so we simply rely
767 # on perl.
768 #
769 $(LINK) : $(LINK_TARGET)
770         @if ( $(PERL) -e '$$fn="$(LINK)"; exit ((! -f $$fn || -l $$fn) ? 0 : 1);' ); then \
771            echo "Creating a symbolic link from $(LINK_TARGET) to $(LINK)"; \
772            $(RM) $(LINK); \
773            $(LN_S) $(LINK_TARGET) $(LINK); \
774          else \
775            echo "Creating a symbolic link from $(LINK_TARGET) to $(LINK) failed: \`$(LINK)' already exists"; \
776            echo "Perhaps remove \`$(LINK)' manually?"; \
777            exit 1; \
778          fi;
779
780
781 #
782 # install links to script drivers.
783 #
784 install ::
785         @$(INSTALL_DIR) $(bindir)
786         @if ( $(PERL) -e '$$fn="$(bindir)/$(LINK)"; exit ((! -f $$fn || -l $$fn) ? 0 : 1);' ); then \
787            echo "Creating a symbol link from $(LINK_TARGET) to $(LINK) in $(bindir)"; \
788            $(RM) $(bindir)/$(LINK); \
789            $(LN_S) $(LINK_TARGET) $(bindir)/$(LINK); \
790          else \
791            echo "Creating a symbol link from $(LINK_TARGET) to $(LINK) in $(bindir) failed: \`$(bindir)/$(LINK)' already exists"; \
792            echo "Perhaps remove \`$(bindir)/$(LINK)' manually?"; \
793            exit 1; \
794          fi;
795
796 endif # LINK 
797
798
799 ###########################################
800 #
801 #       Targets: install install-strip uninstall
802 #
803 ###########################################
804
805 # For each of these variables that is defined, you
806 # get one install rule
807 #
808 #       INSTALL_PROGS        executable programs in $(bindir)
809 #       INSTALL_SCRIPTS      executable scripts in $(bindir)
810 #       INSTALL_LIBS         platform-dependent libraries in $(libdir) (ranlib'ed)
811 #       INSTALL_LIB_SCRIPTS  platform-dependent scripts   in $(libdir)
812 #       INSTALL_LIBEXECS     platform-dependent execs in $(libdir)
813 #       INSTALL_DATAS        platform-independent files in $(datadir)
814 #
815 # If the installation directory variable is undefined, the install rule simply
816 # emits a suitable error message.
817 #
818 # Remember, too, that the installation directory variables ($(bindir) and
819 # friends can be overridden from their original settings in mk/config.mk.in
820 # || mk/build.mk
821 #
822 .PHONY: install installdirs install-strip install-dirs uninstall install-docs show-install
823
824 show-install :
825         @echo "bindir = $(bindir)"
826         @echo "libdir = $(libdir)"
827         @echo "libexecdir = $(libexecdir)  # by default, same as libdir"
828         @echo "datadir = $(datadir)  # unused for ghc project"
829
830 #
831 # Sometimes useful to separate out the creation of install directories 
832 # from the installation itself.
833 #
834 install-dirs ::
835         @$(INSTALL_DIR) $(bindir)
836         @$(INSTALL_DIR) $(libdir)
837         @$(INSTALL_DIR) $(libexecdir)
838         @$(INSTALL_DIR) $(datadir)
839
840 # Better do this first...
841 # but we won't for the moment, do it on-demand from
842 # within the various install targets instead.
843 #install:: install-dirs
844
845 # Install libraries automatically
846 ifneq "$(LIBRARY)" ""
847 INSTALL_LIBS  += $(LIBRARY)
848 ifeq "$(DLLized)" "YES"
849 INSTALL_PROGS += $(DLL_NAME)
850 INSTALL_LIBS += $(patsubst %.a,%_imp.a, $(LIBRARY))
851 endif
852 INSTALL_DATAS += $(HS_IFACES)
853 endif
854
855 ifneq "$(INSTALL_PROGS)" ""
856
857 #
858 # Here's an interesting one - when using the win32 version
859 # of install (provided via the cygwin toolkit), we have to
860 # supply the .exe suffix, *if* there's no other suffix.
861 #
862 # The rule below does this by ferreting out the suffix of each
863 # entry in the INSTALL_PROGS list. If there's no suffix, use
864 # $(exeext).
865
866 # This is bit of a pain to express since GNU make doesn't have
867 # something like $(if ...), but possible using $(subst ...)
868 # [Aside: I added support for $(if ...) to my local copy of GNU
869 # make at one stage, perhaps I should propagate the patch to
870 # the GNU make maintainers...] 
871 #
872 INSTALL_PROGS := $(foreach p, $(INSTALL_PROGS), $(addsuffix $(subst _,,$(subst __,$(exeext),_$(suffix $(p))_)), $(basename $(p))))
873
874 install:: $(INSTALL_PROGS)
875         @$(INSTALL_DIR) $(bindir)
876         @for i in $(INSTALL_PROGS); do \
877                     echo $(INSTALL_PROGRAM) $(INSTALL_BIN_OPTS) $$i $(bindir); \
878                     $(INSTALL_PROGRAM) $(INSTALL_BIN_OPTS) $$i $(bindir) ;  \
879         done
880 endif
881
882 #
883 # Just like INSTALL_PROGS, but prefix with install sites bin/lib/data and
884 # install without stripping.
885 #
886 ifneq "$(INSTALL_SCRIPTS)" ""
887 install:: $(INSTALL_SCRIPTS)
888         @$(INSTALL_DIR) $(bindir)
889         for i in $(INSTALL_SCRIPTS); do \
890                 $(INSTALL_SCRIPT) $(INSTALL_OPTS) $$i $(bindir); \
891         done
892 endif
893
894 ifneq "$(INSTALL_LIB_SCRIPTS)" ""
895 install:: $(INSTALL_LIB_SCRIPTS)
896         @$(INSTALL_DIR) $(libdir)
897         for i in $(INSTALL_LIB_SCRIPTS); do \
898                 $(INSTALL_SCRIPT) $(INSTALL_OPTS) $$i $(libdir); \
899         done
900 endif
901
902 ifneq "$(INSTALL_LIBEXEC_SCRIPTS)" ""
903 install:: $(INSTALL_LIBEXEC_SCRIPTS)
904         @$(INSTALL_DIR) $(libexecdir)
905         for i in $(INSTALL_LIBEXEC_SCRIPTS); do \
906                 $(INSTALL_SCRIPT) $(INSTALL_OPTS) $$i $(libexecdir); \
907         done
908 endif
909
910 ifneq "$(INSTALL_LIBS)" ""
911 install:: $(INSTALL_LIBS)
912         @$(INSTALL_DIR) $(libdir)
913         for i in $(INSTALL_LIBS); do \
914                 case $$i in \
915                   *.a) \
916                     $(INSTALL_DATA) $(INSTALL_OPTS) $$i $(libdir); \
917                     $(RANLIB) $(libdir)/`basename $$i` ;; \
918                   *.dll) \
919                     $(INSTALL_DATA) -s $(INSTALL_OPTS) $$i $(libdir) ;; \
920                   *) \
921                     $(INSTALL_DATA) $(INSTALL_OPTS) $$i $(libdir); \
922                 esac; \
923         done
924 endif
925
926 ifneq "$(INSTALL_LIBEXECS)" ""
927 #
928 # See above comment next to defn of INSTALL_PROGS for what
929 # the purpose of this one-liner is.
930
931 INSTALL_LIBEXECS := $(foreach p, $(INSTALL_LIBEXECS), $(addsuffix $(subst _,,$(subst __,$(exeext),_$(suffix $(p))_)), $(basename $(p))))
932
933 install:: $(INSTALL_LIBEXECS)
934         @$(INSTALL_DIR) $(libexecdir)
935         -for i in $(INSTALL_LIBEXECS); do \
936                 $(INSTALL_PROGRAM) $(INSTALL_BIN_OPTS) $$i $(libexecdir); \
937         done
938 endif
939
940 ifneq "$(INSTALL_DATAS)" ""
941 install:: $(INSTALL_DATAS)
942         @$(INSTALL_DIR) $(datadir)
943         for i in $(INSTALL_DATAS); do \
944                 $(INSTALL_DATA) $(INSTALL_OPTS) $$i $(datadir); \
945         done
946 endif
947
948 ifneq "$(INSTALL_INCLUDES)" ""
949 install:: $(INSTALL_INCLUDES)
950         @$(INSTALL_DIR) $(includedir)
951         for i in $(INSTALL_INCLUDES); do \
952                 $(INSTALL_DATA) $(INSTALL_OPTS) $$i $(includedir); \
953         done
954 endif
955
956 #
957 # Use with care..
958 #
959 uninstall:: 
960         @for i in $(INSTALL_PROGS) "" ; do                      \
961           if test "$$i"; then                                   \
962                 echo rm -f $(bindir)/`basename $$i`;            \
963                 rm -f $(bindir)/`basename $$i`;                 \
964           fi;                                                   \
965         done
966         @for i in $(INSTALL_LIBS) ""; do                        \
967           if test "$$i"; then                                   \
968                 echo rm -f $(libdir)/`basename $$i`;            \
969                 rm -f $(libdir)/`basename $$i`;                 \
970           fi;                                                   \
971         done
972         @for i in $(INSTALL_LIBEXECS) ""; do                    \
973           if test "$$i"; then                                   \
974                 echo rm -f $(libexecdir)/`basename $$i`;        \
975                 rm -f $(libexecdir)/`basename $$i`;             \
976           fi;                                                   \
977         done
978         @for i in $(INSTALL_DATAS) ""; do                       \
979           if test "$$i"; then                                   \
980                 echo rm -f $(datadir)/`basename $$i`;           \
981                 rm -f $(datadir)/`basename $$i`;                \
982           fi;                                                   \
983         done
984
985 #
986 # install-strip is from the GNU Makefile standard.
987 #
988 ifneq "$(way)" ""
989 install-strip::
990         @$(MAKE) EXTRA_INSTALL_OPTS='-s' install                                        
991 endif
992
993 ##############################################################################
994 #
995 #       Targets: check tags show
996 #
997 ##############################################################################
998
999 #------------------------------------------------------------
1000 #                       Check
1001
1002 .PHONY: check
1003
1004 check:: $(TESTS)
1005         @for i in $(filter-out %.lhs .hs, $(TESTS)) ''; do      \
1006           if (test -f "$$i"); then              \
1007             echo Running: `basename $$i` ;      \
1008             cd test; `basename $$i` ;           \
1009           fi;                                   \
1010         done;
1011
1012 #------------------------------------------------------------
1013 #                       Tags
1014
1015 .PHONY: TAGS tags
1016
1017 tags TAGS:: $(TAGS_HS_SRCS) $(TAGS_C_SRCS)
1018         @$(RM) TAGS
1019         @touch TAGS
1020 ifneq "$(TAGS_HS_SRCS)" ""
1021         $(HSTAGS) $(HSTAGS_OPTS) -- $(TAGS_HS_SRCS)
1022 endif
1023 ifneq "$(TAGS_C_SRCS)" ""
1024         etags -a $(TAGS_C_SRCS)
1025 endif
1026         @( DEREFFED=`ls -l Makefile | sed -e 's/.*-> \(.*\)/\1/g'` && $(RM) `dirname $$DEREFFED`/TAGS && $(CP) TAGS `dirname $$DEREFFED` ) 2>/dev/null || echo TAGS file generated, perhaps copy over to source tree?
1027
1028 #------------------------------------------------------------
1029 #                       Makefile debugging
1030 # to see the effective value used for a Makefile variable, do
1031 #  make show VALUE=MY_VALUE
1032 #
1033
1034 show:
1035         @echo '$(VALUE)="$($(VALUE))"'
1036
1037 ################################################################################
1038 #
1039 #                       SGML Documentation
1040 #
1041 ################################################################################
1042
1043 .PHONY: dvi ps html pdf rtf
1044
1045 ifneq "$(SGML_DOC)" ""
1046
1047 # multi-file SGML document: main document name is specified in $(SGML_DOC),
1048 # sub-documents (.sgml files) listed in $(SGML_SRCS).
1049
1050 ifeq "$(SGML_SRCS)" ""
1051 SGML_SRCS = $(wildcard *.sgml)
1052 endif
1053
1054 SGML_TEX  = $(addsuffix .tex,$(SGML_DOC))
1055 SGML_DVI  = $(addsuffix .dvi,$(SGML_DOC))
1056 SGML_PS   = $(addsuffix .ps,$(SGML_DOC))
1057 SGML_PDF  = $(addsuffix .pdf,$(SGML_DOC))
1058 SGML_RTF  = $(addsuffix .rtf,$(SGML_DOC))
1059 SGML_HTML = $(addsuffix .html,$(SGML_DOC))
1060 # HTML output goes in a subdirectory on its own.
1061 SGML_TEXT = $(addsuffix .txt,$(SGML_DOC))
1062
1063 $(SGML_DVI) $(SGML_PS) $(SGML_HTML) $(SGML_TEXT) $(SGML_PDF) :: $(SGML_SRCS)
1064
1065 dvi  :: $(SGML_DVI)
1066 ps   :: $(SGML_PS)
1067 pdf  :: $(SGML_PDF)
1068 rtf  :: $(SGML_RTF)
1069 html :: $(SGML_HTML)
1070 txt  :: $(SGML_TEXT)
1071
1072 CLEAN_FILES += $(SGML_TEXT) $(SGML_TEX) $(SGML_PS) $(SGML_DVI) $(SGML_PDF) $(SGML_RTF) $(SGML_HTML) $(SGML_DOC)-*.html
1073 # can't use $(SGML_SRCS) here, it was maybe used elsewhere
1074
1075 extraclean ::
1076         $(RM) -rf DBTOHTML_OUTPUT_*
1077         $(RM) -rf *.junk/
1078         $(RM) -rf $(SGML_DOC)
1079 endif
1080
1081 ##############################################################################
1082 #
1083 #       Targets: clean
1084 #
1085 ##############################################################################
1086
1087 # we have to be careful about recursion here; since all the clean
1088 # targets are recursive, we don't want to make eg. distclean depend on
1089 # clean because that would result in far too many recursive calls.
1090
1091 .PHONY: mostlyclean clean distclean maintainer-clean
1092
1093 mostlyclean::
1094         rm -f $(MOSTLY_CLEAN_FILES)
1095
1096 # extraclean is used for adding actions to the clean target.
1097 extraclean::
1098
1099 clean:: extraclean
1100         rm -f $(MOSTLY_CLEAN_FILES) $(CLEAN_FILES)
1101
1102 distclean:: extraclean
1103         rm -f $(MOSTLY_CLEAN_FILES) $(CLEAN_FILES) $(DIST_CLEAN_FILES)
1104
1105 maintainer-clean:: extraclean
1106         @echo 'This command is intended for maintainers to use; it'
1107         @echo 'deletes files that may need special tools to rebuild.'
1108         rm -f $(MOSTLY_CLEAN_FILES) $(CLEAN_FILES) $(DIST_CLEAN_FILES) $(MAINTAINER_CLEAN_FILES)
1109
1110 ################################################################################
1111 #
1112 #                       Way management
1113 #
1114 ################################################################################
1115
1116 # Here is the ingenious jiggery pokery that allows you to build multiple versions
1117 # of a program in a single build tree.
1118 #
1119 # The ways setup requires the following variables to be set:
1120 #
1121 # Expects:      $(WAYS)                 the possible "way" strings to one of 
1122 #                                       which $(way) will be set
1123
1124
1125 # So how does $(way) ever get set to anything?  Answer, we recursively
1126 # invoke make, setting $(way) on the command line.
1127 # When do we do this recursion?  Answer: whenever the programmer
1128 # asks make to make a target that involves a way suffix.
1129 # We must remember *not* to recurse again; but that's easy: we
1130 # just see if $(way) is set:
1131
1132 ifeq "$(way)" ""
1133
1134 # If $(WAYS) = p mc, then WAY_TARGETS expands to
1135 #       %.p_lhs %.p_hs %.p_o ... %.mc_lhs %.p_hs ...
1136 # and OTHER_WAY_TARGETS to
1137 #       %_p.a %_p %_mc.a %_mc
1138 # where the suffixes are from $(SUFFIXES)
1139 #
1140 # We have to treat libraries and "other" targets differently, 
1141 # because their names are of the form
1142 #       libHS_p.a and Foo_p
1143 # whereas everything else has names of the form
1144 #       Foo.p_o
1145
1146 FPTOOLS_SUFFIXES := o hi hc
1147
1148 WAY_TARGETS     = $(foreach way,$(WAYS),$(foreach suffix, $(FPTOOLS_SUFFIXES), %.$(way)_$(suffix)))
1149 LIB_WAY_TARGETS = $(foreach way,$(WAYS),%_$(way).a %_$(way))
1150
1151 # $@ will be something like Foo.p_o
1152 # $(suffix $@)     returns .p_o
1153 # $(subst .,.p_o)  returns p_o
1154 # $(subst _,.,p_o) returns p.o   (clever)
1155 # $(basename p.o)  returns p
1156
1157 $(WAY_TARGETS) :
1158         $(MAKE) way=$(basename $(subst _,.,$(subst .,,$(suffix $@)))) $@
1159
1160 # $(@F) will be something like libHS_p.a, or Foo_p
1161 # $(basename $(@F)) will be libHS_p, or Foo_p
1162 # The sed script extracts the "p" part.
1163
1164 $(LIB_WAY_TARGETS) :
1165         $(MAKE) $(MFLAGS) $@ way=$(subst .,,$(suffix $(subst _,.,$(basename $@))))
1166
1167 endif   # if way
1168
1169 # -------------------------------------------------------------------------
1170 # Object and interface files have suffixes tagged with their ways
1171
1172 ifneq "$(way)" ""
1173 SRC_HC_OPTS += -hisuf $(way_)hi -hcsuf $(way_)hc -osuf $(way_)o
1174 endif
1175
1176 # -------------------------------------------------------------------------
1177 # Rules to invoke the current target recursively for each way
1178
1179 ifneq "$(WAYS)" ""
1180 ifeq "$(way)" ""
1181
1182 # NB: the targets exclude 
1183 #       boot runtests
1184 # since these are way-independent
1185 all docs TAGS clean distclean mostlyclean maintainer-clean install ::
1186         @echo "------------------------------------------------------------------------"
1187         @echo "===fptools== Recursively making \`$@' for ways: $(WAYS) ..."
1188         @echo "PWD = $(shell pwd)"
1189         @echo "------------------------------------------------------------------------"
1190 # Don't rely on -e working, instead we check exit return codes from sub-makes.
1191         @case '${MFLAGS}' in *-[ik]*) x_on_err=0;; *-r*[ik]*) x_on_err=0;; *) x_on_err=1;; esac; \
1192         for i in $(WAYS) ; do \
1193           echo "------------------------------------------------------------------------"; \
1194           echo "==fptools== $(MAKE) way=$$i $@;"; \
1195           echo "PWD = $(shell pwd)"; \
1196           echo "------------------------------------------------------------------------"; \
1197           $(MAKE) way=$$i --no-print-directory $(MFLAGS) $@ ; \
1198           if [ $$? -eq 0 ] ; then true; else exit $$x_on_err; fi; \
1199         done
1200         @echo "------------------------------------------------------------------------"
1201         @echo "===fptools== Finished recursively making \`$@' for ways: $(WAYS) ..."
1202         @echo "PWD = $(shell pwd)"
1203         @echo "------------------------------------------------------------------------"
1204
1205 endif
1206 endif