Bring in acpica-unix-20031203. As with other contrib imports, this import
[dragonfly.git] / sys / contrib / dev / acpica-unix-20031203 / compiler / aslcompile.c
1
2 /******************************************************************************
3  *
4  * Module Name: aslcompile - top level compile module
5  *              $Revision: 72 $
6  *
7  *****************************************************************************/
8
9 /******************************************************************************
10  *
11  * 1. Copyright Notice
12  *
13  * Some or all of this work - Copyright (c) 1999 - 2003, Intel Corp.
14  * All rights reserved.
15  *
16  * 2. License
17  *
18  * 2.1. This is your license from Intel Corp. under its intellectual property
19  * rights.  You may have additional license terms from the party that provided
20  * you this software, covering your right to use that party's intellectual
21  * property rights.
22  *
23  * 2.2. Intel grants, free of charge, to any person ("Licensee") obtaining a
24  * copy of the source code appearing in this file ("Covered Code") an
25  * irrevocable, perpetual, worldwide license under Intel's copyrights in the
26  * base code distributed originally by Intel ("Original Intel Code") to copy,
27  * make derivatives, distribute, use and display any portion of the Covered
28  * Code in any form, with the right to sublicense such rights; and
29  *
30  * 2.3. Intel grants Licensee a non-exclusive and non-transferable patent
31  * license (with the right to sublicense), under only those claims of Intel
32  * patents that are infringed by the Original Intel Code, to make, use, sell,
33  * offer to sell, and import the Covered Code and derivative works thereof
34  * solely to the minimum extent necessary to exercise the above copyright
35  * license, and in no event shall the patent license extend to any additions
36  * to or modifications of the Original Intel Code.  No other license or right
37  * is granted directly or by implication, estoppel or otherwise;
38  *
39  * The above copyright and patent license is granted only if the following
40  * conditions are met:
41  *
42  * 3. Conditions
43  *
44  * 3.1. Redistribution of Source with Rights to Further Distribute Source.
45  * Redistribution of source code of any substantial portion of the Covered
46  * Code or modification with rights to further distribute source must include
47  * the above Copyright Notice, the above License, this list of Conditions,
48  * and the following Disclaimer and Export Compliance provision.  In addition,
49  * Licensee must cause all Covered Code to which Licensee contributes to
50  * contain a file documenting the changes Licensee made to create that Covered
51  * Code and the date of any change.  Licensee must include in that file the
52  * documentation of any changes made by any predecessor Licensee.  Licensee
53  * must include a prominent statement that the modification is derived,
54  * directly or indirectly, from Original Intel Code.
55  *
56  * 3.2. Redistribution of Source with no Rights to Further Distribute Source.
57  * Redistribution of source code of any substantial portion of the Covered
58  * Code or modification without rights to further distribute source must
59  * include the following Disclaimer and Export Compliance provision in the
60  * documentation and/or other materials provided with distribution.  In
61  * addition, Licensee may not authorize further sublicense of source of any
62  * portion of the Covered Code, and must include terms to the effect that the
63  * license from Licensee to its licensee is limited to the intellectual
64  * property embodied in the software Licensee provides to its licensee, and
65  * not to intellectual property embodied in modifications its licensee may
66  * make.
67  *
68  * 3.3. Redistribution of Executable. Redistribution in executable form of any
69  * substantial portion of the Covered Code or modification must reproduce the
70  * above Copyright Notice, and the following Disclaimer and Export Compliance
71  * provision in the documentation and/or other materials provided with the
72  * distribution.
73  *
74  * 3.4. Intel retains all right, title, and interest in and to the Original
75  * Intel Code.
76  *
77  * 3.5. Neither the name Intel nor any other trademark owned or controlled by
78  * Intel shall be used in advertising or otherwise to promote the sale, use or
79  * other dealings in products derived from or relating to the Covered Code
80  * without prior written authorization from Intel.
81  *
82  * 4. Disclaimer and Export Compliance
83  *
84  * 4.1. INTEL MAKES NO WARRANTY OF ANY KIND REGARDING ANY SOFTWARE PROVIDED
85  * HERE.  ANY SOFTWARE ORIGINATING FROM INTEL OR DERIVED FROM INTEL SOFTWARE
86  * IS PROVIDED "AS IS," AND INTEL WILL NOT PROVIDE ANY SUPPORT,  ASSISTANCE,
87  * INSTALLATION, TRAINING OR OTHER SERVICES.  INTEL WILL NOT PROVIDE ANY
88  * UPDATES, ENHANCEMENTS OR EXTENSIONS.  INTEL SPECIFICALLY DISCLAIMS ANY
89  * IMPLIED WARRANTIES OF MERCHANTABILITY, NONINFRINGEMENT AND FITNESS FOR A
90  * PARTICULAR PURPOSE.
91  *
92  * 4.2. IN NO EVENT SHALL INTEL HAVE ANY LIABILITY TO LICENSEE, ITS LICENSEES
93  * OR ANY OTHER THIRD PARTY, FOR ANY LOST PROFITS, LOST DATA, LOSS OF USE OR
94  * COSTS OF PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES, OR FOR ANY INDIRECT,
95  * SPECIAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THIS AGREEMENT, UNDER ANY
96  * CAUSE OF ACTION OR THEORY OF LIABILITY, AND IRRESPECTIVE OF WHETHER INTEL
97  * HAS ADVANCE NOTICE OF THE POSSIBILITY OF SUCH DAMAGES.  THESE LIMITATIONS
98  * SHALL APPLY NOTWITHSTANDING THE FAILURE OF THE ESSENTIAL PURPOSE OF ANY
99  * LIMITED REMEDY.
100  *
101  * 4.3. Licensee shall not export, either directly or indirectly, any of this
102  * software or system incorporating such software without first obtaining any
103  * required license or other approval from the U. S. Department of Commerce or
104  * any other agency or department of the United States Government.  In the
105  * event Licensee exports any such software from the United States or
106  * re-exports any such software from a foreign destination, Licensee shall
107  * ensure that the distribution and export/re-export of the software is in
108  * compliance with all laws, regulations, orders, or other restrictions of the
109  * U.S. Export Administration Regulations. Licensee agrees that neither it nor
110  * any of its subsidiaries will export/re-export any technical data, process,
111  * software, or service, directly or indirectly, to any country for which the
112  * United States government or any agency thereof requires an export license,
113  * other governmental approval, or letter of assurance, without first obtaining
114  * such license, approval or letter.
115  *
116  *****************************************************************************/
117
118 #include <stdio.h>
119 #include "aslcompiler.h"
120
121 #define _COMPONENT          ACPI_COMPILER
122         ACPI_MODULE_NAME    ("aslcompile")
123
124
125 /*******************************************************************************
126  *
127  * FUNCTION:    AslCompilerSignon
128  *
129  * PARAMETERS:  FileId      - ID of the output file
130  *
131  * RETURN:      None
132  *
133  * DESCRIPTION: Display compiler signon
134  *
135  ******************************************************************************/
136
137 void
138 AslCompilerSignon (
139     UINT32                  FileId)
140 {
141     char                    *Prefix = "";
142
143
144     /*
145      * Set line prefix depending on the destination file type
146      */
147     switch (FileId)
148     {
149     case ASL_FILE_ASM_SOURCE_OUTPUT:
150     case ASL_FILE_ASM_INCLUDE_OUTPUT:
151
152         Prefix = "; ";
153         break;
154
155     case ASL_FILE_HEX_OUTPUT:
156
157         if (Gbl_HexOutputFlag == HEX_OUTPUT_ASM)
158         {
159             Prefix = "; ";
160         }
161         else if (Gbl_HexOutputFlag == HEX_OUTPUT_C)
162         {
163             FlPrintFile (ASL_FILE_HEX_OUTPUT, "/*\n");
164             Prefix = " * ";
165         }
166         break;
167
168     case ASL_FILE_C_SOURCE_OUTPUT:
169     case ASL_FILE_C_INCLUDE_OUTPUT:
170
171         Prefix = " * ";
172         break;
173
174     default:
175         /* No other output types supported */
176         break;
177     }
178
179     /* Compiler signon with copyright */
180
181     FlPrintFile (FileId,
182         "%s\n%s%s\n%s%s version %X [%s]\n%s%s\n%sSupports ACPI Specification Revision 2.0c\n%s\n",
183         Prefix,
184         Prefix, IntelAcpiCA,
185         Prefix, CompilerId, ACPI_CA_VERSION, __DATE__,
186         Prefix, CompilerCopyright,
187         Prefix,
188         Prefix);
189 }
190
191
192 /*******************************************************************************
193  *
194  * FUNCTION:    AslCompilerFileHeader
195  *
196  * PARAMETERS:  FileId      - ID of the output file
197  *
198  * RETURN:      None
199  *
200  * DESCRIPTION: Header used at the beginning of output files
201  *
202  ******************************************************************************/
203
204 void
205 AslCompilerFileHeader (
206     UINT32                  FileId)
207 {
208     struct tm               *NewTime;
209     time_t                  Aclock;
210     char                    *Prefix = "";
211
212
213     /*
214      * Set line prefix depending on the destination file type
215      */
216     switch (FileId)
217     {
218     case ASL_FILE_ASM_SOURCE_OUTPUT:
219     case ASL_FILE_ASM_INCLUDE_OUTPUT:
220
221         Prefix = "; ";
222         break;
223
224     case ASL_FILE_HEX_OUTPUT:
225
226         if (Gbl_HexOutputFlag == HEX_OUTPUT_ASM)
227         {
228             Prefix = "; ";
229         }
230         else if (Gbl_HexOutputFlag == HEX_OUTPUT_C)
231         {
232             Prefix = " * ";
233         }
234         break;
235
236     case ASL_FILE_C_SOURCE_OUTPUT:
237     case ASL_FILE_C_INCLUDE_OUTPUT:
238
239         Prefix = " * ";
240         break;
241
242     default:
243         /* No other output types supported */
244         break;
245     }
246
247     /* Compilation header with timestamp */
248
249     (void) time (&Aclock);
250     NewTime = localtime (&Aclock);
251
252     FlPrintFile (FileId,
253         "%sCompilation of \"%s\" - %s%s\n",
254         Prefix, Gbl_Files[ASL_FILE_INPUT].Filename, asctime (NewTime),
255         Prefix);
256
257     switch (FileId)
258     {
259     case ASL_FILE_C_SOURCE_OUTPUT:
260     case ASL_FILE_C_INCLUDE_OUTPUT:
261         FlPrintFile (FileId, " */\n");
262         break;
263
264     default:
265         /* Nothing to do for other output types */
266         break;
267     }
268 }
269
270
271 /*******************************************************************************
272  *
273  * FUNCTION:    CmFlushSourceCode
274  *
275  * PARAMETERS:  None
276  *
277  * RETURN:      None
278  *
279  * DESCRIPTION: Read in any remaining source code after the parse tree
280  *              has been constructed.
281  *
282  ******************************************************************************/
283
284 void
285 CmFlushSourceCode (void)
286 {
287     char                    Buffer;
288
289
290     while (FlReadFile (ASL_FILE_INPUT, &Buffer, 1) != AE_ERROR)
291     {
292         InsertLineBuffer ((int) Buffer);
293     }
294
295     ResetCurrentLineBuffer ();
296 }
297
298
299 /*******************************************************************************
300  *
301  * FUNCTION:    FlCheckForAscii
302  *
303  * PARAMETERS:  FileInfo        - Points to an open input file
304  *
305  * RETURN:      Status (0 = OK)
306  *
307  * DESCRIPTION: Verify that the input file is entirely ASCII.
308  *
309  ******************************************************************************/
310
311 ACPI_STATUS
312 FlCheckForAscii (
313     ASL_FILE_INFO           *FileInfo)
314 {
315     UINT8                   Byte;
316     ACPI_SIZE               BadBytes = 0;
317     ACPI_SIZE               Offset = 0;
318
319
320     /* Read the entire file */
321
322     while (fread (&Byte, 1, 1, FileInfo->Handle))
323     {
324         /* Check for an ASCII character */
325
326         if (!isascii (Byte))
327         {
328             if (BadBytes < 10)
329             {
330                 AcpiOsPrintf ("Non-ASCII character: 0x%2.2X at offset 0x%X\n", Byte, Offset);
331             }
332             BadBytes++;
333         }
334         Offset++;
335     }
336
337     /* Were there any non-ASCII characters in the file? */
338
339     if (BadBytes)
340     {
341         AcpiOsPrintf ("%d non-ASCII characters found in input file, appears to be binary\n", BadBytes);
342         AslError (ASL_ERROR, ASL_MSG_NON_ASCII, NULL, FileInfo->Filename);
343         return (AE_BAD_CHARACTER);
344     }
345
346     /* File is OK, seek back to the beginning */
347
348     fseek (FileInfo->Handle, 0, SEEK_SET);
349     return (AE_OK);
350 }
351
352
353 /*******************************************************************************
354  *
355  * FUNCTION:    CmDoCompile
356  *
357  * PARAMETERS:  None
358  *
359  * RETURN:      Status (0 = OK)
360  *
361  * DESCRIPTION: This procedure performs the entire compile
362  *
363  ******************************************************************************/
364
365 int
366 CmDoCompile (void)
367 {
368     ACPI_STATUS             Status;
369     UINT32                  i = 0;
370
371
372     UtBeginEvent (12, "Total Compile time");
373     UtBeginEvent (i, "Initialize");
374
375     /* Open the required input and output files */
376
377     Status = FlOpenInputFile (Gbl_Files[ASL_FILE_INPUT].Filename);
378     if (ACPI_FAILURE (Status))
379     {
380         AePrintErrorLog (ASL_FILE_STDERR);
381         return -1;
382     }
383
384     /* Ensure that the input file is 100% ASCII text */
385
386     Status = FlCheckForAscii (&Gbl_Files[ASL_FILE_INPUT]);
387     if (ACPI_FAILURE (Status))
388     {
389         AePrintErrorLog (ASL_FILE_STDERR);
390         return -1;
391     }
392
393     Status = FlOpenMiscOutputFiles (Gbl_OutputFilenamePrefix);
394     if (ACPI_FAILURE (Status))
395     {
396         AePrintErrorLog (ASL_FILE_STDERR);
397         return -1;
398     }
399
400     UtEndEvent (i++);
401
402     /* Build the parse tree */
403
404     UtBeginEvent (i, "Parse source code and build parse tree");
405     AslCompilerparse();
406     UtEndEvent (i++);
407
408     /* Flush out any remaining source after parse tree is complete */
409
410     CmFlushSourceCode ();
411
412     /* Did the parse tree get successfully constructed? */
413
414     if (!RootNode)
415     {
416         CmCleanupAndExit ();
417         return -1;
418     }
419
420     OpcGetIntegerWidth (RootNode);
421
422     /* Pre-process parse tree for any operator transforms */
423
424     UtBeginEvent (i, "Generate AML opcodes");
425     DbgPrint (ASL_DEBUG_OUTPUT, "\nParse tree transforms\n\n");
426     TrWalkParseTree (RootNode, ASL_WALK_VISIT_DOWNWARD, TrAmlTransformWalk, NULL, NULL);
427
428     /* Generate AML opcodes corresponding to the parse tokens */
429
430     DbgPrint (ASL_DEBUG_OUTPUT, "\nGenerating AML opcodes\n\n");
431     TrWalkParseTree (RootNode, ASL_WALK_VISIT_UPWARD, NULL, OpcAmlOpcodeWalk, NULL);
432     UtEndEvent (i++);
433
434     /*
435      * Now that the input is parsed, we can open the AML output file.
436      * Note: by default, the name of this file comes from the table descriptor
437      * within the input file.
438      */
439     Status = FlOpenAmlOutputFile (Gbl_OutputFilenamePrefix);
440     if (ACPI_FAILURE (Status))
441     {
442         AePrintErrorLog (ASL_FILE_STDERR);
443         return -1;
444     }
445
446     /* Interpret and generate all compile-time constants */
447
448     UtBeginEvent (i, "Constant folding via AML interpreter");
449     DbgPrint (ASL_DEBUG_OUTPUT, "\nInterpreting compile-time constant expressions\n\n");
450     TrWalkParseTree (RootNode, ASL_WALK_VISIT_DOWNWARD, OpcAmlConstantWalk, NULL, NULL);
451     UtEndEvent (i++);
452
453     /* Calculate all AML package lengths */
454
455     UtBeginEvent (i, "Generate AML package lengths");
456     DbgPrint (ASL_DEBUG_OUTPUT, "\nGenerating Package lengths\n\n");
457     TrWalkParseTree (RootNode, ASL_WALK_VISIT_UPWARD, NULL, LnPackageLengthWalk, NULL);
458     UtEndEvent (i++);
459
460     if (Gbl_ParseOnlyFlag)
461     {
462         AePrintErrorLog (ASL_FILE_STDOUT);
463         UtDisplaySummary (ASL_FILE_STDOUT);
464         if (Gbl_DebugFlag)
465         {
466             /* Print error summary to the debug file */
467
468             AePrintErrorLog (ASL_FILE_STDERR);
469             UtDisplaySummary (ASL_FILE_STDERR);
470         }
471         return 0;
472     }
473
474     /*
475      * Create an internal namespace and use it as a symbol table
476      */
477
478     /* Namespace loading */
479
480     UtBeginEvent (i, "Create ACPI Namespace");
481     Status = LdLoadNamespace (RootNode);
482     UtEndEvent (i++);
483     if (ACPI_FAILURE (Status))
484     {
485         return -1;
486     }
487
488     /* Namespace lookup */
489
490     UtBeginEvent (i, "Cross reference parse tree and Namespace");
491     Status = LkCrossReferenceNamespace ();
492     UtEndEvent (i++);
493     UtEndEvent (i++);
494     if (ACPI_FAILURE (Status))
495     {
496         return -1;
497     }
498
499     /*
500      * Semantic analysis.  This can happen only after the
501      * namespace has been loaded and cross-referenced.
502      *
503      * part one - check control methods
504      */
505     UtBeginEvent (i, "Analyze control method return types");
506     AnalysisWalkInfo.MethodStack = NULL;
507
508     DbgPrint (ASL_DEBUG_OUTPUT, "\nSemantic analysis - Method analysis\n\n");
509     TrWalkParseTree (RootNode, ASL_WALK_VISIT_TWICE, AnMethodAnalysisWalkBegin,
510                         AnMethodAnalysisWalkEnd, &AnalysisWalkInfo);
511     UtEndEvent (i++);
512
513     /* Semantic error checking part two - typing of method returns */
514
515     UtBeginEvent (i, "Determine object types returned by methods");
516     DbgPrint (ASL_DEBUG_OUTPUT, "\nSemantic analysis - Method typing \n\n");
517     TrWalkParseTree (RootNode, ASL_WALK_VISIT_TWICE, AnMethodTypingWalkBegin,
518                         AnMethodTypingWalkEnd, NULL);
519     UtEndEvent (i++);
520
521     /* Semantic error checking part three - operand type checking */
522
523     UtBeginEvent (i, "Analyze AML operand types");
524     DbgPrint (ASL_DEBUG_OUTPUT, "\nSemantic analysis - Operand type checking \n\n");
525     TrWalkParseTree (RootNode, ASL_WALK_VISIT_TWICE, AnOperandTypecheckWalkBegin,
526                         AnOperandTypecheckWalkEnd, &AnalysisWalkInfo);
527     UtEndEvent (i++);
528
529     /* Semantic error checking part four - other miscellaneous checks */
530
531     UtBeginEvent (i, "Miscellaneous analysis");
532     DbgPrint (ASL_DEBUG_OUTPUT, "\nSemantic analysis - miscellaneous \n\n");
533     TrWalkParseTree (RootNode, ASL_WALK_VISIT_TWICE, AnOtherSemanticAnalysisWalkBegin,
534                         AnOtherSemanticAnalysisWalkEnd, &AnalysisWalkInfo);
535     UtEndEvent (i++);
536
537     /* Calculate all AML package lengths */
538
539     UtBeginEvent (i, "Finish AML package length generation");
540     DbgPrint (ASL_DEBUG_OUTPUT, "\nGenerating Package lengths\n\n");
541     TrWalkParseTree (RootNode, ASL_WALK_VISIT_UPWARD, NULL, LnInitLengthsWalk, NULL);
542     TrWalkParseTree (RootNode, ASL_WALK_VISIT_UPWARD, NULL, LnPackageLengthWalk, NULL);
543     UtEndEvent (i++);
544
545
546     /* Code generation - emit the AML */
547
548     UtBeginEvent (i, "Generate AML code and write output files");
549     CgGenerateAmlOutput ();
550     UtEndEvent (i++);
551
552     UtBeginEvent (i, "Write optional output files");
553     CmDoOutputFiles ();
554     UtEndEvent (i++);
555
556     UtEndEvent (13);
557     CmCleanupAndExit ();
558     return 0;
559 }
560
561 void
562 CmDoOutputFiles (void)
563 {
564
565     /* Create listings and hex files */
566
567     LsDoListings ();
568     LsDoHexOutput ();
569
570     /* Dump the namespace to the .nsp file if requested */
571
572     LsDisplayNamespace ();
573 }
574
575
576 /*******************************************************************************
577  *
578  * FUNCTION:    CmCleanupAndExit
579  *
580  * PARAMETERS:  None
581  *
582  * RETURN:      None.
583  *
584  * DESCRIPTION: Close all open files and exit the compiler
585  *
586  ******************************************************************************/
587
588 void
589 CmCleanupAndExit (void)
590 {
591     UINT32                  i;
592
593
594     AePrintErrorLog (ASL_FILE_STDOUT);
595     if (Gbl_DebugFlag)
596     {
597         /* Print error summary to the debug file */
598
599         AePrintErrorLog (ASL_FILE_STDERR);
600     }
601
602     DbgPrint (ASL_DEBUG_OUTPUT, "\n\nElapsed time for major events\n\n");
603     for (i = 0; i < 13; i++)
604     {
605         if (AslGbl_Events[i].Valid)
606         {
607             DbgPrint (ASL_DEBUG_OUTPUT, "%8lu ms - %s\n",
608                 AslGbl_Events[i].EndTime -
609                 AslGbl_Events[i].StartTime,
610                 AslGbl_Events[i].EventName);
611         }
612     }
613
614     if (Gbl_CompileTimesFlag)
615     {
616         printf ("\nElapsed time for major events\n\n");
617         for (i = 0; i < 13; i++)
618         {
619             if (AslGbl_Events[i].Valid)
620             {
621                 printf ("%8lu ms : %s\n",
622                     AslGbl_Events[i].EndTime -
623                     AslGbl_Events[i].StartTime,
624                     AslGbl_Events[i].EventName);
625             }
626         }
627         printf ("\nMiscellaneous compile statistics\n\n");
628         printf ("%11u : %s\n", TotalParseNodes, "Parse nodes");
629         printf ("%11u : %s\n", Gbl_NsLookupCount, "Namespace searches");
630         printf ("%11u : %s\n", TotalNamedObjects, "Named objects");
631         printf ("%11u : %s\n", TotalMethods, "Control methods");
632         printf ("%11u : %s\n", TotalAllocations, "Memory Allocations");
633         printf ("%11u : %s\n", TotalAllocated, "Total allocated memory");
634         printf ("%11u : %s\n", TotalFolds, "Constant subtrees folded");
635         printf ("\n");
636     }
637
638     if (Gbl_NsLookupCount)
639     {
640         DbgPrint (ASL_DEBUG_OUTPUT, "\n\nMiscellaneous compile statistics\n\n");
641         DbgPrint (ASL_DEBUG_OUTPUT, "%32s : %d\n", "Total Namespace searches", Gbl_NsLookupCount);
642         DbgPrint (ASL_DEBUG_OUTPUT, "%32s : %d\n", "Time per search",
643                         ((UINT32) (AslGbl_Events[7].EndTime - AslGbl_Events[7].StartTime) * 1000) /
644                         Gbl_NsLookupCount);
645     }
646
647     /* Close all open files */
648
649     for (i = 2; i < ASL_MAX_FILE_TYPE; i++)
650     {
651         FlCloseFile (i);
652     }
653
654     /*
655      * TBD: SourceOutput should be .TMP, then rename if we want to keep it?
656      */
657     if (!Gbl_SourceOutputFlag)
658     {
659         unlink (Gbl_Files[ASL_FILE_SOURCE_OUTPUT].Filename);
660     }
661
662     /* Delete AML file if there are errors */
663
664     if ((Gbl_ExceptionCount[ASL_ERROR] > 0) && (!Gbl_IgnoreErrors))
665     {
666         unlink (Gbl_Files[ASL_FILE_AML_OUTPUT].Filename);
667     }
668
669     if (Gbl_ExceptionCount[ASL_ERROR] > ASL_MAX_ERROR_COUNT)
670     {
671         printf ("\nMaximum error count (%d) exceeded.\n", ASL_MAX_ERROR_COUNT);
672     }
673
674     UtDisplaySummary (ASL_FILE_STDOUT);
675     exit (0);
676 }
677
678