[project @ 1997-03-14 07:52:06 by simonpj]
[ghc-hetmet.git] / ghc / docs / users_guide / how_to_run.lit
1 \section[invoking-GHC]{Invoking GHC: Command-line options}
2 \index{command-line options}
3 \index{options, GHC command-line}
4
5 Command-line arguments are either options or file names.
6
7 Command-line options begin with \tr{-}.  They may {\em not} be
8 grouped: \tr{-vO} is different from \tr{-v -O}.  Options need not
9 precede filenames: e.g., \tr{ghc *.o -o foo}.  All options are
10 processed and then applied to all files; you cannot, for example, invoke
11 \tr{ghc -c -O1 Foo.hs -O2 Bar.hs} to apply different optimisation
12 levels to the files \tr{Foo.hs} and \tr{Bar.hs}.  For conflicting
13 options, e.g., \tr{-c -S}, we reserve the right to do anything we
14 want.  (Usually, the last one applies.)
15
16 Options related to profiling, Glasgow extensions to Haskell (e.g.,
17 unboxed values), Concurrent and Parallel Haskell are described in
18 \sectionref{profiling}, \sectionref{glasgow-exts}, and
19 \sectionref{concurrent-and-parallel}, respectively.
20
21 %************************************************************************
22 %*                                                                      *
23 \subsection[file-suffixes]{Meaningful file suffixes}
24 \index{suffixes, file}
25 \index{file suffixes for GHC}
26 %*                                                                      *
27 %************************************************************************
28
29 File names with ``meaningful'' suffixes (e.g., \tr{.lhs} or \tr{.o})
30 cause the ``right thing'' to happen to those files.
31
32 \begin{description}
33 \item[\tr{.lhs}:]
34 \index{lhs suffix@.lhs suffix}
35 A ``literate Haskell'' module.
36
37 \item[\tr{.hs}:] 
38 A not-so-literate Haskell module.
39
40 \item[\tr{.hi}:]
41 A Haskell interface file, probably compiler-generated.
42
43 \item[\tr{.hc}:]
44 Intermediate C file produced by the Haskell compiler.
45
46 \item[\tr{.c}:]
47 A C~file not produced by the Haskell compiler.
48
49 % \item[\tr{.i}:]
50 % C code after it has be preprocessed by the C compiler (using the
51 % \tr{-E} flag).
52
53 \item[\tr{.s}:]
54 An assembly-language source file, usually
55 produced by the compiler.
56
57 \item[\tr{.o}:]
58 An object file, produced by an assembler.
59 \end{description}
60
61 Files with other suffixes (or without suffixes) are passed straight
62 to the linker.
63
64 %************************************************************************
65 %*                                                                      *
66 \subsection[options-help]{Help and verbosity options}
67 \index{help options (GHC)}
68 \index{verbose option (GHC)}
69 %*                                                                      *
70 %************************************************************************
71
72 A good option to start with is the \tr{-help} (or \tr{-?}) option.
73 \index{-help option}
74 \index{-? option}
75 GHC spews a long message to standard output and then exits.
76
77 The \tr{-v}\index{-v option} option makes GHC {\em verbose}: it
78 reports its version number and shows (on stderr) exactly how it invokes each 
79 phase of the compilation system.  Moreover, it passes
80 the \tr{-v} flag to most phases; each reports
81 its version number (and possibly some other information).
82
83 Please, oh please, use the \tr{-v} option when reporting bugs!
84 Knowing that you ran the right bits in the right order is always the
85 first thing we want to verify.
86
87 If you're just interested in the compiler version number, the
88 \tr{--version}\index{--version option} option prints out a
89 one-line string containing the requested info.
90
91 %************************************************************************
92 %*                                                                      *
93 \subsection[options-order]{Running the right phases in the right order}
94 \index{order of passes in GHC}
95 \index{pass ordering in GHC}
96 %*                                                                      *
97 %************************************************************************
98
99 The basic task of the \tr{ghc} driver is to run each input file
100 through the right phases (parsing, linking, etc.).
101
102 The first phase to run is determined by the input-file suffix, and the
103 last phase is determined by a flag.  If no relevant flag is present,
104 then go all the way through linking.  This table summarises:
105
106 \begin{tabular}{llll}
107 phase of the       & suffix saying & flag saying   & (suffix of) \\
108 compilation system & ``start here''& ``stop after''& output file \\ \hline
109
110 literate pre-processor & .lhs      & -      & - \\
111 C pre-processor (opt.) & -         & -      & - \\
112 Haskell compiler    & .hs    & -C, -S     & .hc, .s \\
113 C compiler (opt.)       & .hc or .c & -S            & .s  \\
114 assembler              & .s        & -c     & .o  \\
115 linker                 & other     & -      & a.out \\
116 \end{tabular}
117 \index{-C option}
118 \index{-S option}
119 \index{-c option}
120
121 Thus, a common invocation would be: \tr{ghc -c Foo.hs}
122
123 Note: What the Haskell compiler proper produces depends on whether a
124 native-code generator is used (producing assembly language) or not
125 (producing C).
126
127 %The suffix information may be overridden with a \tr{-lang <suf>}
128 %\index{-lang <suf> option} option.  This says: process all inputs
129 %files as if they had suffix \pl{<suf>}. [NOT IMPLEMENTED YET]
130
131 The option \tr{-cpp}\index{-cpp option} must be given for the C
132 pre-processor phase to be run, that is, the pre-processor will be run
133 over your Haskell source file before continuing.
134
135 The option \tr{-E}\index{-E option} runs just the C-preprocessor part
136 of the C-compiling phase, sending the result to stdout [I think].  (For
137 debugging, usually.)
138
139 %************************************************************************
140 %*                                                                      *
141 \subsection[options-optimise]{Optimisation (code improvement)}
142 \index{optimisation (GHC)}
143 \index{improvement, code (GHC)}
144 %*                                                                      *
145 %************************************************************************
146
147 The \tr{-O*} options specify convenient ``packages'' of optimisation
148 flags; the \tr{-f*} options described later on specify {\em individual}
149 optimisations to be turned on/off; the \tr{-m*} options specify {\em
150 machine-specific} optimisations to be turned on/off.
151
152 %----------------------------------------------------------------------
153 \subsubsection[optimise-pkgs]{\tr{-O*}: convenient ``packages'' of optimisation flags.}
154 \index{-O options (GHC)}
155
156 There are {\em many} options that affect the quality of code produced by
157 GHC.  Most people only have a general goal, something like ``Compile
158 quickly'' or ``Make my program run like greased lightning.''  The
159 following ``packages'' of optimisations (or lack thereof) should suffice.
160
161 Once you choose a \tr{-O*} ``package,'' stick with it---don't chop and
162 change.  Modules' interfaces {\em will} change with a shift to a new
163 \tr{-O*} option, and you may have to recompile a large chunk of all
164 importing modules before your program can again be run
165 safely\sectionref{recomp}.
166
167 \begin{description}
168 \item[No \tr{-O*}-type option specified:]
169 \index{-O* not specified}
170 This is taken to mean: ``Please compile quickly; I'm not over-bothered
171 about compiled-code quality.''  So, for example: \tr{ghc -c Foo.hs}
172
173 \item[\tr{-O} or \tr{-O1}:]
174 \index{-O option}
175 \index{-O1 option}
176 \index{optimise normally}
177 Means: ``Generate good-quality code without taking too long about it.''
178 Thus, for example: \tr{ghc -c -O Main.lhs}
179
180 \item[\tr{-O2}:]
181 \index{-O2 option}
182 \index{optimise aggressively}
183 Means: ``Apply every non-dangerous optimisation, even if it means
184 significantly longer compile times.''
185
186 The avoided ``dangerous'' optimisations are those that can make
187 runtime or space {\em worse} if you're unlucky.  They are
188 normally turned on or off individually.
189
190 At the moment, \tr{-O2} is {\em unlikely} to produce
191 better code than \tr{-O}.
192
193 % \item[\tr{-O0}:]
194 % \index{-O0 option}
195 % \index{optimise minimally}
196 % [``Oh zero''] Means: ``Turn {\em off} as many optimisations (e.g.,
197 % simplifications) as possible.''  This is the only optimisation level
198 % at which the GCC-register-trickery is turned off.  {\em You can't use
199 % it unless you have a suitably-built Prelude to match.} Intended for
200 % hard-core debugging.
201
202 \item[\tr{-fvia-C}:]
203 \index{-fvia-C option}
204 Compile via C, and don't use the native-code generator.
205 (There are many cases when GHC does this on its own.)  You might
206 pick up a little bit of speed by compiling via C.  If you use
207 \tr{_ccall_}s or \tr{_casm_}s, you probably {\em have to} use
208 \tr{-fvia-C}.
209
210 \item[\tr{-O2-for-C}:]
211 \index{-O2-for-C option}
212 Says to run GCC with \tr{-O2}, which may be worth a few percent in
213 execution speed.  Don't forget \tr{-fvia-C}, lest you use the
214 native-code generator and bypass GCC altogether!
215
216 \item[\tr{-Onot}:]
217 \index{-Onot option}
218 \index{optimising, reset}
219 This option will make GHC ``forget'' any -Oish options it has seen
220 so far.  Sometimes useful; for example: \tr{make all EXTRA_HC_OPTS=-Onot}.
221
222 \item[\tr{-Ofile <file>}:]
223 \index{-Ofile <file> option}
224 \index{optimising, customised}
225 For those who need {\em absolute} control over {\em exactly} what
226 options are used (e.g., compiler writers, sometimes :-), a list of
227 options can be put in a file and then slurped in with \tr{-Ofile}.
228
229 In that file, comments are of the \tr{#}-to-end-of-line variety; blank
230 lines and most whitespace is ignored.
231
232 Please ask if you are baffled and would like an example of \tr{-Ofile}!
233 \end{description}
234
235 At Glasgow, we don't use a \tr{-O*} flag for day-to-day work.  We use
236 \tr{-O} to get respectable speed; e.g., when we want to measure
237 something.  When we want to go for broke, we tend to use
238 \tr{-O -fvia-C -O2-for-C} (and we go for lots of coffee breaks).
239
240 %Here is a table to summarise whether pragmatic interface information
241 %is used or not, whether the native-code generator is used (if
242 %available), and whether we use GCC register tricks (for speed!) on the
243 %generated C code:
244 %
245 %\begin{tabular}{lccl}
246 %\tr{-O*}    & Interface & Native code & `Registerised' C \\
247 %            & pragmas?  & (if avail.) & (if avail.) \\ \hline
248 %%
249 %\pl{<none>} & no        & yes         & yes, only if \tr{-fvia-C} \\
250 %\tr{-O,-O1} & yes       & yes         & yes, only if \tr{-fvia-C} \\
251 %\tr{-O2}    & yes       & no         & yes \\
252 %\tr{-Ofile} & yes      & yes         & yes, only if \tr{-fvia-C} \\
253 %\end{tabular}
254
255 The easiest way to see what \tr{-O} (etc) ``really mean'' is to run
256 with \tr{-v}, then stand back in amazement.
257 Alternatively, just look at the
258 \tr{@HsC_minus<blah>} lists in the \tr{ghc} driver script.
259
260 %----------------------------------------------------------------------
261 \subsubsection{\tr{-f*}: platform-independent flags}
262 \index{-f* options (GHC)}
263 \index{-fno-* options (GHC)}
264
265 Flags can be turned {\em off} individually.  (NB: I hope
266 you have a good reason for doing this....) To turn off the \tr{-ffoo}
267 flag, just use the \tr{-fno-foo} flag.\index{-fno-<opt> anti-option}
268 So, for example, you can say
269 \tr{-O2 -fno-strictness}, which will then drop out any running of the
270 strictness analyser.
271
272 The options you are most likely to want to turn off are:
273 \tr{-fno-strictness}\index{-fno-strictness option} (strictness
274 analyser [because it is sometimes slow]),
275 \tr{-fno-specialise}\index{-fno-specialise option} (automatic
276 specialisation of overloaded functions [because it makes your code
277 bigger]) [US spelling also accepted],
278 and
279 \tr{-fno-foldr-build}\index{-fno-foldr-build option}.
280
281 Should you wish to turn individual flags {\em on}, you are advised to
282 use the \tr{-Ofile} option, described above.  Because the order in
283 which optimisation passes are run is sometimes crucial, it's quite
284 hard to do with command-line options.
285
286 Here are some ``dangerous'' optimisations you {\em might} want to try:
287 \begin{description}
288 %------------------------------------------------------------------
289 \item[\tr{-funfolding-creation-threshold<n>}:]
290 (Default: 30) By raising or lowering this number, you can raise or
291 lower the amount of pragmatic junk that gets spewed into interface
292 files.  (An unfolding has a ``size'' that reflects the cost in terms
293 of ``code bloat'' of expanding that unfolding in another module.  A
294 bigger Core expression would be assigned a bigger cost.)
295
296 \item[\tr{-funfolding-use-threshold<n>}:]
297 (Default: 3) By raising or lowering this number, you can make the
298 compiler more or less keen to expand unfoldings.
299
300 OK, folks, these magic numbers `30' and `3' are mildly arbitrary; they
301 are of the ``seem to be OK'' variety.  The `3' is the more critical
302 one; it's what determines how eager GHC is about expanding unfoldings.
303
304 \item[\tr{-funfolding-override-threshold<n>}:]
305 (Default: 8) [Pretty obscure]
306 When deciding what unfoldings from a module should be made available
307 to the rest of the world (via this module's interface), the compiler
308 normally likes ``small'' expressions.
309
310 For example, if it sees \tr{foo = bar}, it will decide that the very
311 small expression \tr{bar} is a great unfolding for \tr{foo}.  But if
312 \tr{bar} turns out to be \tr{(True,False,True)}, we would probably
313 prefer {\em that} for the unfolding for \tr{foo}.
314
315 Should we ``override'' the initial small unfolding from \tr{foo=bar}
316 with the bigger-but-better one?  Yes, if the bigger one's ``size'' is
317 still under the ``override threshold.''  You can use this flag to
318 adjust this threshold (why, I'm not sure).
319
320 % \item[\tr{-fliberated-case-threshold<n>}:]
321 % (Default: 12) [Vastly obscure: NOT IMPLEMENTED YET]
322 % ``Case liberation'' lifts evaluation out of recursive functions; it
323 % does this by duplicating code.  Done without constraint, you can get
324 % serious code bloat; so we only do it if the ``size'' of the duplicated
325 % code is smaller than some ``threshold.''  This flag can fiddle that
326 % threshold.
327
328 \item[\tr{-fsemi-tagging}:]
329 This option (which {\em does not work} with the native-code generator)
330 tells the compiler to add extra code to test for already-evaluated
331 values.  You win if you have lots of such values during a run of your
332 program, you lose otherwise.  (And you pay in extra code space.)
333
334 We have not played with \tr{-fsemi-tagging} enough to recommend it.
335 (For all we know, it doesn't even work anymore...  Sigh.)
336 \end{description}
337
338 %----------------------------------------------------------------------
339 % \subsubsection[optimise-simplifier]{Controlling ``simplification'' in the Haskell compiler.}
340 %
341 %Almost everyone turns program transformation
342 % (a.k.a. ``simplification'') on/off via one of the ``packages'' above,
343 %but you can exert absolute control if you want to.  Do a \tr{ghc -v -O ...},
344 %and you'll see there are plenty of knobs to turn!
345 %
346 %The Core-to-Core and STG-to-STG passes can be run multiple times, and
347 %in varying orders (though you may live to regret it).  The on-or-off
348 %global flags, however, are simply, well, on or off.
349 %
350 %The best way to give an exact list of options is the \tr{-Ofile}
351 %option, described elsewhere.
352 %
353 % [Check out \tr{ghc/compiler/simplCore/SimplCore.lhs} and
354 %\tr{simplStg/SimplStg.lhs} if you {\em really} want to see every
355 %possible Core-to-Core and STG-to-STG pass, respectively.  The
356 %on-or-off global flags that effect what happens {\em within} one of
357 %these passes are defined by the \tr{GlobalSwitch} datatype in
358 %\tr{compiler/main/CmdLineOpts.lhs}.]
359
360 %----------------------------------------------------------------------
361 \subsubsection{\tr{-m*}: platform-specific flags}
362 \index{-m* options (GHC)}
363 \index{platform-specific options}
364 \index{machine-specific options}
365
366 Some flags only make sense for particular target platforms.
367
368 \begin{description}
369 \item[\tr{-mv8}:]
370 (SPARC machines)\index{-mv8 option (SPARC only)}
371 Means to pass the like-named option to GCC; it says to use the
372 Version 8 SPARC instructions, notably integer multiply and divide.
373 The similiar \tr{-m*} GCC options for SPARC also work, actually.
374
375 \item[\tr{-mlong-calls}:]
376 (HPPA machines)\index{-mlong-calls option (HPPA only)}
377 Means to pass the like-named option to GCC.  Required for Very Big
378 modules, maybe.  (Probably means you're in trouble...)
379
380 \item[\tr{-monly-[32]-regs}:]
381 (iX86 machines)\index{-monly-N-regs option (iX86 only)}
382 GHC tries to ``steal'' four registers from GCC, for performance
383 reasons; it almost always works.  However, when GCC is compiling some
384 modules with four stolen registers, it will crash, probably saying:
385 \begin{verbatim}
386 Foo.hc:533: fixed or forbidden register was spilled.
387 This may be due to a compiler bug or to impossible asm
388 statements or clauses.
389 \end{verbatim}
390 Just give some registers back with \tr{-monly-N-regs}.  Try `3' first,
391 then `2'.  If `2' doesn't work, please report the bug to us.
392 \end{description}
393
394 %----------------------------------------------------------------------
395 \subsubsection[optimise-C-compiler]{Code improvement by the C compiler.}
396 \index{optimisation by GCC}
397 \index{GCC optimisation}
398
399 The C~compiler (GCC) is run with \tr{-O} turned on.  (It has
400 to be, actually).
401
402 If you want to run GCC with \tr{-O2}---which may be worth a few
403 percent in execution speed---you can give a
404 \tr{-O2-for-C}\index{-O2-for-C option} option.
405
406 %If you are brave or foolish, you might want to omit some checking code
407 % (e.g., for stack-overflow checks), as sketched in
408 %\sectionref{omit-checking}.
409
410 %************************************************************************
411 %*                                                                      *
412 \subsection[options-sanity]{Warnings and sanity-checking}
413 \index{sanity-checking options}
414 %*                                                                      *
415 %************************************************************************
416
417 If you would like GHC to check that every top-level value has a type
418 signature, use the \tr{-fsignatures-required}
419 option.\index{-fsignatures-required option}
420
421 If you would like to disallow ``name shadowing,'' i.e., an inner-scope
422 value has the same name as an outer-scope value, then use the
423 \tr{-fwarn-name-shadowing}
424 option.\index{-fwarn-name-shadowing option}
425 This option catches typographical errors that turn into hard-to-find
426 bugs, e.g., in the inadvertent cyclic definition \tr{let x = ... x ... in}.
427
428 Consequently, this option does {\em not} allow cyclic recursive
429 definitions.
430
431 By default, the compiler will warn you if a set of patterns are either
432 incomplete (i.e., you're only matching on a subset of an algebraic
433 data type's constructors), or overlapping, i.e.,
434
435 \begin{verbatim}
436 f :: String -> Int
437 f []     = 0
438 f (_:xs) = 1
439 f "2"    = 2
440 \end{verbatim}
441
442 where the last pattern match won't ever be reached, as the second
443 pattern overlaps it. More often than not, `completeness' of
444 patterns is a programmer mistake/error, but if you don't want
445 the compiler to ``baby-sit'', use \tr{-fno-warn-incomplete-patterns} option
446 to turn them off.\index{-fno-warn-incomplete-patterns option}.
447
448 If you're feeling really paranoid, the \tr{-dcore-lint}
449 option\index{-dcore-lint option} is a good choice.  It turns on
450 heavyweight intra-pass sanity-checking within GHC.  (It checks GHC's
451 sanity, not yours.)
452
453 %************************************************************************
454 %*                                                                      *
455 \subsection[options-output]{Re-directing the compilation output(s)}
456 \index{output-directing options}
457 %*                                                                      *
458 %************************************************************************
459
460 When compiling a Haskell module, GHC may produce several files of
461 output (usually two).
462
463 One file is usually an {\em interface file}.  If compiling
464 \tr{bar/Foo.hs}, the interface file would normally be \tr{bar/Foo.hi}.
465 The interface output may be directed to another file
466 \tr{bar2/Wurble.iface} with the option
467 \tr{-ohi bar2/Wurble.iface}\index{-ohi <file> option} (not recommended).
468
469 To avoid generating an interface file at all, use a \tr{-nohi}
470 option.\index{-nohi option}
471
472 The compiler does not overwrite an existing \tr{.hi} interface file if
473 the new one is byte-for-byte the same as the old one; this is friendly to
474 \tr{make}.  When an interface does change, it is often enlightening to
475 be informed.  The \tr{-hi-diffs}\index{-hi-diffs option} option will
476 make \tr{ghc} run \tr{diff} on the old and new \tr{.hi} files.
477
478 The \tr{.hi} files from GHC 2.xx contain ``usage'' information which
479 changes often and uninterestingly.  If you really want to see these
480 changes reported, you need to use the
481 \tr{-hi-diffs-with-usages}\index{-hi-diffs-with-usages option} option.
482
483 GHC's non-interface output normally goes into a \tr{.hc}, \tr{.o},
484 etc., file, depending on the last-run compilation phase.  The option
485 \tr{-o foo}\index{-o option} re-directs the output of that last-run
486 phase to file \tr{foo}.
487
488 Note: this ``feature'' can be counterintuitive:
489 \tr{ghc -C -o foo.o foo.hs} will put the intermediate C code in the
490 file \tr{foo.o}, name notwithstanding!
491
492 EXOTICA: But the \tr{-o} option isn't of much use if you have {\em
493 several} input files... Non-interface output files are normally put
494 in the same directory as their corresponding input file came from.
495 You may specify that they be put in another directory using the
496 \tr{-odir <dir>}\index{-odir <dir> option} (the ``Oh, dear'' option).
497 For example:
498
499 \begin{verbatim}
500 % ghc -c parse/Foo.hs parse/Bar.hs gurgle/Bumble.hs -odir `arch`
501 \end{verbatim}
502
503 The output files, \tr{Foo.o}, \tr{Bar.o}, and \tr{Bumble.o} would be
504 put into a subdirectory named after the architecture of the executing
505 machine (\tr{sun4}, \tr{mips}, etc).  The directory must already
506 exist; it won't be created.
507
508 Note that the \tr{-odir} option does {\em not} affect where the
509 interface files are put.  In the above example, they would still be
510 put in \tr{parse/Foo.hi}, \tr{parse/Bar.hi}, and
511 \tr{gurgle/Bumble.hi}.
512
513 MORE EXOTICA: The \tr{-osuf <suffix>}\index{-osuf <suffix> option}
514 will change the \tr{.o} file suffix for object files to whatever
515 you specify.  (We use this in compiling the prelude.)
516
517 Similarly, the \tr{-hisuf <suffix>}\index{-hisuf <suffix> option} will
518 change the \tr{.hi} file suffix for non-system interface files.  This
519 can be useful when you are trying to compile a program several ways,
520 all in the same directory.  The suffix given is used for {\em all}
521 interfaces files written, {\em and} for all non-system interface files
522 that your read.
523
524 The \tr{-hisuf}/\tr{-osuf} game is useful if you want to compile a
525 program with both GHC and HBC (say) in the same directory.  Let HBC
526 use the standard \tr{.hi}/\tr{.o} suffixes; add
527 \tr{-hisuf g_hi -osuf g_o} to your \tr{make} rule for GHC compiling...
528
529 NB: {\em A change from 0.26 and before:} Before, you might have said
530 \tr{-hisuf _g.hi -osuf _g.o}; now, the \tr{.} is assumed and you
531 specify what comes {\em after} it.  (This is a more portable solution
532 for the long term.)
533
534 % THIS SHOULD HAPPEN AUTOMAGICALLY:
535 % If you want to change the suffix looked for on system-supplied
536 % interface files (notably the \tr{Prelude.hi} file), use the
537 % \tr{-hisuf-prelude <suffix>}\index{-hisuf-prelude <suffix> option}
538 % option.  (This may be useful if you've built GHC in various funny
539 % ways, and you are running tests in even more funny ways.  It happens.)
540
541 FURTHER EXOTICA: If you are doing a normal \tr{.hs}-to-\tr{.o} compilation
542 but would like to hang onto the intermediate \tr{.hc} C file, just
543 throw in a \tr{-keep-hc-file-too} option\index{-keep-hc-file-too option}.
544 If you would like to look at the assembler output, toss in a
545 \tr{-keep-s-file-too},\index{-keep-hc-file-too option} too.
546
547 SAVING GHC STDERR OUTPUT: Sometimes, you may cause GHC to be rather
548 chatty on standard error; with \tr{-fshow-import-specs}, for example.
549 You can instruct GHC to {\em append} this output to a particular log
550 file with a \tr{-odump <blah>}\index{-odump <blah> option} option.
551
552 TEMPORARY FILES: If you have trouble because of running out of space
553 in \tr{/tmp/} (or wherever your installation thinks temporary files
554 should go), you may use the \tr{-tmpdir <dir>}\index{-tmpdir <dir> option}
555 option to specify an alternate directory.  For example, \tr{-tmpdir .}
556 says to put temporary files in the current working directory.
557
558 BETTER IDEA FOR TEMPORARY FILES: Use your \tr{TMPDIR} environment
559 variable.\index{TMPDIR environment variable}  Set it to the name of
560 the directory where temporary files should be put.  GCC and other
561 programs will honour the \tr{TMPDIR} variable as well.
562
563 EVEN BETTER IDEA: Set the \tr{TMPDIR} variable when building
564 GHC, and never worry about \tr{TMPDIR} again. (see the build
565 documentation).
566
567 %************************************************************************
568 %*                                                                      *
569 \subsection[options-finding-imports-etc]{For finding interface files, etc.}
570 \index{interface files, finding them}
571 \index{finding interface files}
572 %*                                                                      *
573 %************************************************************************
574
575 In your program, you import a module \tr{Foo} by saying
576 \tr{import Foo}.  GHC goes looking for an interface file, \tr{Foo.hi}.
577 It has a builtin list of directories (notably including \tr{.}) where
578 it looks.
579
580 The \tr{-i<dirs>} option\index{-i<dirs> option} prepends a
581 colon-separated list of \tr{dirs} to the ``import directories'' list.
582
583 A plain \tr{-i} resets the ``import directories'' list back to nothing.
584
585 GHC normally imports \tr{Prelude.hi} files for you.  If you'd rather
586 it didn't, then give it a \tr{-fno-implicit-prelude}
587 option\index{-fno-implicit-prelude option}.  You are unlikely to get
588 very far without a Prelude, but, hey, it's a free country.
589
590 If you are using a system-supplied non-Prelude library (e.g., the HBC
591 library), just use a \tr{-syslib hbc}\index{-syslib <lib> option}
592 option (for example).  The right interface files should then be
593 available.
594
595 Once a Haskell module has been compiled to C (\tr{.hc} file), you may
596 wish to specify where GHC tells the C compiler to look for \tr{.h}
597 files.  (Or, if you are using the \tr{-cpp} option\index{-cpp option},
598 where it tells the C pre-processor to look...)  For this purpose, use
599 a \tr{-I<dir>}\index{-I<dir> option} in the usual C-ish way.
600
601 Pragmas: Interface files are normally jammed full of
602 compiler-produced {\em pragmas}, which record arities, strictness
603 info, etc.  If you think these pragmas are messing you up (or you are
604 doing some kind of weird experiment), you can tell GHC to ignore them
605 with the \tr{-fignore-interface-pragmas}\index{-fignore-interface-pragmas option}
606 option.
607
608 See also \sectionref{options-linker}, which describes how the linker
609 finds standard Haskell libraries.
610
611 %************************************************************************
612 %*                                                                      *
613 %\subsection[options-names]{Fiddling with namespaces}
614 %*                                                                      *
615 %************************************************************************
616
617 %-split-objs and -fglobalise-toplev-names.  You don't need them and you
618 %don't want to know; used for the prelude (ToDo).
619
620 %************************************************************************
621 %*                                                                      *
622 \subsection[options-CPP]{Related to the C pre-processor}
623 \index{C pre-processor options}
624 \index{pre-processor (cpp) options}
625 %*                                                                      *
626 %************************************************************************
627
628 The C pre-processor \tr{cpp} is run over your Haskell code only if the
629 \tr{-cpp} option \index{-cpp option} is given.  Unless you are
630 building a large system with significant doses of conditional
631 compilation, you really shouldn't need it.
632 \begin{description}
633 \item[\tr{-D<foo>}:]
634 \index{-D<name> option}
635 Define macro \tr{<foo>} in the usual way.  NB: does {\em not} affect
636 \tr{-D} macros passed to the C~compiler when compiling via C!  For
637 those, use the \tr{-optc-Dfoo} hack...
638
639 \item[\tr{-U<foo>}:]
640 \index{-U<name> option}
641 Undefine macro \tr{<foo>} in the usual way.
642
643 \item[\tr{-I<dir>}:]
644 \index{-I<dir> option}
645 Specify a directory in which to look for \tr{#include} files, in
646 the usual C way.
647 \end{description}
648
649 The \tr{ghc} driver pre-defines several macros:
650 \begin{description}
651 \item[\tr{__HASKELL1__}:]
652 \index{__HASKELL1__ macro}
653 If defined to $n$, that means GHC supports the
654 Haskell language defined in the Haskell report version $1.n$.
655 Currently 4.
656
657 NB: This macro is set both when pre-processing Haskell source and
658 when pre-processing generated C (\tr{.hc}) files.
659
660 % If you give the \tr{-fhaskell-1.3} flag\index{-fhaskell-1.3 option},
661 % then \tr{__HASKELL1__} is set to 3.  Obviously.
662
663 \item[\tr{__GLASGOW_HASKELL__}:]
664 \index{__GLASGOW_HASKELL__ macro}
665 For version $n$ of the GHC system, this will be \tr{#define}d to
666 $100 \times n$.  So, for version~2.01, it is 201.
667
668 This macro is {\em only} set when pre-processing Haskell source.
669 ({\em Not} when pre-processing generated C.)
670
671 With any luck, \tr{__GLASGOW_HASKELL__} will be undefined in all other
672 implementations that support C-style pre-processing.
673
674 (For reference: the comparable symbols for other systems are:
675 \tr{__HUGS__} for Hugs and \tr{__HBC__} for Chalmers.)
676
677 \item[\tr{__CONCURRENT_HASKELL__}:]
678 \index{__CONCURRENT_HASKELL__ macro}
679 Only defined when \tr{-concurrent} is in use!
680 This symbol is defined when pre-processing Haskell (input) and
681 pre-processing C (GHC output).
682
683 \item[\tr{__PARALLEL_HASKELL__}:]
684 \index{__PARALLEL_HASKELL__ macro}
685 Only defined when \tr{-parallel} is in use!  This symbol is defined when
686 pre-processing Haskell (input) and pre-processing C (GHC output).
687 \end{description}
688
689 Options other than the above can be forced through to the C
690 pre-processor with the \tr{-opt} flags (see
691 \sectionref{forcing-options-through}).
692
693 A small word of warning: \tr{-cpp} is not friendly to
694 ``string gaps''.\index{-cpp vs string gaps}\index{string gaps vs -cpp}
695
696
697 %************************************************************************
698 %*                                                                      *
699 \subsection[options-C-compiler]{Options affecting the C compiler (if applicable)}
700 \index{C compiler options}
701 \index{GCC options}
702 %*                                                                      *
703 %************************************************************************
704
705 At the moment, quite a few common C-compiler options are passed on
706 quietly to the C compilation of Haskell-compiler-generated C files.
707 THIS MAY CHANGE.  Meanwhile, options so sent are:
708
709 \begin{tabular}{ll}
710 \tr{-Wall}      & get all warnings from GCC \\
711 \tr{-ansi}      & do ANSI C (not K\&R) \\
712 \tr{-pedantic}  & be so\\
713 \tr{-dgcc-lint} & (hack) short for ``make GCC very paranoid''\\
714 \end{tabular}
715 \index{-Wall option (for GCC)}
716 \index{-ansi option (for GCC)}
717 \index{-pedantic option (for GCC)}
718 \index{-dgcc-lint option (GCC paranoia)}
719
720 If you are compiling with lots of \tr{ccalls}, etc., you may need to
721 tell the C~compiler about some \tr{#include} files.  There is no real
722 pretty way to do this, but you can use this hack from the
723 command-line:
724 \begin{verbatim}
725 % ghc -c '-#include <X/Xlib.h>' Xstuff.lhs
726 \end{verbatim}
727 \index{-#include <file> option}
728
729 %************************************************************************
730 %*                                                                      *
731 %\subsection[options-native-code]{Options affecting the native-code generator(s)}
732 %*                                                                      *
733 %************************************************************************
734
735 %The only option is to select the target architecture.  Right now,
736 %you have only at most one choice: \tr{-fasm-sparc}.\index{-fasm-<target> option}
737 %
738 %EXPECT this native-code stuff to change in the future.
739
740 %************************************************************************
741 %*                                                                      *
742 \subsection[options-linker]{Linking and consistency-checking}
743 \index{linker options}
744 \index{ld options}
745 %*                                                                      *
746 %************************************************************************
747
748 GHC has to link your code with various libraries, possibly including:
749 user-supplied, GHC-supplied, and system-supplied (\tr{-lm} math
750 library, for example).
751
752 \begin{description}
753 \item[\tr{-l<FOO>}:]
754 \index{-l<lib> option}
755 Link in a library named \tr{lib<FOO>.a} which resides somewhere on the
756 library directories path.
757
758 Because of the sad state of most UNIX linkers, the order of such
759 options does matter.  Thus: \tr{ghc -lbar *.o} is almost certainly
760 wrong, because it will search \tr{libbar.a} {\em before} it has
761 collected unresolved symbols from the \tr{*.o} files.
762 \tr{ghc *.o -lbar} is probably better.
763
764 The linker will of course be informed about some GHC-supplied
765 libraries automatically; these are:
766
767 \begin{tabular}{ll}
768 -l equivalent & description \\ \hline
769
770 -lHSrts,-lHSclib & basic runtime libraries \\
771 -lHS         & standard Prelude library \\
772 -lHS\_cbits  & C support code for standard Prelude library \\
773 -lgmp        & GNU multi-precision library (for Integers)\\
774 \end{tabular}
775 \index{-lHS library}
776 \index{-lHS_cbits library}
777 \index{-lHSrts library}
778 \index{-lgmp library}
779
780 \item[\tr{-syslib <name>}:]
781 \index{-syslib <name> option}
782
783 If you are using a Haskell ``system library'' (e.g., the HBC
784 library), just use the \tr{-syslib hbc} option, and the correct code
785 should be linked in.
786
787 Please see \sectionref{syslibs} for information about
788 ``system libraries.''
789
790 \item[\tr{-L<dir>}:]
791 \index{-L<dir> option}
792 Where to find user-supplied libraries...  Prepend the directory
793 \tr{<dir>} to the library directories path.
794
795 \item[\tr{-static}:]
796 \index{-static option}
797 Tell the linker to avoid shared libraries.
798
799 \item[\tr{-no-link-chk} and \tr{-link-chk}:]
800 \index{-no-link-chk option}
801 \index{-link-chk option}
802 \index{consistency checking of executables}
803 By default, immediately after linking an executable, GHC verifies that
804 the pieces that went into it were compiled with compatible flags; a
805 ``consistency check''.
806 (This is to avoid mysterious failures caused by non-meshing of
807 incompatibly-compiled programs; e.g., if one \tr{.o} file was compiled
808 for a parallel machine and the others weren't.)  You may turn off this
809 check with \tr{-no-link-chk}.  You can turn it (back) on with
810 \tr{-link-chk} (the default).
811 \end{description}
812
813 %************************************************************************
814 %*                                                                      *
815 \subsection[options-compiler-RTS]{For the compiler's RTS: heap, stack sizes, etc.}
816 \index{heap-size options (for GHC)}
817 \index{stack-size options (for GHC)}
818 %*                                                                      *
819 %************************************************************************
820
821 The compiler is itself a Haskell program, so it has a tweakable
822 runtime-system (RTS), just like any other Haskell program.
823
824 \begin{description}
825 \item[\tr{-H<size>} or \tr{-Rmax-heapsize <size>}:]
826 \index{-H<size> option}
827 \index{-Rmax-heapsize <size> option}
828 Don't use more than \tr{<size>} {\em bytes} for heap space.  If more
829 than one of these arguments is given, the largest will be taken.
830
831 A size of zero can be used to reset the heap size downwards.  For
832 example, to run GHC with a heap of 250KB (the default is 6MB), do
833 \tr{-H0 -H250k}.
834
835 \item[\tr{-K<size>} or \tr{-Rmax-stksize <size>}:]
836 \index{-K<size> option}
837 \index{-Rmax-stksize <size> option}
838 Set the stack space to \tr{<size>} bytes.  If you have to set it very
839 high [a megabyte or two, say], the compiler is probably looping, which
840 is a BUG (please report).
841
842 A size of zero can be used to rest the stack size downwards, as above.
843
844 \item[\tr{-Rscale-sizes<factor>}:]
845 \index{-Rscale-sizes<factor> option}
846 Multiply the given (or default) heap and stack sizes by \tr{<factor>}.
847 For example, on a DEC Alpha (a 64-bit machine), you might want to
848 double those space sizes; just use \tr{-Rscale-sizes2}.
849
850 A non-integral factor is OK, too: \tr{-Rscale-sizes1.2}.
851
852 \item[\tr{-Rghc-timing}:]
853 \index{-Rghc-timing option}
854 Reports a one-line useful collection of time- and space- statistics
855 for a module's compilation.
856
857 \item[\tr{-Rgc-stats}:]
858 \index{-Rgc-stats option}
859 Report garbage-collection statistics.  It will create a
860 \tr{<foo>.stat} file, in some obvious place (I hope).
861
862 Alternatively, if you'd rather the GC stats went straight to standard
863 error, you can ``cheat'' by using, instead: \tr{-optCrts-Sstderr}.
864 %
865 %\item[\tr{-Rhbc}:]
866 %\index{-Rhbc option}
867 %Tell the compiler it has an HBC-style RTS; i.e., it was compiled with
868 %HBC.  Not used in Real Life.
869 %
870 %\item[\tr{-Rghc}:]
871 %\index{-Rghc option}
872 %Tell the compiler it has a GHC-style RTS; i.e., it was compiled with
873 %GHC.  Not used in Real Life.
874 \end{description}
875
876 For all \tr{<size>}s: If the last character of \tr{size} is a K,
877 multiply by 1000; if an M, by 1,000,000; if a G, by 1,000,000,000.
878 Sizes are always in {\em bytes}, not words.  Good luck on the G's (I
879 think the counter is still only 32-bits [WDP])!
880
881 %************************************************************************
882 %*                                                                      *
883 %\subsection[options-cross-compiling]{For cross-compiling to another architecture}
884 %*                                                                      *
885 %************************************************************************
886 %
887 % (We do this for GRIP at Glasgow; it's hacked in---not proper
888 %cross-compiling support.  But you could do the same, if required...)
889 %
890 %The \tr{-target <arch>} option\index{-target <arch> option} says to
891 %generate code for the \tr{<arch>} architecture.
892
893 %************************************************************************
894 %*                                                                      *
895 \subsection[options-parallel]{For Concurrent and Parallel Haskell}
896 %*                                                                      *
897 %************************************************************************
898
899 For the full story on using GHC for concurrent \& parallel Haskell
900 programming, please see \Sectionref{concurrent-and-parallel}.
901
902 %The \tr{-fparallel} option\index{-fparallel option} tells the compiler
903 %to generate code for parallel execution.  The \tr{-mgrip}
904 %option\index{-mgrip option} says that the code should be explicitly
905 %suitable for the GRIP multiprocessor (the one in our Glasgow basement).
906
907 %************************************************************************
908 %*                                                                      *
909 %\subsection[options-experimental]{For experimental purposes}
910 %\index{experimental options}
911 %*                                                                      *
912 %************************************************************************
913
914 %From time to time, we provide GHC options for ``experimenting.''  Easy
915 %come, easy go.  In version~0.26, the ``experimental'' options are:
916 %\begin{description}
917 %\item[\tr{-firrefutable-tuples} option:]
918 %\index{-firrefutable-tuples option (experimental)}
919 %Pretend that every tuple pattern is irrefutable; i.e., has a
920 %``twiddle'' (\tr{~}) in front of it.
921 %
922 %Some parts of the GHC system {\em depend} on strictness properties which
923 %\tr{-firrefutable-tuples} may undo, notably the low-level state-transformer
924 %stuff, which includes I/O (!).  You're on your own...
925 %
926 %\item[\tr{-fall-strict} option:]
927 %\index{-fall-strict option (experimental)}
928 % (DOESN'T REALLY WORK, I THINK) Changes the strictness analyser so
929 %that, when it asks the question ``Is this function argument certain to
930 %be evaluated?'', the answer is always ``yes''.
931 %
932 %Compilation is changed in no other way.
933 %\end{description}
934
935 % -firrefutable-everything
936 % -fall-demanded
937
938 %************************************************************************
939 %*                                                                      *
940 \subsection[options-debugging]{For debugging the compiler}
941 \index{debugging options (for GHC)}
942 %*                                                                      *
943 %************************************************************************
944
945 HACKER TERRITORY. HACKER TERRITORY.
946 (You were warned.)
947
948 %----------------------------------------------------------------------
949 \subsubsection[replacing-phases]{Replacing the program for one or more phases.}
950 \index{GHC phases, changing}
951 \index{phases, changing GHC}
952
953 You may specify that a different program
954 be used for one of the phases of the compilation system, in place of
955 whatever the driver \tr{ghc} has wired into it.  For example, you
956 might want to try a different assembler.  The
957 \tr{-pgm<phase-code><program-name>}\index{-pgm<phase><stuff> option} option to
958 \tr{ghc} will cause it to use \pl{<program-name>} for phase
959 \pl{<phase-code>}, where the codes to indicate the phases are:
960
961 \begin{tabular}{ll}
962 code & phase \\ \hline
963 L    & literate pre-processor \\
964 P    & C pre-processor (if -cpp only) \\
965 C    & Haskell compiler \\
966 c    & C compiler\\
967 a    & assembler \\
968 l    & linker \\
969 \end{tabular}
970
971 %----------------------------------------------------------------------
972 \subsubsection[forcing-options-through]{Forcing options to a particular phase.}
973 \index{forcing GHC-phase options}
974
975 The preceding sections describe driver options that are mostly
976 applicable to one particular phase.  You may also {\em force} a
977 specific option \tr{<option>} to be passed to a particular phase
978 \tr{<phase-code>} by feeding the driver the option
979 \tr{-opt<phase-code><option>}.\index{-opt<phase><stuff> option} The
980 codes to indicate the phases are the same as in the previous section.
981
982 So, for example, to force an \tr{-Ewurble} option to the assembler, you
983 would tell the driver \tr{-opta-Ewurble} (the dash before the E is
984 required).
985
986 Besides getting options to the Haskell compiler with \tr{-optC<blah>},
987 you can get options through to its runtime system with
988 \tr{-optCrts<blah>}\index{-optCrts<blah> option}.
989
990 So, for example: when I want to use my normal driver but with my
991 profiled compiler binary, I use this script:
992 \begin{verbatim}
993 #! /bin/sh
994 exec /local/grasp_tmp3/simonpj/ghc-BUILDS/working-alpha/ghc/driver/ghc \
995      -pgmC/local/grasp_tmp3/simonpj/ghc-BUILDS/working-hsc-prof/hsc \
996      -optCrts-i0.5 \
997      -optCrts-PT \
998      "$@"
999 \end{verbatim}
1000
1001 %----------------------------------------------------------------------
1002 \subsubsection[dumping-output]{Dumping out compiler intermediate structures}
1003 \index{dumping GHC intermediates}
1004 \index{intermediate passes, output}
1005
1006 \begin{description}
1007 \item[\tr{-noC}:]
1008 \index{-noC option}
1009 Don't bother generating C output {\em or} an interface file.  Usually
1010 used in conjunction with one or more of the \tr{-ddump-*} options; for
1011 example: \tr{ghc -noC -ddump-simpl Foo.hs}
1012
1013 \item[\tr{-hi}:]
1014 \index{-hi option}
1015 {\em Do} generate an interface file.  This would normally be used in
1016 conjunction with \tr{-noC}, which turns off interface generation;
1017 thus: \tr{-noC -hi}.
1018
1019 \item[\tr{-dshow-passes}:]
1020 \index{-dshow-passes option}
1021 Prints a message to stderr as each pass starts.  Gives a warm but
1022 undoubtedly misleading feeling that GHC is telling you what's
1023 happening.
1024
1025 \item[\tr{-ddump-<pass>}:]
1026 \index{-ddump-<pass> options}
1027 Make a debugging dump after pass \tr{<pass>} (may be common enough to
1028 need a short form...).  Some of the most useful ones are:
1029
1030 \begin{tabular}{ll}
1031 \tr{-ddump-rdr} & reader output (earliest stuff in the compiler) \\
1032 \tr{-ddump-rn} & renamer output \\
1033 \tr{-ddump-tc} & typechecker output \\
1034 \tr{-ddump-deriv} & derived instances \\
1035 \tr{-ddump-ds} & desugarer output \\
1036 \tr{-ddump-simpl} & simplifer output (Core-to-Core passes) \\
1037 \tr{-ddump-stranal} & strictness analyser output \\
1038 \tr{-ddump-occur-anal} & `occurrence analysis' output \\
1039 \tr{-ddump-spec} & dump specialisation info \\
1040 \tr{-ddump-stg} & output of STG-to-STG passes \\
1041 \tr{-ddump-absC} & {\em un}flattened Abstract~C \\
1042 \tr{-ddump-flatC} & {\em flattened} Abstract~C \\
1043 \tr{-ddump-realC} & same as what goes to the C compiler \\
1044 \tr{-ddump-asm} & assembly language from the native-code generator \\
1045 \end{tabular}
1046 \index{-ddump-rdr option}%
1047 \index{-ddump-rn option}%
1048 \index{-ddump-tc option}%
1049 \index{-ddump-deriv option}%
1050 \index{-ddump-ds option}%
1051 \index{-ddump-simpl option}%
1052 \index{-ddump-stranal option}%
1053 \index{-ddump-occur-anal option}%
1054 \index{-ddump-spec option}%
1055 \index{-ddump-stg option}%
1056 \index{-ddump-absC option}%
1057 \index{-ddump-flatC option}%
1058 \index{-ddump-realC option}%
1059 \index{-ddump-asm option}
1060
1061 %For any other \tr{-ddump-*} options: consult the source, notably
1062 %\tr{ghc/compiler/main/CmdLineOpts.lhs}.
1063
1064 \item[\tr{-dverbose-simpl} and \tr{-dverbose-stg}:]
1065 \index{-dverbose-simpl option}
1066 \index{-dverbose-stg option}
1067 Show the output of the intermediate Core-to-Core and STG-to-STG
1068 passes, respectively.  ({\em Lots} of output!) So: when we're 
1069 really desperate:
1070 \begin{verbatim}
1071 % ghc -noC -O -ddump-simpl -dverbose-simpl -dcore-lint Foo.hs
1072 \end{verbatim}
1073
1074 \item[\tr{-dppr-{user,debug,all}}:]
1075 \index{-dppr-user option}
1076 \index{-dppr-debug option}
1077 \index{-dppr-all option}
1078 Debugging output is in one of several ``styles.''  Take the printing
1079 of types, for example.  In the ``user'' style, the compiler's internal
1080 ideas about types are presented in Haskell source-level syntax,
1081 insofar as possible.  In the ``debug'' style (which is the default for
1082 debugging output), the types are printed in the most-often-desired
1083 form, with explicit foralls, etc.  In the ``show all'' style, very
1084 verbose information about the types (e.g., the Uniques on the
1085 individual type variables) is displayed.
1086
1087 \item[\tr{-ddump-raw-asm}:]
1088 \index{-ddump-raw-asm option}
1089 Dump out the assembly-language stuff, before the ``mangler'' gets it.
1090 %
1091 %\item[\tr{-dgc-debug}:]
1092 %\index{-dgc-debug option}
1093 %Enables some debugging code related to the garbage-collector.
1094 \end{description}
1095
1096 %ToDo: -ddump-asm-insn-counts
1097 %-ddump-asm-globals-info
1098
1099 %----------------------------------------------------------------------
1100 \subsubsection{How to read Core syntax (from some \tr{-ddump-*} flags)}
1101 \index{reading Core syntax}
1102 \index{Core syntax, how to read}
1103
1104 Let's do this by commenting an example.  It's from doing
1105 \tr{-ddump-ds} on this code:
1106 \begin{verbatim}
1107 skip2 m = m : skip2 (m+2)
1108 \end{verbatim}
1109
1110 Before we jump in, a word about names of things.  Within GHC,
1111 variables, type constructors, etc., are identified by their
1112 ``Uniques.''  These are of the form `letter' plus `number' (both
1113 loosely interpreted).  The `letter' gives some idea of where the
1114 Unique came from; e.g., \tr{_} means ``built-in type variable'';
1115 \tr{t} means ``from the typechecker''; \tr{s} means ``from the
1116 simplifier''; and so on.  The `number' is printed fairly compactly in
1117 a `base-62' format, which everyone hates except me (WDP).
1118
1119 Remember, everything has a ``Unique'' and it is usually printed out
1120 when debugging, in some form or another.  So here we go...
1121
1122 \begin{verbatim}
1123 Desugared:
1124 Main.skip2{-r1L6-} :: _forall_ a$_4 =>{{Num a$_4}} -> a$_4 -> [a$_4]
1125
1126 --# `r1L6' is the Unique for Main.skip2;
1127 --# `_4' is the Unique for the type-variable (template) `a'
1128 --# `{{Num a$_4}}' is a dictionary argument
1129
1130 _NI_
1131
1132 --# `_NI_' means "no (pragmatic) information" yet; it will later
1133 --# evolve into the GHC_PRAGMA info that goes into interface files.
1134
1135 Main.skip2{-r1L6-} =
1136     /\ _4 -> \ d.Num.t4Gt ->
1137         let {
1138           {- CoRec -}
1139           +.t4Hg :: _4 -> _4 -> _4
1140           _NI_
1141           +.t4Hg = (+{-r3JH-} _4) d.Num.t4Gt
1142
1143           fromInt.t4GS :: Int{-2i-} -> _4
1144           _NI_
1145           fromInt.t4GS = (fromInt{-r3JX-} _4) d.Num.t4Gt
1146
1147 --# The `+' class method (Unique: r3JH) selects the addition code
1148 --# from a `Num' dictionary (now an explicit lamba'd argument).
1149 --# Because Core is 2nd-order lambda-calculus, type applications
1150 --# and lambdas (/\) are explicit.  So `+' is first applied to a
1151 --# type (`_4'), then to a dictionary, yielding the actual addition
1152 --# function that we will use subsequently...
1153
1154 --# We play the exact same game with the (non-standard) class method
1155 --# `fromInt'.  Unsurprisingly, the type `Int' is wired into the
1156 --# compiler.
1157
1158           lit.t4Hb :: _4
1159           _NI_
1160           lit.t4Hb =
1161               let {
1162                 ds.d4Qz :: Int{-2i-}
1163                 _NI_
1164                 ds.d4Qz = I#! 2#
1165               } in  fromInt.t4GS ds.d4Qz
1166
1167 --# `I# 2#' is just the literal Int `2'; it reflects the fact that
1168 --# GHC defines `data Int = I# Int#', where Int# is the primitive
1169 --# unboxed type.  (see relevant info about unboxed types elsewhere...)
1170
1171 --# The `!' after `I#' indicates that this is a *saturated*
1172 --# application of the `I#' data constructor (i.e., not partially
1173 --# applied).
1174
1175           skip2.t3Ja :: _4 -> [_4]
1176           _NI_
1177           skip2.t3Ja =
1178               \ m.r1H4 ->
1179                   let { ds.d4QQ :: [_4]
1180                         _NI_
1181                         ds.d4QQ =
1182                     let {
1183                       ds.d4QY :: _4
1184                       _NI_
1185                       ds.d4QY = +.t4Hg m.r1H4 lit.t4Hb
1186                     } in  skip2.t3Ja ds.d4QY
1187                   } in
1188                   :! _4 m.r1H4 ds.d4QQ
1189
1190           {- end CoRec -}
1191         } in  skip2.t3Ja
1192 \end{verbatim}
1193
1194 (``It's just a simple functional language'' is an unregisterised
1195 trademark of Peyton Jones Enterprises, plc.)
1196
1197 %----------------------------------------------------------------------
1198 \subsubsection[source-file-options]{Command line options in source files}
1199 \index{source-file options}
1200
1201 Sometimes it is useful to make the connection between a source file
1202 and the command-line options it requires, quite tight. For instance,
1203 if a (Glasgow) Haskell source file uses \tr{casm}s, the C back-end
1204 often needs to be told about header files to use,
1205 \ref{-#include <file> option}. Rather than maintaining the list of
1206 files the source depends on in a \tr{Makefile}, it is possible to
1207 do this directly in the source file using the \tr{OPTIONS} pragma
1208 \index{OPTIONS pragma}:
1209
1210 \begin{verbatim}
1211 {-# OPTIONS -#include "foo.h" #-}
1212 module X where
1213
1214 ...
1215 \end{verbatim}
1216
1217 \tr{OPTIONS} pragmas are only looked for at the top of your source
1218 files, upto the first (non-literate,non-empty) line not containing
1219 \tr{OPTIONS}. Multiple \tr{OPTIONS} pragmas are recognised. Note
1220 that your command shell does not get to the source file options, they
1221 are just included literally in the array of command-line arguments
1222 the compiler driver maintains internally, so you'll be desperately
1223 disappointed if you try to glob etc. inside \tr{OPTIONS}.
1224
1225 It is not recommended to move all the contents of your Makefiles into
1226 your source files, but in some circumstances, the \tr{OPTIONS} pragma
1227 is the Right Thing.
1228
1229 %----------------------------------------------------------------------
1230 %\subsubsection[arity-checking]{Options to insert arity-checking code}
1231 %\index{arity checking}
1232 %
1233 %The \tr{-darity-checks}\index{-darity-checks option} option inserts
1234 %code to check for arity violations.  Unfortunately, it's not that
1235 %simple: you have to link with a prelude that was also built with arity
1236 %checks.  If you have one, then great; otherwise...
1237 %
1238 %The \tr{-darity-checks-C-only}\index{-darity-checks-C-only option}
1239 %option inserts the self-same arity checking code into \tr{.hc} files,
1240 %but doesn't compile it into the \tr{.o} files.  We use this flag with
1241 %the \tr{-keep-hc-file-too}\index{-keep-hc-file-too option}, where we
1242 %are keeping \tr{.hc} files around for debugging purposes.
1243
1244 %----------------------------------------------------------------------
1245 %\subsubsection[omit-checking]{Options to omit checking code}
1246 %\index{omitting runtime checks}
1247 %
1248 %By default, the GHC system emits all possible not-too-expensive
1249 %runtime checking code.  If you are brave or experimenting, you might
1250 %want to turn off some of this (not recommended):
1251 %
1252 %\begin{tabular}{ll}
1253 %-dno-black-holing & won't buy you much (even if it works) \\
1254 %-dno-updates & you're crazy if you do this \\
1255 %-dno-stk-stubbing & omit stack stubbing (NOT DONE YET) \\
1256 %\end{tabular}
1257 %\index{-dno-black-holing option}%
1258 %\index{-dno-updates option}%
1259 %\index{-dno-stk-stubbing option}
1260 %
1261 %Warning: all very lightly tested, if at all...
1262
1263 %% %************************************************************************
1264 %% %*                                                                   *
1265 %% \subsection[options-GC]{Choosing a garbage collector}
1266 %% %*                                                                   *
1267 %% %************************************************************************
1268 %% 
1269 %% (Note: you need a Good Reason before launching into this territory.)
1270 %% 
1271 %% There are up to four garbage collectors to choose from (it depends how
1272 %% your local system was built); the Appel-style generational collector
1273 %% is the default.
1274 %% 
1275 %% If you choose a non-default collector, you must specify it both when
1276 %% compiling the modules and when linking them together into an
1277 %% executable.  Also, the native-code generator only works with the
1278 %% default collector (a small point to bear in mind).
1279 %% 
1280 %% \begin{description}
1281 %% \item[\tr{-gc-ap} option:]
1282 %% \index{-gc-ap option}
1283 %% Appel-like generational collector (the default).
1284 %% 
1285 %% \item[\tr{-gc-2s} option:]
1286 %% \index{-gc-2s option}
1287 %% Two-space copying collector.
1288 %% 
1289 %% \item[\tr{-gc-1s} option:]
1290 %% \index{-gc-1s option}
1291 %% One-space compacting collector.
1292 %% 
1293 %% \item[\tr{-gc-du} option:]
1294 %% \index{-gc-du option}
1295 %% Dual-mode collector (swaps between copying and compacting).
1296 %% \end{description}