184a885cb77e0489aa50e5a83ea54592e8229139
[cacao.git] / src / vmcore / options.c
1 /* src/vmcore/options.c - contains global options
2
3    Copyright (C) 1996-2005, 2006, 2007 R. Grafl, A. Krall, C. Kruegel,
4    C. Oates, R. Obermaisser, M. Platter, M. Probst, S. Ring,
5    E. Steiner, C. Thalinger, D. Thuernbeck, P. Tomsich, C. Ullrich,
6    J. Wenninger, Institut f. Computersprachen - TU Wien
7
8    This file is part of CACAO.
9
10    This program is free software; you can redistribute it and/or
11    modify it under the terms of the GNU General Public License as
12    published by the Free Software Foundation; either version 2, or (at
13    your option) any later version.
14
15    This program is distributed in the hope that it will be useful, but
16    WITHOUT ANY WARRANTY; without even the implied warranty of
17    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
18    General Public License for more details.
19
20    You should have received a copy of the GNU General Public License
21    along with this program; if not, write to the Free Software
22    Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
23    02110-1301, USA.
24
25 */
26
27
28 #include "config.h"
29
30 #include <errno.h>
31 #include <stdint.h>
32 #include <stdio.h>
33 #include <stdlib.h>
34
35 #if defined(HAVE_STRING_H)
36 # include <string.h>
37 #endif
38
39 #include <limits.h>
40
41 #include "mm/memory.h"
42
43 #include "native/jni.h"
44
45 #include "vm/vm.h"
46
47 #include "vmcore/options.h"
48
49
50 /* command line option ********************************************************/
51
52 s4    opt_index = 0;            /* index of processed arguments               */
53 char *opt_arg;                  /* this one exports the option argument       */
54
55 bool opt_foo = false;           /* option for development                     */
56
57 bool opt_jar = false;
58
59 #if defined(ENABLE_JIT)
60 bool opt_jit = true;            /* JIT mode execution (default)               */
61 bool opt_intrp = false;         /* interpreter mode execution                 */
62 #else
63 bool opt_jit = false;           /* JIT mode execution                         */
64 bool opt_intrp = true;          /* interpreter mode execution (default)       */
65 #endif
66
67 bool opt_run = true;
68
69 s4   opt_heapmaxsize   = 0;     /* maximum heap size                          */
70 s4   opt_heapstartsize = 0;     /* initial heap size                          */
71 s4   opt_stacksize     = 0;     /* thread stack size                          */
72
73 bool opt_verbose = false;
74 bool opt_debugcolor = false;    /* use ANSI terminal sequences                */
75 bool compileall = false;
76
77 bool loadverbose = false;
78 bool initverbose = false;
79
80 bool opt_verboseclass     = false;
81 bool opt_verbosegc        = false;
82 bool opt_verbosejni       = false;
83 bool opt_verbosecall      = false;      /* trace all method invocation        */
84
85 bool showmethods = false;
86 bool showconstantpool = false;
87 bool showutf = false;
88
89 char *opt_method = NULL;
90 char *opt_signature = NULL;
91
92 bool compileverbose =  false;           /* trace compiler actions             */
93 bool showstack = false;
94
95 bool opt_showdisassemble    = false;    /* generate disassembler listing      */
96 bool opt_shownops           = false;
97 bool opt_showddatasegment   = false;    /* generate data segment listing      */
98 bool opt_showintermediate   = false;    /* generate intermediate code listing */
99
100 bool checkbounds = true;       /* check array bounds                         */
101 bool opt_noieee = false;       /* don't implement ieee compliant floats      */
102 bool checksync = true;         /* do synchronization                         */
103 #if defined(ENABLE_LOOP)
104 bool opt_loops = false;        /* optimize array accesses in loops           */
105 #endif
106
107 bool makeinitializations = true;
108
109 #if defined(ENABLE_STATISTICS)
110 bool opt_stat    = false;
111 bool opt_getloadingtime = false;   /* to measure the runtime                 */
112 bool opt_getcompilingtime = false; /* compute compile time                   */
113 #endif
114 #if defined(ENABLE_VERIFIER)
115 bool opt_verify  = true;       /* true if classfiles should be verified      */
116 #endif
117
118 #if defined(ENABLE_PROFILING)
119 bool opt_prof    = false;
120 bool opt_prof_bb = false;
121 #endif
122
123
124 /* inlining options ***********************************************************/
125
126 #if defined(ENABLE_INLINING)
127 bool opt_inlining = false;
128 #if defined(ENABLE_INLINING_DEBUG) || !defined(NDEBUG)
129 s4 opt_inline_debug_min_size = 0;
130 s4 opt_inline_debug_max_size = INT_MAX;
131 s4 opt_inline_debug_end_counter = INT_MAX;
132 bool opt_inline_debug_all = false;
133 #endif /* defined(ENABLE_INLINING_DEBUG) || !defined(NDEBUG) */
134 #if !defined(NDEBUG)
135 bool opt_inline_debug_log = false;
136 #endif /* !defined(NDEBUG) */
137 #endif /* defined(ENABLE_INLINING) */
138
139
140 /* optimization options *******************************************************/
141
142 #if defined(ENABLE_IFCONV)
143 bool opt_ifconv = false;
144 #endif
145
146 #if defined(ENABLE_LSRA) || defined(ENABLE_SSA)
147 bool opt_lsra = false;
148 #endif
149
150
151 /* interpreter options ********************************************************/
152
153 #if defined(ENABLE_INTRP)
154 bool opt_no_dynamic = false;            /* suppress dynamic superinstructions */
155 bool opt_no_replication = false;        /* don't use replication in intrp     */
156 bool opt_no_quicksuper = false;         /* instructions for quickening cannot be
157                                                                                    part of dynamic superinstructions */
158
159 s4   opt_static_supers = 0x7fffffff;
160 bool vm_debug = false;          /* XXX this should be called `opt_trace'      */
161 #endif
162
163 #if defined(ENABLE_DEBUG_FILTER)
164 const char *opt_filter_verbosecall_include = 0;
165 const char *opt_filter_verbosecall_exclude = 0;
166 const char *opt_filter_show_method = 0;
167 #endif
168
169
170 /* -XX options ****************************************************************/
171
172 /* NOTE: For better readability keep these alpha-sorted. */
173
174 int      opt_DebugExceptions           = 0;
175 int      opt_DebugFinalizer            = 0;
176 int      opt_DebugLocalReferences      = 0;
177 int      opt_DebugLocks                = 0;
178 int      opt_DebugPackage              = 0;
179 int      opt_DebugPatcher              = 0;
180 int      opt_DebugProperties           = 0;
181 int32_t  opt_DebugStackFrameInfo       = 0;
182 int      opt_DebugStackTrace           = 0;
183 int      opt_DebugThreads              = 0;
184 #if defined(ENABLE_DISASSEMBLER)
185 int      opt_DisassembleStubs          = 0;
186 #endif
187 #if defined(ENABLE_GC_CACAO)
188 int32_t  opt_GCDebugRootSet            = 0;
189 int32_t  opt_GCStress                  = 0;
190 #endif
191 int32_t  opt_MaxPermSize               = 0;
192 int32_t  opt_PermSize                  = 0;
193 int      opt_PrintConfig               = 0;
194 int32_t  opt_ProfileGCMemoryUsage      = 0;
195 int32_t  opt_ProfileMemoryUsage        = 0;
196 FILE    *opt_ProfileMemoryUsageGNUPlot = NULL;
197 #if defined(ENABLE_REPLACEMENT)
198 int      opt_TestReplacement           = 0;
199 #endif
200 int32_t  opt_ThreadStackSize           = 0;
201 int      opt_TraceCompilerCalls        = 0;
202 int32_t  opt_TraceExceptions           = 0;
203 int32_t  opt_TraceJavaCalls            = 0;
204 int32_t  opt_TraceJNICalls             = 0;
205 int32_t  opt_TraceJVMCalls             = 0;
206 int32_t  opt_TraceJVMCallsVerbose      = 0;
207 int32_t  opt_TraceLinkClass            = 0;
208 #if defined(ENABLE_REPLACEMENT)
209 int32_t  opt_TraceReplacement          = 0;
210 #endif
211
212
213 enum {
214         OPT_TYPE_BOOLEAN,
215         OPT_TYPE_VALUE
216 };
217
218 enum {
219         OPT_DebugExceptions,
220         OPT_DebugFinalizer,
221         OPT_DebugLocalReferences,
222         OPT_DebugLocks,
223         OPT_DebugPackage,
224         OPT_DebugPatcher,
225         OPT_DebugProperties,
226         OPT_DebugStackFrameInfo,
227         OPT_DebugStackTrace,
228         OPT_DebugThreads,
229         OPT_DisassembleStubs,
230         OPT_GCDebugRootSet,
231         OPT_GCStress,
232         OPT_MaxPermSize,
233         OPT_PermSize,
234         OPT_PrintConfig,
235         OPT_ProfileGCMemoryUsage,
236         OPT_ProfileMemoryUsage,
237         OPT_ProfileMemoryUsageGNUPlot,
238         OPT_TestReplacement,
239         OPT_ThreadStackSize,
240         OPT_TraceCompilerCalls,
241         OPT_TraceExceptions,
242         OPT_TraceJavaCalls,
243         OPT_TraceJNICalls,
244         OPT_TraceJVMCalls,
245         OPT_TraceJVMCallsVerbose,
246         OPT_TraceLinkClass,
247         OPT_TraceReplacement
248 };
249
250
251 option_t options_XX[] = {
252         { "DebugExceptions",           OPT_DebugExceptions,           OPT_TYPE_BOOLEAN, "debug exceptions" },
253         { "DebugFinalizer",            OPT_DebugFinalizer,            OPT_TYPE_BOOLEAN, "debug finalizer thread" },
254         { "DebugLocalReferences",      OPT_DebugLocalReferences,      OPT_TYPE_BOOLEAN, "print debug information for local reference tables" },
255         { "DebugLocks",                OPT_DebugLocks,                OPT_TYPE_BOOLEAN, "print debug information for locks" },
256         { "DebugPackage",              OPT_DebugPackage,              OPT_TYPE_BOOLEAN, "debug Java boot-packages" },
257         { "DebugPatcher",              OPT_DebugPatcher,              OPT_TYPE_BOOLEAN, "debug JIT code patching" },
258         { "DebugProperties",           OPT_DebugProperties,           OPT_TYPE_BOOLEAN, "print debug information for properties" },
259         { "DebugStackFrameInfo",       OPT_DebugStackFrameInfo,       OPT_TYPE_BOOLEAN, "TODO" },
260         { "DebugStackTrace",           OPT_DebugStackTrace,           OPT_TYPE_BOOLEAN, "debug stacktrace creation" },
261         { "DebugThreads",              OPT_DebugThreads,              OPT_TYPE_BOOLEAN, "print debug information for threads" },
262 #if defined(ENABLE_DISASSEMBLER)
263         { "DisassembleStubs",          OPT_DisassembleStubs,          OPT_TYPE_BOOLEAN, "disassemble builtin and native stubs when generated" },
264 #endif
265 #if defined(ENABLE_GC_CACAO)
266         { "GCDebugRootSet",            OPT_GCDebugRootSet,            OPT_TYPE_BOOLEAN, "GC: print root-set at collection" },
267         { "GCStress",                  OPT_GCStress,                  OPT_TYPE_BOOLEAN, "GC: forced collection at every allocation" },
268 #endif
269         { "MaxPermSize",               OPT_MaxPermSize,               OPT_TYPE_VALUE,   "not implemented" },
270         { "PermSize",                  OPT_PermSize,                  OPT_TYPE_VALUE,   "not implemented" },
271         { "PrintConfig",               OPT_PrintConfig,               OPT_TYPE_BOOLEAN, "print VM configuration" },
272         { "ProfileGCMemoryUsage",      OPT_ProfileGCMemoryUsage,      OPT_TYPE_VALUE,   "profiles GC memory usage in the given interval, <value> is in seconds (default: 5)" },
273         { "ProfileMemoryUsage",        OPT_ProfileMemoryUsage,        OPT_TYPE_VALUE,   "TODO" },
274         { "ProfileMemoryUsageGNUPlot", OPT_ProfileMemoryUsageGNUPlot, OPT_TYPE_VALUE,   "TODO" },
275 #if defined(ENABLE_REPLACEMENT)
276         { "TestReplacement"          , OPT_TestReplacement,           OPT_TYPE_BOOLEAN, "activate all replacement points during code generation" },
277 #endif
278         { "ThreadStackSize",           OPT_ThreadStackSize,           OPT_TYPE_VALUE,   "TODO" },
279         { "TraceCompilerCalls",        OPT_TraceCompilerCalls,        OPT_TYPE_BOOLEAN, "trace JIT compiler calls" },
280         { "TraceExceptions",           OPT_TraceExceptions,           OPT_TYPE_BOOLEAN, "trace Exception throwing" },
281         { "TraceJavaCalls",            OPT_TraceJavaCalls,            OPT_TYPE_BOOLEAN, "trace Java method calls" },
282         { "TraceJNICalls",             OPT_TraceJNICalls,             OPT_TYPE_BOOLEAN, "trace JNI method calls" },
283         { "TraceJVMCalls",             OPT_TraceJVMCalls,             OPT_TYPE_BOOLEAN, "trace JVM method calls but omit very frequent ones" },
284         { "TraceJVMCallsVerbose",      OPT_TraceJVMCallsVerbose,      OPT_TYPE_BOOLEAN, "trace all JVM method calls" },
285         { "TraceLinkClass",            OPT_TraceLinkClass,            OPT_TYPE_BOOLEAN, "trace class linking" },
286 #if defined(ENABLE_REPLACEMENT)
287         { "TraceReplacement",          OPT_TraceReplacement,          OPT_TYPE_VALUE,   "trace on-stack replacement with the given verbosity level (default: 1)" },
288 #endif
289
290         /* end marker */
291
292         { NULL,                        -1,                            -1, NULL }
293 };
294
295
296 /* options_get *****************************************************************
297
298    DOCUMENT ME!!!
299
300 *******************************************************************************/
301
302 s4 options_get(opt_struct *opts, JavaVMInitArgs *vm_args)
303 {
304         char *option;
305         s4    i;
306
307         if (opt_index >= vm_args->nOptions)
308                 return OPT_DONE;
309
310         /* get the current option */
311
312         option = vm_args->options[opt_index].optionString;
313
314         if ((option == NULL) || (option[0] != '-'))
315                 return OPT_DONE;
316
317         for (i = 0; opts[i].name; i++) {
318                 if (!opts[i].arg) {
319                         /* boolean option found */
320
321                         if (strcmp(option + 1, opts[i].name) == 0) {
322                                 opt_index++;
323                                 return opts[i].value;
324                         }
325
326                 } else {
327                         /* parameter option found */
328
329                         /* with a space between */
330
331                         if (strcmp(option + 1, opts[i].name) == 0) {
332                                 opt_index++;
333
334                                 if (opt_index < vm_args->nOptions) {
335
336 #if defined(HAVE_STRDUP)
337                                         opt_arg = strdup(vm_args->options[opt_index].optionString);
338 #else
339 # error !HAVE_STRDUP
340 #endif
341
342                                         opt_index++;
343                                         return opts[i].value;
344                                 }
345
346                                 return OPT_ERROR;
347
348                         } else {
349                                 /* parameter and option have no space between */
350
351                                 /* FIXME: this assumption is plain wrong, hits you if there is a
352                                  * parameter with no argument starting with same letter as param with argument
353                                  * but named after that one, ouch! */
354
355                                 size_t l = strlen(opts[i].name);
356
357                                 if (strlen(option + 1) > l) {
358                                         if (memcmp(option + 1, opts[i].name, l) == 0) {
359                                                 opt_index++;
360
361 #if defined(HAVE_STRDUP)
362                                                 opt_arg = strdup(option + 1 + l);
363 #else
364 # error !HAVE_STRDUP
365 #endif
366
367                                                 return opts[i].value;
368                                         }
369                                 }
370                         }
371                 }
372         }
373
374         return OPT_ERROR;
375 }
376
377
378 /* options_xxusage *************************************************************
379
380    Print usage message for debugging options.
381
382 *******************************************************************************/
383
384 static void options_xxusage(void)
385 {
386         option_t *opt;
387         int       length;
388         int       i;
389         char     *c;
390
391         for (opt = options_XX; opt->name != NULL; opt++) {
392                 printf("    -XX:");
393
394                 switch (opt->type) {
395                 case OPT_TYPE_BOOLEAN:
396                         printf("+%s", opt->name);
397                         length = strlen("    -XX:+") + strlen(opt->name);
398                         break;
399                 case OPT_TYPE_VALUE:
400                         printf("%s=<value>", opt->name);
401                         length = strlen("    -XX:") + strlen(opt->name) + strlen("=<value>");
402                         break;
403                 }
404
405                 /* Check if the help fits into one 80-column line.
406                    Documentation starts at column 29. */
407
408                 if (length < (29 - 1)) {
409                         /* Print missing spaces up to column 29. */
410
411                         for (i = length; i < 29; i++)
412                                 printf(" ");
413                 }
414                 else {
415                         printf("\n");
416                         printf("                             "); /* 29 spaces */
417                 }
418
419                 /* Check documentation length. */
420
421                 length = strlen(opt->doc);
422
423                 if (length < (80 - 29)) {
424                         printf("%s", opt->doc);
425                 }
426                 else {
427                         for (c = opt->doc, i = 29; *c != 0; c++, i++) {
428                                 /* If we are at the end of the line, break it. */
429
430                                 if (i == 80) {
431                                         printf("\n");
432                                         printf("                             "); /* 29 spaces */
433                                         i = 29;
434                                 }
435
436                                 printf("%c", *c);
437                         }
438                 }
439
440                 printf("\n");
441         }
442
443         /* exit with error code */
444
445         exit(1);
446 }
447
448
449 /* options_xx ******************************************************************
450
451    Handle -XX: options.
452
453 *******************************************************************************/
454
455 void options_xx(JavaVMInitArgs *vm_args)
456 {
457         const char *name;
458         const char *start;
459         char       *end;
460         int         length;
461         int         enable;
462         char       *value;
463         option_t   *opt;
464         char       *filename;
465         FILE       *file;
466         int         i;
467
468         /* Iterate over all passed options. */
469
470         for (i = 0; i < vm_args->nOptions; i++) {
471                 /* Get the current option. */
472
473                 name = vm_args->options[i].optionString;
474
475                 /* Check for help (-XX). */
476
477                 if (strcmp(name, "-XX") == 0)
478                         options_xxusage();
479
480                 /* Check if the option start with -XX. */
481
482                 start = strstr(name, "-XX:");
483
484                 if ((start == NULL) || (start != name))
485                         continue;
486
487                 /* Check if the option is a boolean option. */
488
489                 if (name[4] == '+') {
490                         start  = name + 4 + 1;
491                         enable = 1;
492                 }
493                 else if (name[4] == '-') {
494                         start  = name + 4 + 1;
495                         enable = 0;
496                 }
497                 else {
498                         start  = name + 4;
499                         enable = -1;
500                 }
501
502                 /* Search for a '=' in the option name and get the option name
503                    length and the value of the option. */
504
505                 end = strchr(start, '=');
506
507                 if (end == NULL) {
508                         length = strlen(start);
509                         value  = NULL;
510                 }
511                 else {
512                         length = end - start;
513                         value  = end + 1;
514                 }
515
516                 /* Search the option in the option array. */
517
518                 for (opt = options_XX; opt->name != NULL; opt++) {
519                         if (strncmp(opt->name, start, length) == 0) {
520                                 /* Check if the options passed fits to the type. */
521
522                                 switch (opt->type) {
523                                 case OPT_TYPE_BOOLEAN:
524                                         if ((enable == -1) || (value != NULL))
525                                                 options_xxusage();
526                                         break;
527                                 case OPT_TYPE_VALUE:
528                                         if ((enable != -1) || (value == NULL))
529                                                 options_xxusage();
530                                         break;
531                                 default:
532                                         vm_abort("options_xx: unknown option type %d for option %s",
533                                                          opt->type, opt->name);
534                                 }
535
536                                 break;
537                         }
538                 }
539
540                 /* Process the option. */
541
542                 switch (opt->value) {
543                 case OPT_DebugExceptions:
544                         opt_DebugExceptions = enable;
545                         break;
546
547                 case OPT_DebugFinalizer:
548                         opt_DebugFinalizer = enable;
549                         break;
550
551                 case OPT_DebugLocalReferences:
552                         opt_DebugLocalReferences = enable;
553                         break;
554
555                 case OPT_DebugLocks:
556                         opt_DebugLocks = enable;
557                         break;
558
559                 case OPT_DebugPackage:
560                         opt_DebugPackage = enable;
561                         break;
562
563                 case OPT_DebugPatcher:
564                         opt_DebugPatcher = enable;
565                         break;
566
567                 case OPT_DebugProperties:
568                         opt_DebugProperties = enable;
569                         break;
570
571                 case OPT_DebugStackFrameInfo:
572                         opt_DebugStackFrameInfo = enable;
573                         break;
574
575                 case OPT_DebugStackTrace:
576                         opt_DebugStackTrace = enable;
577                         break;
578
579                 case OPT_DebugThreads:
580                         opt_DebugThreads = enable;
581                         break;
582
583 #if defined(ENABLE_DISASSEMBLER)
584                 case OPT_DisassembleStubs:
585                         opt_DisassembleStubs = enable;
586                         break;
587 #endif
588
589 #if defined(ENABLE_GC_CACAO)
590                 case OPT_GCDebugRootSet:
591                         opt_GCDebugRootSet = enable;
592                         break;
593
594                 case OPT_GCStress:
595                         opt_GCStress = enable;
596                         break;
597 #endif
598
599                 case OPT_MaxPermSize:
600                         /* currently ignored */
601                         break;
602
603                 case OPT_PermSize:
604                         /* currently ignored */
605                         break;
606
607                 case OPT_PrintConfig:
608                         opt_PrintConfig = enable;
609                         break;
610
611                 case OPT_ProfileGCMemoryUsage:
612                         if (value == NULL)
613                                 opt_ProfileGCMemoryUsage = 5;
614                         else
615                                 opt_ProfileGCMemoryUsage = atoi(value);
616                         break;
617
618                 case OPT_ProfileMemoryUsage:
619                         if (value == NULL)
620                                 opt_ProfileMemoryUsage = 5;
621                         else
622                                 opt_ProfileMemoryUsage = atoi(value);
623
624 # if defined(ENABLE_STATISTICS)
625                         /* we also need statistics */
626
627                         opt_stat = true;
628 # endif
629                         break;
630
631                 case OPT_ProfileMemoryUsageGNUPlot:
632                         if (value == NULL)
633                                 filename = "profile.dat";
634                         else
635                                 filename = value;
636
637                         file = fopen(filename, "w");
638
639                         if (file == NULL)
640                                 vm_abort("options_xx: fopen failed: %s", strerror(errno));
641
642                         opt_ProfileMemoryUsageGNUPlot = file;
643                         break;
644
645 #if defined(ENABLE_REPLACEMENT)
646                 case OPT_TestReplacement:
647                         opt_TestReplacement = enable;
648                         break;
649 #endif
650
651                 case OPT_ThreadStackSize:
652                         /* currently ignored */
653                         break;
654
655                 case OPT_TraceCompilerCalls:
656                         opt_TraceCompilerCalls = enable;
657                         break;
658
659                 case OPT_TraceExceptions:
660                         opt_TraceExceptions = enable;
661                         break;
662
663                 case OPT_TraceJavaCalls:
664                         opt_verbosecall = enable;
665                         opt_TraceJavaCalls = enable;
666                         break;
667
668                 case OPT_TraceJNICalls:
669                         opt_TraceJNICalls = enable;
670                         break;
671
672                 case OPT_TraceJVMCalls:
673                         opt_TraceJVMCalls = enable;
674                         break;
675
676                 case OPT_TraceJVMCallsVerbose:
677                         opt_TraceJVMCallsVerbose = enable;
678                         break;
679
680                 case OPT_TraceLinkClass:
681                         opt_TraceLinkClass = enable;
682                         break;
683
684 #if defined(ENABLE_REPLACEMENT)
685                 case OPT_TraceReplacement:
686                         if (value == NULL)
687                                 opt_TraceReplacement = 1;
688                         else
689                                 opt_TraceReplacement = atoi(value);
690                         break;
691 #endif
692
693                 default:
694                         printf("Unknown -XX option: %s\n", name);
695                         break;
696                 }
697         }
698 }
699
700
701 /*
702  * These are local overrides for various environment variables in Emacs.
703  * Please do not remove this and leave it at the end of the file, where
704  * Emacs will automagically detect them.
705  * ---------------------------------------------------------------------
706  * Local variables:
707  * mode: c
708  * indent-tabs-mode: t
709  * c-basic-offset: 4
710  * tab-width: 4
711  * End:
712  */