* src/mm/cacao-gc/rootset.c (rootset_from_thread): Add javastack references to
[cacao.git] / src / vm / jit / jit.h
1 /* src/vm/jit/jit.h - code generation header
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    $Id: jit.h 7667 2007-04-05 00:16:05Z michi $
26
27 */
28
29
30 #ifndef _JIT_H
31 #define _JIT_H
32
33 /* forward typedefs ***********************************************************/
34
35 typedef struct jitdata jitdata;
36 typedef struct stackelement stackelement;
37 typedef stackelement *stackptr;
38 typedef struct basicblock basicblock;
39 typedef struct instruction instruction;
40 typedef struct insinfo_inline insinfo_inline;
41 typedef struct exception_entry exception_entry;
42
43
44 #include "config.h"
45 #include "vm/types.h"
46
47 #include "toolbox/chain.h"
48
49 #include "vm/global.h"
50 #include "vm/resolve.h"
51
52 #include "vm/jit/codegen-common.h"
53 #include "vm/jit/reg.h"
54 #include "vm/jit/replace.h"
55
56 #if defined(ENABLE_INLINING)
57 # include "vm/jit/inline/inline.h"
58 #endif
59
60 #if defined(ENABLE_LOOP)
61 # include "vm/jit/loop/loop.h"
62 #endif
63 #if defined(ENABLE_SSA) 
64 # include "vm/jit/optimizing/lsra.h"
65 #endif
66 #if defined(ENABLE_LSRA)
67 # include "vm/jit/allocator/lsra.h"
68 #endif
69
70 #include "vm/jit/verify/typeinfo.h"
71
72 #include "vmcore/method.h"
73 #include "vmcore/references.h"
74
75 #if defined(ENABLE_STATISTICS)
76 # include "vmcore/statistics.h"
77 #endif
78
79
80 /* common jit/codegen macros **************************************************/
81
82 #if defined(ENABLE_STATISTICS)
83 # define COUNT(x)        (x)++
84 # define COUNT_SPILLS    count_spills++
85 #else
86 # define COUNT(x)        /* nothing */
87 # define COUNT_SPILLS    /* nothing */
88 #endif
89
90 typedef struct interface_info interface_info;
91
92 struct interface_info {
93         s4 flags;
94         s4 regoff;
95 };
96
97
98 /* jitdata ********************************************************************/
99
100 struct jitdata {
101         methodinfo      *m;               /* methodinfo of the method compiled    */
102         codeinfo        *code;
103         codegendata     *cd;
104         registerdata    *rd;
105 #if defined(ENABLE_LOOP)
106         loopdata        *ld;
107 #endif
108 #if defined(ENABLE_SSA) || defined(ENABLE_LSRA)
109         lsradata        *ls;
110 #endif
111
112         u4               flags;           /* contains JIT compiler flags          */
113         bool             isleafmethod;    /* true, if no subroutines are called   */
114
115         instruction     *instructions;    /* ICMDs, valid between parse and stack */
116         basicblock      *basicblocks;     /* start of basic block list            */
117         stackelement    *stack;           /* XXX should become stack.c internal   */
118         s4               instructioncount;/* XXX remove this?                     */
119         s4               basicblockcount; /* number of basic blocks               */
120         s4               stackcount;      /* number of stackelements to allocate  */
121                                       /* (passed from parse to stack)         */
122
123         varinfo         *var;             /* array of variables                   */
124         s4               vartop;          /* next free index in var array         */
125     
126         s4               varcount;        /* number of variables in var array     */
127         s4               localcount;      /* number of locals at start of var ar. */
128     s4              *local_map;  /* internal structure to rename(de-coallesc) */
129                                                 /* locals and keep the coalescing info for simplereg. */
130                             /* local_map[local_index * 5 + local_type] =          */
131                             /* new_index in rd->var or UNUSED                     */
132         s4               maxlocals;       /* max. number of javalocals            */
133
134         interface_info  *interface_map;   /* interface variables (for simplereg)  */
135         s4               maxinterfaces;   /* max. number of interface variables   */
136
137         s4               exceptiontablelength; /* exceptiontable length           */
138         exception_entry *exceptiontable;       /* the exceptiontable              */
139
140         basicblock      *returnblock;          /* block containing the *RETURN    */
141                                                /* (only use if returncount==1)    */
142         s4               returncount;          /* number of return instructions   */
143         bool             branchtoentry;        /* true if first block is a target */
144         bool             branchtoend;          /* true if end dummy is a target   */
145 };
146
147
148 #define UNUSED                     -1
149
150 #define JITDATA_FLAG_PARSE               0x00000001
151 #define JITDATA_FLAG_VERIFY              0x00000002
152
153 #define JITDATA_FLAG_INSTRUMENT          0x00000004
154
155 #define JITDATA_FLAG_IFCONV              0x00000008
156 #define JITDATA_FLAG_REORDER             0x00000010
157 #define JITDATA_FLAG_INLINE              0x00000020
158
159 #define JITDATA_FLAG_COUNTDOWN           0x00000100
160
161 #define JITDATA_FLAG_SHOWINTERMEDIATE    0x20000000
162 #define JITDATA_FLAG_SHOWDISASSEMBLE     0x40000000
163 #define JITDATA_FLAG_VERBOSECALL         0x80000000
164
165
166 #define JITDATA_HAS_FLAG_PARSE(jd) \
167     ((jd)->flags & JITDATA_FLAG_PARSE)
168
169 #define JITDATA_HAS_FLAG_VERIFY(jd) \
170     ((jd)->flags & JITDATA_FLAG_VERIFY)
171
172 #define JITDATA_HAS_FLAG_INSTRUMENT(jd) \
173     ((jd)->flags & JITDATA_FLAG_INSTRUMENT)
174
175 #define JITDATA_HAS_FLAG_IFCONV(jd) \
176     ((jd)->flags & JITDATA_FLAG_IFCONV)
177
178 #define JITDATA_HAS_FLAG_REORDER(jd) \
179     ((jd)->flags & JITDATA_FLAG_REORDER)
180
181 #define JITDATA_HAS_FLAG_INLINE(jd) \
182     ((jd)->flags & JITDATA_FLAG_INLINE)
183
184 #define JITDATA_HAS_FLAG_COUNTDOWN(jd) \
185     ((jd)->flags & JITDATA_FLAG_COUNTDOWN)
186
187 #define JITDATA_HAS_FLAG_SHOWINTERMEDIATE(jd) \
188     ((jd)->flags & JITDATA_FLAG_SHOWINTERMEDIATE)
189
190 #define JITDATA_HAS_FLAG_SHOWDISASSEMBLE(jd) \
191     ((jd)->flags & JITDATA_FLAG_SHOWDISASSEMBLE)
192
193 #define JITDATA_HAS_FLAG_VERBOSECALL(jd) \
194     ((jd)->flags & JITDATA_FLAG_VERBOSECALL)
195
196
197 /* macros for accessing variables *********************************************
198  
199    Use VAROP for s1, s2, s3 and dst operands (eg. VAROP(iptr->s1)),
200    use VAR if you have the variable index (eg. VAR(iptr->sx.s23.s2.args[0])).
201
202 ******************************************************************************/
203
204 #define VAROP(v) (jd->var + (v).varindex)
205 #define VAR(i)   (jd->var + (i))
206
207
208 /* exception_entry ************************************************************/
209
210 struct exception_entry {
211         basicblock           *start;
212         basicblock           *end;
213         basicblock           *handler;
214         classref_or_classinfo catchtype; /* catchtype of exc. (NULL == catchall)  */
215         exception_entry      *next;      /* next in list of exceptions when       */
216                                                                          /* loops are copied                      */
217         exception_entry      *down;      /* next exception_entry                  */
218 };
219
220
221 /* stack element structure ****************************************************/
222
223 /* flags */
224
225 #define SAVEDVAR      1         /* variable has to survive method invocations */
226 #define INMEMORY      2         /* variable stored in memory                  */
227 #define SAVREG        4         /* allocated to a saved register              */
228 #define ARGREG        8         /* allocated to an arg register               */
229 #define PASSTHROUGH  32         /* stackslot was passed-through by an ICMD    */
230 #define PREALLOC     64         /* preallocated var like for ARGVARS. Used    */
231                                 /* with the new var system */
232 #define INOUT    128            /* variable is an invar or/and an outvar      */
233
234 #define IS_SAVEDVAR(x)    ((x) & SAVEDVAR)
235 #define IS_INMEMORY(x)    ((x) & INMEMORY)
236
237
238 /* variable kinds */
239
240 #define UNDEFVAR   0            /* stack slot will become temp during regalloc*/
241 #define TEMPVAR    1            /* stack slot is temp register                */
242 #define STACKVAR   2            /* stack slot is numbered stack slot          */
243 #define LOCALVAR   3            /* stack slot is local variable               */
244 #define ARGVAR     4            /* stack slot is argument variable            */
245
246
247 struct stackelement {
248         stackptr prev;              /* pointer to next element towards bottom     */
249         instruction *creator;       /* instruction that created this element      */
250         s4       type;              /* slot type of stack element                 */
251         s4       flags;             /* flags (SAVED, INMEMORY)                    */
252         s4       varkind;           /* kind of variable or register               */
253         s4       varnum;            /* number of variable                         */
254 };
255
256
257 /**************************** instruction structure ***************************/
258
259 /* branch_target_t: used in TABLESWITCH tables */
260
261 typedef union {
262     s4                         insindex; /* used in parse                     */
263     basicblock                *block;    /* valid after parse                 */
264 } branch_target_t;
265
266 /* lookup_target_t: used in LOOKUPSWITCH tables */
267
268 typedef struct {
269     s4                         value;    /* case value                        */
270     branch_target_t            target;   /* branch target, see above          */
271 } lookup_target_t;
272
273 /*** s1 operand ***/
274
275 typedef union {
276         s4                         varindex;
277     s4                         argcount;
278 } s1_operand_t;
279
280 /*** s2 operand ***/
281
282 typedef union {
283         s4                         varindex;
284         s4                        *args;
285     classref_or_classinfo      c;
286     unresolved_class          *uc;
287     ptrint                     constval;         /* for PUT*CONST             */
288     s4                         tablelow;         /* for TABLESWITCH           */
289     u4                         lookupcount;      /* for LOOKUPSWITCH          */
290         s4                         retaddrnr;        /* for ASTORE                */
291 } s2_operand_t;
292
293 /*** s3 operand ***/
294
295 typedef union {
296         s4                         varindex;
297     ptrint                     constval;
298     classref_or_classinfo      c;
299     constant_FMIref           *fmiref;
300     unresolved_method         *um;
301     unresolved_field          *uf;
302     insinfo_inline            *inlineinfo;       /* for INLINE_START/END      */
303     s4                         tablehigh;        /* for TABLESWITCH           */
304     branch_target_t            lookupdefault;    /* for LOOKUPSWITCH          */
305     branch_target_t            jsrtarget;        /* for JSR                   */
306         s4                         javaindex;        /* for *STORE                */
307     struct builtintable_entry *bte;
308 } s3_operand_t;
309
310 /*** val operand ***/
311
312 typedef union {
313     s4                        i;
314     s8                        l;
315     float                     f;
316     double                    d;
317     void                     *anyptr;
318     java_objectheader        *stringconst;       /* for ACONST with string    */
319     classref_or_classinfo     c;                 /* for ACONST with class     */
320 } val_operand_t;
321
322 /*** dst operand ***/
323
324 typedef union {
325         s4                         varindex;
326     basicblock                *block;       /* valid after parse              */
327     branch_target_t           *table;       /* for TABLESWITCH                */
328     lookup_target_t           *lookup;      /* for LOOKUPSWITCH               */
329     s4                         insindex;    /* used in parse                  */
330 } dst_operand_t;
331
332 /*** flags (32 bits) ***/
333
334 #define INS_FLAG_BASICBLOCK    0x01    /* marks a basic block start           */
335 #define INS_FLAG_UNRESOLVED    0x02    /* contains unresolved field/meth/class*/
336 #define INS_FLAG_CLASS         0x04    /* for ACONST, PUT*CONST with class    */
337 #define INS_FLAG_ARRAY         0x08    /* for CHECKCAST/INSTANCEOF with array */
338 #define INS_FLAG_CHECK         0x10    /* for *ALOAD|*ASTORE: check index     */
339                                        /* for BUILTIN: check exception        */
340 #define INS_FLAG_KILL_PREV     0x04    /* for *STORE, invalidate prev local   */
341 #define INS_FLAG_KILL_NEXT     0x08    /* for *STORE, invalidate next local   */
342 #define INS_FLAG_RETADDR       0x10    /* for ASTORE: op is a returnAddress   */
343
344 #define INS_FLAG_ID_SHIFT      5
345 #define INS_FLAG_ID_MASK       (~0 << INS_FLAG_ID_SHIFT)
346
347 typedef union {
348     u4                  bits;
349 } flags_operand_t;
350
351 /*** instruction ***/
352
353 /* The instruction format for the intermediate representation: */
354
355 struct instruction {
356     u2                      opc;    /* opcode       */
357     u2                      line;   /* line number  */
358 #if SIZEOF_VOID_P == 8
359     flags_operand_t         flags;  /* 4 bytes      */
360 #endif
361     s1_operand_t            s1;     /* pointer-size */
362     union {
363         struct {
364             s2_operand_t    s2;     /* pointer-size */
365             s3_operand_t    s3;     /* pointer-size */
366         } s23;                      /*     XOR      */
367         val_operand_t       val;    /*  long-size   */
368     } sx;
369     dst_operand_t           dst;    /* pointer-size */
370 #if SIZEOF_VOID_P == 4
371     flags_operand_t         flags;  /* 4 bytes      */
372 #endif
373 };
374
375
376 #define INSTRUCTION_STARTS_BASICBLOCK(iptr) \
377         ((iptr)->flags.bits & INS_FLAG_BASICBLOCK)
378
379 #define INSTRUCTION_IS_RESOLVED(iptr) \
380         (!((iptr)->flags.bits & INS_FLAG_UNRESOLVED))
381
382 #define INSTRUCTION_IS_UNRESOLVED(iptr) \
383         ((iptr)->flags.bits & INS_FLAG_UNRESOLVED)
384
385 #define INSTRUCTION_MUST_CHECK(iptr) \
386         ((iptr)->flags.bits & INS_FLAG_CHECK)
387
388 #define INSTRUCTION_GET_FIELDREF(iptr,fref) \
389         do { \
390                 if (iptr->flags.bits & INS_FLAG_UNRESOLVED) \
391                         fref = iptr->sx.s23.s3.uf->fieldref; \
392                 else \
393                         fref = iptr->sx.s23.s3.fmiref; \
394         } while (0)
395
396 #define INSTRUCTION_GET_METHODREF(iptr,mref) \
397         do { \
398                 if (iptr->flags.bits & INS_FLAG_UNRESOLVED) \
399                         mref = iptr->sx.s23.s3.um->methodref; \
400                 else \
401                         mref = iptr->sx.s23.s3.fmiref; \
402         } while (0)
403
404 #define INSTRUCTION_GET_METHODDESC(iptr, md) \
405         do { \
406                 if (iptr->flags.bits & INS_FLAG_UNRESOLVED) \
407                         md = iptr->sx.s23.s3.um->methodref->parseddesc.md; \
408                 else \
409                         md = iptr->sx.s23.s3.fmiref->parseddesc.md; \
410         } while (0)
411
412
413 /* additional info structs for special instructions ***************************/
414
415 /* for ICMD_INLINE_START and ICMD_INLINE_END */
416
417 struct insinfo_inline {
418         /* fields copied from the inlining tree ----------------------------------*/
419         insinfo_inline *parent;     /* insinfo of the surrounding inlining, if any*/
420         methodinfo     *method;     /* the inlined method starting/ending here    */
421         methodinfo     *outer;      /* the outer method suspended/resumed here    */
422         s4              synclocal;      /* local index used for synchronization   */
423         bool            synchronize;    /* true if synchronization is needed      */
424         s4              throughcount;   /* total # of pass-through variables      */
425         s4              paramcount;     /* number of parameters of original call  */
426         s4              stackvarscount; /* source stackdepth at INLINE_START      */
427         s4             *stackvars;      /* stack vars at INLINE_START             */
428
429         /* fields set by inlining ------------------------------------------------*/
430         s4         *javalocals_start; /* javalocals at start of inlined body      */
431         s4         *javalocals_end;   /* javalocals after inlined body            */
432
433         /* fields set by replacement point creation ------------------------------*/
434 #if defined(ENABLE_REPLACEMENT)
435         rplpoint   *rp;             /* replacement point at INLINE_START          */
436 #endif
437
438         /* fields set by the codegen ---------------------------------------------*/
439         s4          startmpc;       /* machine code offset of start of inlining   */
440 };
441
442
443 /* basicblock *****************************************************************/
444
445 /* flags */
446
447 #define BBDELETED            -2
448 #define BBUNDEF              -1
449 #define BBREACHED            0
450 #define BBFINISHED           1
451
452 #define BBTYPECHECK_UNDEF    2
453 #define BBTYPECHECK_REACHED  3
454
455 #define BBTYPE_STD           0  /* standard basic block type                  */
456 #define BBTYPE_EXH           1  /* exception handler basic block type         */
457 #define BBTYPE_SBR           2  /* subroutine basic block type                */
458
459 #define BBFLAG_REPLACEMENT   0x01  /* put a replacement point at the start    */
460
461 /* XXX basicblock wastes quite a lot of memory by having four flag fields     */
462 /* (flags, bitflags, type and lflags). Probably the last three could be       */
463 /* combined without loss of efficiency. The first one could be combined with  */
464 /* the others by using bitfields.                                             */
465
466 /* XXX "flags" should probably be called "state", as it is an integer state   */
467
468 struct basicblock {
469         s4            nr;           /* basic block number                         */
470         s4            flags;        /* used during stack analysis, init with -1   */
471         s4            bitflags;     /* OR of BBFLAG_... constants, init with 0    */
472         s4            type;         /* basic block type (std, xhandler, subroutine*/
473         s4            lflags;       /* used during loop copying, init with 0      */
474
475         s4            icount;       /* number of intermediate code instructions   */
476         instruction  *iinstr;       /* pointer to intermediate code instructions  */
477
478         varinfo      *inlocals;     /* copy of locals on block entry              */
479         s4           *javalocals;   /* map from java locals to cacao variables    */
480         s4           *invars;       /* array of in-variables at begin of block    */
481         s4           *outvars;      /* array of out-variables at end of block     */
482         s4            indepth;      /* stack depth at begin of basic block        */
483         s4            outdepth;     /* stack depth end of basic block             */
484         s4            varstart;     /* index of first non-invar block variable    */
485         s4            varcount;     /* number of non-invar block variables        */
486
487         s4            predecessorcount;
488         s4            successorcount;
489         basicblock  **predecessors; /* array of predecessor basic blocks          */
490         basicblock  **successors;   /* array of successor basic blocks            */
491
492         branchref    *branchrefs;   /* list of branches to be patched             */
493
494         basicblock   *next;         /* used to build a BB list (instead of array) */
495         basicblock   *copied_to;    /* points to the copy of this basic block     */
496                                 /* when loop nodes are copied                 */
497         basicblock   *original;     /* block of which this block is a clone       */
498                                     /* NULL for the original block itself         */
499         methodinfo   *method;       /* method this block belongs to               */
500         insinfo_inline *inlineinfo; /* inlineinfo for the start of this block     */
501
502         s4            mpc;          /* machine code pc at start of block          */
503 };
504
505
506 /* Macro for initializing newly allocated basic block's. It does not
507    need to zero fields, as we zero out the whole basic block array. */
508
509 #define BASICBLOCK_INIT(bptr,m)                        \
510         do {                                               \
511                 bptr->mpc    = -1;                             \
512                 bptr->flags  = -1;                             \
513                 bptr->type   = BBTYPE_STD;                     \
514                 bptr->method = (m);                            \
515         } while (0)
516                         
517
518 /* data-flow constants for the ICMD table ************************************/
519
520 #define DF_0_TO_0      0
521 #define DF_1_TO_0      1
522 #define DF_2_TO_0      2
523 #define DF_3_TO_0      3
524
525 #define DF_DST_BASE    4      /* from this value on, iptr->dst is a variable */
526
527 #define DF_0_TO_1      (DF_DST_BASE + 0)
528 #define DF_1_TO_1      (DF_DST_BASE + 1)
529 #define DF_2_TO_1      (DF_DST_BASE + 2)
530 #define DF_3_TO_1      (DF_DST_BASE + 3)
531 #define DF_N_TO_1      (DF_DST_BASE + 4)
532
533 #define DF_INVOKE      (DF_DST_BASE + 5)
534 #define DF_BUILTIN     (DF_DST_BASE + 6)
535
536 #define DF_COPY        (DF_DST_BASE + 7)
537 #define DF_MOVE        (DF_DST_BASE + 8)
538
539 #define DF_DUP         -1
540 #define DF_DUP_X1      -1
541 #define DF_DUP_X2      -1
542 #define DF_DUP2        -1
543 #define DF_DUP2_X1     -1
544 #define DF_DUP2_X2     -1
545 #define DF_SWAP        -1
546
547 /* special data-flow recognized by verify/generate.pl: */
548 #define DF_LOAD        DF_COPY
549 #define DF_STORE       DF_MOVE
550 #define DF_IINC        DF_1_TO_1
551 #define DF_POP         DF_1_TO_0
552 #define DF_POP2        DF_2_TO_0
553
554
555 /* control-flow constants for the ICMD table *********************************/
556
557 #define CF_NORMAL      0
558 #define CF_IF          1
559
560 #define CF_END_BASE    2  /* from here on, they mark the end of a superblock */
561
562 #define CF_END         (CF_END_BASE + 0)
563 #define CF_GOTO        (CF_END_BASE + 1)
564 #define CF_TABLE       (CF_END_BASE + 2)
565 #define CF_LOOKUP      (CF_END_BASE + 3)
566 #define CF_JSR         (CF_END_BASE + 4)
567 #define CF_RET         (CF_END_BASE + 5)
568
569
570 /* flag constants for the ICMD table *****************************************/
571
572 #define ICMDTABLE_PEI    0x0001               /* ICMD may throw an exception */
573 #define ICMDTABLE_CALLS  0x0002     /* needs registers to be saved, may call */
574
575
576 /* ICMD table entry **********************************************************/
577
578 typedef struct icmdtable_entry_t icmdtable_entry_t;
579
580 struct icmdtable_entry_t {
581 #if !defined(NDEBUG)
582         char *name;                                /* name, without ICMD_ prefix */
583 #endif
584         s4    dataflow;                             /* a DF_ constant, see above */
585         s4    controlflow;                          /* a CF_ constant, see above */
586         s4    flags;                        /* a combination of ICMDTABLE_ flags */
587 };
588
589
590 /* the ICMD table ************************************************************/
591
592 extern icmdtable_entry_t icmd_table[256];
593
594
595 /********** JavaVM operation codes (sorted) and instruction lengths ***********/
596
597 extern char *opcode_names[256];
598 extern int jcommandsize[256];
599 extern int stackreq[256];
600
601 #define JAVA_NOP               0
602 #define ICMD_NOP               0
603
604 #define JAVA_ACONST_NULL       1
605 #define ICMD_ACONST            1        /* val.a = constant                   */
606
607 #define JAVA_ICONST_M1         2
608 #define ICMD_CHECKNULL         2
609
610 #define JAVA_ICONST_0          3
611 #define ICMD_ICONST            3        /* val.i = constant                   */
612
613 #define JAVA_ICONST_1          4
614
615 #define JAVA_ICONST_2          5
616 #define ICMD_IDIVPOW2          5        /* val.i = constant                   */
617
618 #define JAVA_ICONST_3          6
619 #define ICMD_LDIVPOW2          6        /* val.l = constant                   */
620
621 #define JAVA_ICONST_4          7
622
623 #define JAVA_ICONST_5          8
624
625 #define JAVA_LCONST_0          9
626 #define ICMD_LCONST            9        /* val.l = constant                   */
627
628 #define JAVA_LCONST_1         10
629 #define ICMD_LCMPCONST        10        /* val.l = constant                   */
630
631 #define JAVA_FCONST_0         11
632 #define ICMD_FCONST           11        /* val.f = constant                   */
633
634 #define JAVA_FCONST_1         12
635
636 #define JAVA_FCONST_2         13
637
638 #define JAVA_DCONST_0         14
639 #define ICMD_DCONST           14        /* val.d = constant                   */
640
641 #define JAVA_DCONST_1         15
642 #define ICMD_COPY             15
643
644 #define JAVA_BIPUSH           16
645 #define ICMD_MOVE             16
646
647 #define JAVA_SIPUSH           17
648
649 #define JAVA_LDC1             18
650
651 #define JAVA_LDC2             19
652
653 #define JAVA_LDC2W            20
654
655                                             /* order of LOAD instructions must be */
656                                             /* equal to order of TYPE_* defines   */
657 #define JAVA_ILOAD            21
658 #define ICMD_ILOAD            21        /* op1 = local variable               */
659
660 #define JAVA_LLOAD            22
661 #define ICMD_LLOAD            22        /* op1 = local variable               */
662
663 #define JAVA_FLOAD            23
664 #define ICMD_FLOAD            23        /* op1 = local variable               */
665
666 #define JAVA_DLOAD            24
667 #define ICMD_DLOAD            24        /* op1 = local variable               */
668
669 #define JAVA_ALOAD            25
670 #define ICMD_ALOAD            25        /* op1 = local variable               */
671
672 #define JAVA_ILOAD_0          26
673 #define ICMD_IADDCONST        26        /* val.i = constant                   */
674
675 #define JAVA_ILOAD_1          27
676 #define ICMD_ISUBCONST        27        /* val.i = constant                   */
677
678 #define JAVA_ILOAD_2          28
679 #define ICMD_IMULCONST        28        /* val.i = constant                   */
680
681 #define JAVA_ILOAD_3          29
682 #define ICMD_IANDCONST        29        /* val.i = constant                   */
683
684 #define JAVA_LLOAD_0          30
685 #define ICMD_IORCONST         30        /* val.i = constant                   */
686
687 #define JAVA_LLOAD_1          31
688 #define ICMD_IXORCONST        31        /* val.i = constant                   */
689
690 #define JAVA_LLOAD_2          32
691 #define ICMD_ISHLCONST        32        /* val.i = constant                   */
692
693 #define JAVA_LLOAD_3          33
694 #define ICMD_ISHRCONST        33        /* val.i = constant                   */
695
696 #define JAVA_FLOAD_0          34
697 #define ICMD_IUSHRCONST       34        /* val.i = constant                   */
698
699 #define JAVA_FLOAD_1          35
700 #define ICMD_IREMPOW2         35        /* val.i = constant                   */
701
702 #define JAVA_FLOAD_2          36
703 #define ICMD_LADDCONST        36        /* val.l = constant                   */
704
705 #define JAVA_FLOAD_3          37
706 #define ICMD_LSUBCONST        37        /* val.l = constant                   */
707
708 #define JAVA_DLOAD_0          38
709 #define ICMD_LMULCONST        38        /* val.l = constant                   */
710
711 #define JAVA_DLOAD_1          39
712 #define ICMD_LANDCONST        39        /* val.l = constant                   */
713
714 #define JAVA_DLOAD_2          40
715 #define ICMD_LORCONST         40        /* val.l = constant                   */
716
717 #define JAVA_DLOAD_3          41
718 #define ICMD_LXORCONST        41        /* val.l = constant                   */
719
720 #define JAVA_ALOAD_0          42
721 #define ICMD_LSHLCONST        42        /* val.l = constant                   */
722
723 #define JAVA_ALOAD_1          43
724 #define ICMD_LSHRCONST        43        /* val.l = constant                   */
725
726 #define JAVA_ALOAD_2          44
727 #define ICMD_LUSHRCONST       44        /* val.l = constant                   */
728
729 #define JAVA_ALOAD_3          45
730 #define ICMD_LREMPOW2         45        /* val.l = constant                   */
731
732 #define JAVA_IALOAD           46
733 #define ICMD_IALOAD           46
734
735 #define JAVA_LALOAD           47
736 #define ICMD_LALOAD           47
737
738 #define JAVA_FALOAD           48
739 #define ICMD_FALOAD           48
740
741 #define JAVA_DALOAD           49
742 #define ICMD_DALOAD           49
743
744 #define JAVA_AALOAD           50
745 #define ICMD_AALOAD           50
746
747 #define JAVA_BALOAD           51
748 #define ICMD_BALOAD           51
749
750 #define JAVA_CALOAD           52
751 #define ICMD_CALOAD           52
752
753 #define JAVA_SALOAD           53
754 #define ICMD_SALOAD           53
755
756                                             /* order of STORE instructions must be*/
757                                             /* equal to order of TYPE_* defines   */
758 #define JAVA_ISTORE           54
759 #define ICMD_ISTORE           54        /* op1 = local variable               */
760
761 #define JAVA_LSTORE           55
762 #define ICMD_LSTORE           55        /* op1 = local variable               */
763
764 #define JAVA_FSTORE           56
765 #define ICMD_FSTORE           56        /* op1 = local variable               */
766
767 #define JAVA_DSTORE           57
768 #define ICMD_DSTORE           57        /* op1 = local variable               */
769
770 #define JAVA_ASTORE           58
771 #define ICMD_ASTORE           58        /* op1 = local variable               */
772
773 #define JAVA_ISTORE_0         59
774 #define ICMD_IF_LEQ           59        /* op1 = target JavaVM pc, val.l      */
775
776 #define JAVA_ISTORE_1         60
777 #define ICMD_IF_LNE           60        /* op1 = target JavaVM pc, val.l      */
778
779 #define JAVA_ISTORE_2         61
780 #define ICMD_IF_LLT           61        /* op1 = target JavaVM pc, val.l      */
781
782 #define JAVA_ISTORE_3         62
783 #define ICMD_IF_LGE           62        /* op1 = target JavaVM pc, val.l      */
784
785 #define JAVA_LSTORE_0         63
786 #define ICMD_IF_LGT           63        /* op1 = target JavaVM pc, val.l      */
787
788 #define JAVA_LSTORE_1         64
789 #define ICMD_IF_LLE           64        /* op1 = target JavaVM pc, val.l      */
790
791 #define JAVA_LSTORE_2         65
792 #define ICMD_IF_LCMPEQ        65        /* op1 = target JavaVM pc             */
793
794 #define JAVA_LSTORE_3         66
795 #define ICMD_IF_LCMPNE        66        /* op1 = target JavaVM pc             */
796
797 #define JAVA_FSTORE_0         67
798 #define ICMD_IF_LCMPLT        67        /* op1 = target JavaVM pc             */
799
800 #define JAVA_FSTORE_1         68
801 #define ICMD_IF_LCMPGE        68        /* op1 = target JavaVM pc             */
802
803 #define JAVA_FSTORE_2         69
804 #define ICMD_IF_LCMPGT        69        /* op1 = target JavaVM pc             */
805
806 #define JAVA_FSTORE_3         70
807 #define ICMD_IF_LCMPLE        70        /* op1 = target JavaVM pc             */
808
809 #define JAVA_DSTORE_0         71
810
811 #define JAVA_DSTORE_1         72
812
813 #define JAVA_DSTORE_2         73
814
815 #define JAVA_DSTORE_3         74
816
817 #define JAVA_ASTORE_0         75
818
819 #define JAVA_ASTORE_1         76
820
821 #define JAVA_ASTORE_2         77
822
823 #define JAVA_ASTORE_3         78
824
825 #define JAVA_IASTORE          79
826 #define ICMD_IASTORE          79
827
828 #define JAVA_LASTORE          80
829 #define ICMD_LASTORE          80
830
831 #define JAVA_FASTORE          81
832 #define ICMD_FASTORE          81
833
834 #define JAVA_DASTORE          82
835 #define ICMD_DASTORE          82
836
837 #define JAVA_AASTORE          83
838 #define ICMD_AASTORE          83
839
840 #define JAVA_BASTORE          84
841 #define ICMD_BASTORE          84
842
843 #define JAVA_CASTORE          85
844 #define ICMD_CASTORE          85
845
846 #define JAVA_SASTORE          86
847 #define ICMD_SASTORE          86
848
849 #define JAVA_POP              87
850 #define ICMD_POP              87
851
852 #define JAVA_POP2             88
853 #define ICMD_POP2             88
854
855 #define JAVA_DUP              89
856 #define ICMD_DUP              89
857
858 #define JAVA_DUP_X1           90
859 #define ICMD_DUP_X1           90
860
861 #define JAVA_DUP_X2           91
862 #define ICMD_DUP_X2           91
863
864 #define JAVA_DUP2             92
865 #define ICMD_DUP2             92
866
867 #define JAVA_DUP2_X1          93
868 #define ICMD_DUP2_X1          93
869
870 #define JAVA_DUP2_X2          94
871 #define ICMD_DUP2_X2          94
872
873 #define JAVA_SWAP             95
874 #define ICMD_SWAP             95
875
876 #define JAVA_IADD             96
877 #define ICMD_IADD             96
878
879 #define JAVA_LADD             97
880 #define ICMD_LADD             97
881
882 #define JAVA_FADD             98
883 #define ICMD_FADD             98
884
885 #define JAVA_DADD             99
886 #define ICMD_DADD             99
887
888 #define JAVA_ISUB             100
889 #define ICMD_ISUB             100
890
891 #define JAVA_LSUB             101
892 #define ICMD_LSUB             101
893
894 #define JAVA_FSUB             102
895 #define ICMD_FSUB             102
896
897 #define JAVA_DSUB             103
898 #define ICMD_DSUB             103
899
900 #define JAVA_IMUL             104
901 #define ICMD_IMUL             104
902
903 #define JAVA_LMUL             105
904 #define ICMD_LMUL             105
905
906 #define JAVA_FMUL             106
907 #define ICMD_FMUL             106
908
909 #define JAVA_DMUL             107
910 #define ICMD_DMUL             107
911
912 #define JAVA_IDIV             108
913 #define ICMD_IDIV             108
914
915 #define JAVA_LDIV             109
916 #define ICMD_LDIV             109
917
918 #define JAVA_FDIV             110
919 #define ICMD_FDIV             110
920
921 #define JAVA_DDIV             111
922 #define ICMD_DDIV             111
923
924 #define JAVA_IREM             112
925 #define ICMD_IREM             112
926
927 #define JAVA_LREM             113
928 #define ICMD_LREM             113
929
930 #define JAVA_FREM             114
931 #define ICMD_FREM             114
932
933 #define JAVA_DREM             115
934 #define ICMD_DREM             115
935
936 #define JAVA_INEG             116
937 #define ICMD_INEG             116
938
939 #define JAVA_LNEG             117
940 #define ICMD_LNEG             117
941
942 #define JAVA_FNEG             118
943 #define ICMD_FNEG             118
944
945 #define JAVA_DNEG             119
946 #define ICMD_DNEG             119
947
948 #define JAVA_ISHL             120
949 #define ICMD_ISHL             120
950
951 #define JAVA_LSHL             121
952 #define ICMD_LSHL             121
953
954 #define JAVA_ISHR             122
955 #define ICMD_ISHR             122
956
957 #define JAVA_LSHR             123
958 #define ICMD_LSHR             123
959
960 #define JAVA_IUSHR            124
961 #define ICMD_IUSHR            124
962
963 #define JAVA_LUSHR            125
964 #define ICMD_LUSHR            125
965
966 #define JAVA_IAND             126
967 #define ICMD_IAND             126
968
969 #define JAVA_LAND             127
970 #define ICMD_LAND             127
971
972 #define JAVA_IOR              128
973 #define ICMD_IOR              128
974
975 #define JAVA_LOR              129
976 #define ICMD_LOR              129
977
978 #define JAVA_IXOR             130
979 #define ICMD_IXOR             130
980
981 #define JAVA_LXOR             131
982 #define ICMD_LXOR             131
983
984 #define JAVA_IINC             132
985 #define ICMD_IINC             132   /* op1 = local variable, val.i = constant */
986
987 #define JAVA_I2L              133
988 #define ICMD_I2L              133
989
990 #define JAVA_I2F              134
991 #define ICMD_I2F              134
992
993 #define JAVA_I2D              135
994 #define ICMD_I2D              135
995
996 #define JAVA_L2I              136
997 #define ICMD_L2I              136
998
999 #define JAVA_L2F              137
1000 #define ICMD_L2F              137
1001
1002 #define JAVA_L2D              138
1003 #define ICMD_L2D              138
1004
1005 #define JAVA_F2I              139
1006 #define ICMD_F2I              139
1007
1008 #define JAVA_F2L              140
1009 #define ICMD_F2L              140
1010
1011 #define JAVA_F2D              141
1012 #define ICMD_F2D              141
1013
1014 #define JAVA_D2I              142
1015 #define ICMD_D2I              142
1016
1017 #define JAVA_D2L              143
1018 #define ICMD_D2L              143
1019
1020 #define JAVA_D2F              144
1021 #define ICMD_D2F              144
1022
1023 #define JAVA_INT2BYTE         145
1024 #define ICMD_INT2BYTE         145
1025
1026 #define JAVA_INT2CHAR         146
1027 #define ICMD_INT2CHAR         146
1028
1029 #define JAVA_INT2SHORT        147
1030 #define ICMD_INT2SHORT        147
1031
1032 #define JAVA_LCMP             148
1033 #define ICMD_LCMP             148
1034
1035 #define JAVA_FCMPL            149
1036 #define ICMD_FCMPL            149
1037
1038 #define JAVA_FCMPG            150
1039 #define ICMD_FCMPG            150
1040
1041 #define JAVA_DCMPL            151
1042 #define ICMD_DCMPL            151
1043
1044 #define JAVA_DCMPG            152
1045 #define ICMD_DCMPG            152
1046
1047 #define JAVA_IFEQ             153
1048 #define ICMD_IFEQ             153       /* op1 = target JavaVM pc, val.i      */
1049
1050 #define JAVA_IFNE             154
1051 #define ICMD_IFNE             154       /* op1 = target JavaVM pc, val.i      */
1052
1053 #define JAVA_IFLT             155
1054 #define ICMD_IFLT             155       /* op1 = target JavaVM pc, val.i      */
1055
1056 #define JAVA_IFGE             156
1057 #define ICMD_IFGE             156       /* op1 = target JavaVM pc, val.i      */
1058
1059 #define JAVA_IFGT             157
1060 #define ICMD_IFGT             157       /* op1 = target JavaVM pc, val.i      */
1061
1062 #define JAVA_IFLE             158
1063 #define ICMD_IFLE             158       /* op1 = target JavaVM pc, val.i      */
1064
1065 #define JAVA_IF_ICMPEQ        159
1066 #define ICMD_IF_ICMPEQ        159       /* op1 = target JavaVM pc             */
1067
1068 #define JAVA_IF_ICMPNE        160
1069 #define ICMD_IF_ICMPNE        160       /* op1 = target JavaVM pc             */
1070
1071 #define JAVA_IF_ICMPLT        161
1072 #define ICMD_IF_ICMPLT        161       /* op1 = target JavaVM pc             */
1073
1074 #define JAVA_IF_ICMPGE        162
1075 #define ICMD_IF_ICMPGE        162       /* op1 = target JavaVM pc             */
1076
1077 #define JAVA_IF_ICMPGT        163
1078 #define ICMD_IF_ICMPGT        163       /* op1 = target JavaVM pc             */
1079
1080 #define JAVA_IF_ICMPLE        164
1081 #define ICMD_IF_ICMPLE        164       /* op1 = target JavaVM pc             */
1082
1083 #define JAVA_IF_ACMPEQ        165
1084 #define ICMD_IF_ACMPEQ        165       /* op1 = target JavaVM pc             */
1085
1086 #define JAVA_IF_ACMPNE        166
1087 #define ICMD_IF_ACMPNE        166       /* op1 = target JavaVM pc             */
1088
1089 #define JAVA_GOTO             167
1090 #define ICMD_GOTO             167       /* op1 = target JavaVM pc             */
1091
1092 #define JAVA_JSR              168
1093 #define ICMD_JSR              168       /* op1 = target JavaVM pc             */
1094
1095 #define JAVA_RET              169
1096 #define ICMD_RET              169       /* op1 = local variable               */
1097
1098 #define JAVA_TABLESWITCH      170
1099 #define ICMD_TABLESWITCH      170       /* val.a = pointer to s4 table        */
1100                                         /* length must be computed            */
1101 #define JAVA_LOOKUPSWITCH     171
1102 #define ICMD_LOOKUPSWITCH     171       /* val.a = pointer to s4 table        */
1103                                         /* length must be computed            */
1104 #define JAVA_IRETURN          172
1105 #define ICMD_IRETURN          172
1106
1107 #define JAVA_LRETURN          173
1108 #define ICMD_LRETURN          173
1109
1110 #define JAVA_FRETURN          174
1111 #define ICMD_FRETURN          174
1112
1113 #define JAVA_DRETURN          175
1114 #define ICMD_DRETURN          175
1115
1116 #define JAVA_ARETURN          176
1117 #define ICMD_ARETURN          176
1118
1119 #define JAVA_RETURN           177
1120 #define ICMD_RETURN           177
1121
1122 #define JAVA_GETSTATIC        178
1123 #define ICMD_GETSTATIC        178       /* op1 = type, val.a = field address  */
1124
1125 #define JAVA_PUTSTATIC        179
1126 #define ICMD_PUTSTATIC        179       /* op1 = type, val.a = field address  */
1127
1128 #define JAVA_GETFIELD         180
1129 #define ICMD_GETFIELD         180       /* op1 = type, val.i = field offset   */
1130
1131 #define JAVA_PUTFIELD         181
1132 #define ICMD_PUTFIELD         181       /* op1 = type, val.i = field offset   */
1133
1134 #define JAVA_INVOKEVIRTUAL    182
1135 #define ICMD_INVOKEVIRTUAL    182       /* val.a = method info pointer        */
1136
1137 #define JAVA_INVOKESPECIAL    183
1138 #define ICMD_INVOKESPECIAL    183       /* val.a = method info pointer        */
1139
1140 #define JAVA_INVOKESTATIC     184
1141 #define ICMD_INVOKESTATIC     184       /* val.a = method info pointer        */
1142
1143 #define JAVA_INVOKEINTERFACE  185
1144 #define ICMD_INVOKEINTERFACE  185       /* val.a = method info pointer        */
1145
1146 /* UNDEF186 */
1147
1148 #define JAVA_NEW              187
1149 #define ICMD_NEW              187       /* op1 = 1, val.a = class pointer     */
1150
1151 #define JAVA_NEWARRAY         188
1152 #define ICMD_NEWARRAY         188       /* op1 = basic type                   */
1153
1154 #define JAVA_ANEWARRAY        189
1155 #define ICMD_ANEWARRAY        189       /* op1 = 0, val.a = array pointer     */
1156                                         /* op1 = 1, val.a = class pointer     */
1157 #define JAVA_ARRAYLENGTH      190
1158 #define ICMD_ARRAYLENGTH      190
1159
1160 #define JAVA_ATHROW           191
1161 #define ICMD_ATHROW           191
1162
1163 #define JAVA_CHECKCAST        192
1164 #define ICMD_CHECKCAST        192       /* op1 = 0, val.a = array pointer     */
1165                                         /* op1 = 1, val.a = class pointer     */
1166 #define JAVA_INSTANCEOF       193
1167 #define ICMD_INSTANCEOF       193       /* op1 = 0, val.a = array pointer     */
1168                                         /* op1 = 1, val.a = class pointer     */
1169 #define JAVA_MONITORENTER     194
1170 #define ICMD_MONITORENTER     194
1171
1172 #define JAVA_MONITOREXIT      195
1173 #define ICMD_MONITOREXIT      195
1174
1175 #define JAVA_WIDE             196
1176
1177 #define JAVA_MULTIANEWARRAY   197
1178 #define ICMD_MULTIANEWARRAY   197       /* op1 = dimension, val.a = array     */
1179                                         /* pointer                            */
1180 #define JAVA_IFNULL           198
1181 #define ICMD_IFNULL           198       /* op1 = target JavaVM pc             */
1182
1183 #define JAVA_IFNONNULL        199
1184 #define ICMD_IFNONNULL        199       /* op1 = target JavaVM pc             */
1185
1186 #define JAVA_GOTO_W           200
1187
1188 #define JAVA_JSR_W            201
1189
1190 #define JAVA_BREAKPOINT       202
1191
1192 /* UNDEF203 */
1193
1194 #define ICMD_IASTORECONST     204
1195 #define ICMD_LASTORECONST     205
1196 #define ICMD_FASTORECONST     206
1197 #define ICMD_DASTORECONST     207
1198 #define ICMD_AASTORECONST     208
1199 #define ICMD_BASTORECONST     209
1200 #define ICMD_CASTORECONST     210
1201 #define ICMD_SASTORECONST     211
1202
1203 #define ICMD_PUTSTATICCONST   212
1204 #define ICMD_PUTFIELDCONST    213
1205
1206 #define ICMD_IMULPOW2         214
1207 #define ICMD_LMULPOW2         215
1208
1209 #define ICMD_IF_FCMPEQ        216
1210 #define ICMD_IF_FCMPNE        217
1211
1212 #define ICMD_IF_FCMPL_LT      218
1213 #define ICMD_IF_FCMPL_GE      219
1214 #define ICMD_IF_FCMPL_GT      220
1215 #define ICMD_IF_FCMPL_LE      221
1216
1217 #define ICMD_IF_FCMPG_LT      222
1218 #define ICMD_IF_FCMPG_GE      223
1219 #define ICMD_IF_FCMPG_GT      224
1220 #define ICMD_IF_FCMPG_LE      225
1221
1222 #define ICMD_IF_DCMPEQ        226
1223 #define ICMD_IF_DCMPNE        227
1224
1225 #define ICMD_IF_DCMPL_LT      228
1226 #define ICMD_IF_DCMPL_GE      229
1227 #define ICMD_IF_DCMPL_GT      230
1228 #define ICMD_IF_DCMPL_LE      231
1229
1230 #define ICMD_IF_DCMPG_LT      232
1231 #define ICMD_IF_DCMPG_GE      233
1232 #define ICMD_IF_DCMPG_GT      234
1233 #define ICMD_IF_DCMPG_LE      235
1234
1235 #define ICMD_INLINE_START     251       /* instruction before inlined method  */
1236 #define ICMD_INLINE_END       252       /* instruction after inlined method   */
1237 #define ICMD_INLINE_BODY      253       /* start of inlined body              */
1238
1239 #define ICMD_BUILTIN          255       /* internal opcode                    */
1240
1241
1242 /***************************** register types *********************************/
1243
1244 #define REG_RES   0         /* reserved register for OS or code generator     */
1245 #define REG_RET   1         /* return value register                          */
1246 #define REG_EXC   2         /* exception value register                       */
1247 #define REG_SAV   3         /* (callee) saved register                        */
1248 #define REG_TMP   4         /* scratch temporary register (caller saved)      */
1249 #define REG_ARG   5         /* argument register (caller saved)               */
1250
1251 #define REG_END   -1        /* last entry in tables                           */
1252  
1253 #define PARAMMODE_NUMBERED  0 
1254 #define PARAMMODE_STUFFED   1
1255
1256
1257 /* function prototypes ********************************************************/
1258
1259 /* compiler initialisation */
1260 void jit_init(void);
1261
1262 /* compiler finalisation */
1263 void jit_close(void);
1264
1265 /* create a new jitdata */
1266 jitdata *jit_jitdata_new(methodinfo *m);
1267
1268 /* compile a method with jit compiler */
1269 u1 *jit_compile(methodinfo *m);
1270 u1 *jit_recompile(methodinfo *m);
1271
1272 void jit_invalidate_code(methodinfo *m);
1273 codeinfo *jit_get_current_code(methodinfo *m);
1274 void jit_request_optimization(methodinfo *m);
1275
1276 /* patch the method entrypoint */
1277 u1 *jit_asm_compile(methodinfo *m, u1 *mptr, u1 *sp, u1 *ra);
1278
1279 s4 jit_complement_condition(s4 opcode);
1280
1281 void jit_renumber_basicblocks(jitdata *jd);
1282 #if !defined(NDEBUG)
1283 void jit_check_basicblock_numbers(jitdata *jd);
1284 #endif
1285
1286 #endif /* _JIT_H */
1287
1288
1289 /*
1290  * These are local overrides for various environment variables in Emacs.
1291  * Please do not remove this and leave it at the end of the file, where
1292  * Emacs will automagically detect them.
1293  * ---------------------------------------------------------------------
1294  * Local variables:
1295  * mode: c
1296  * indent-tabs-mode: t
1297  * c-basic-offset: 4
1298  * tab-width: 4
1299  * End:
1300  * vim:noexpandtab:sw=4:ts=4:
1301  */