[WebAssembly] Add a EM_WEBASSEMBLY value, and several bits of code that use it.
[oota-llvm.git] / lib / Target / WebAssembly / WebAssemblyInstrControl.td
1 //===- WebAssemblyInstrControl.td-WebAssembly control-flow ------*- tablegen -*-
2 //
3 //                     The LLVM Compiler Infrastructure
4 //
5 // This file is distributed under the University of Illinois Open Source
6 // License. See LICENSE.TXT for details.
7 //
8 //===----------------------------------------------------------------------===//
9 ///
10 /// \file
11 /// \brief WebAssembly control-flow code-gen constructs.
12 ///
13 //===----------------------------------------------------------------------===//
14
15 let Defs = [ARGUMENTS] in {
16
17 let isBranch = 1, isTerminator = 1, hasCtrlDep = 1 in {
18 // The condition operand is a boolean value which WebAssembly represents as i32.
19 def BR_IF : I<(outs), (ins I32:$cond, bb_op:$dst),
20               [(brcond I32:$cond, bb:$dst)],
21                "br_if   \t$cond, $dst">;
22 let isCodeGenOnly = 1 in
23 def BR_UNLESS : I<(outs), (ins I32:$cond, bb_op:$dst), [],
24                    "br_unless\t$cond, $dst">;
25 let isBarrier = 1 in {
26 def BR   : I<(outs), (ins bb_op:$dst),
27              [(br bb:$dst)],
28              "br      \t$dst">;
29 } // isBarrier = 1
30 } // isBranch = 1, isTerminator = 1, hasCtrlDep = 1
31
32 } // Defs = [ARGUMENTS]
33
34 def : Pat<(brcond (i32 (setne I32:$cond, 0)), bb:$dst),
35           (BR_IF I32:$cond, bb_op:$dst)>;
36 def : Pat<(brcond (i32 (seteq I32:$cond, 0)), bb:$dst),
37           (BR_UNLESS I32:$cond, bb_op:$dst)>;
38
39 let Defs = [ARGUMENTS] in {
40
41 // TODO: SelectionDAG's lowering insists on using a pointer as the index for
42 // jump tables, so in practice we don't ever use TABLESWITCH_I64 in wasm32 mode
43 // currently.
44 // Set TSFlags{0} to 1 to indicate that the variable_ops are immediates.
45 // Set TSFlags{1} to 1 to indicate that the immediates represent labels.
46 let isTerminator = 1, hasCtrlDep = 1, isBarrier = 1 in {
47 def TABLESWITCH_I32 : I<(outs), (ins I32:$index, bb_op:$default, variable_ops),
48                         [(WebAssemblytableswitch I32:$index, bb:$default)],
49                         "tableswitch\t$index, $default"> {
50   let TSFlags{0} = 1;
51   let TSFlags{1} = 1;
52 }
53 def TABLESWITCH_I64 : I<(outs), (ins I64:$index, bb_op:$default, variable_ops),
54                         [(WebAssemblytableswitch I64:$index, bb:$default)],
55                         "tableswitch\t$index, $default"> {
56   let TSFlags{0} = 1;
57   let TSFlags{1} = 1;
58 }
59 } // isTerminator = 1, hasCtrlDep = 1, isBarrier = 1
60
61 // Placemarkers to indicate the start or end of a block or loop scope. These
62 // use/clobber EXPR_STACK to prevent them from being moved into the middle of
63 // an expression tree.
64 let Uses = [EXPR_STACK], Defs = [EXPR_STACK] in {
65 def BLOCK     : I<(outs), (ins), [], "block">;
66 def LOOP      : I<(outs), (ins), [], "loop">;
67 def END_BLOCK : I<(outs), (ins), [], "end_block">;
68 def END_LOOP  : I<(outs), (ins), [], "end_loop">;
69 } // Uses = [EXPR_STACK], Defs = [EXPR_STACK]
70
71 multiclass RETURN<WebAssemblyRegClass vt> {
72   def RETURN_#vt : I<(outs), (ins vt:$val), [(WebAssemblyreturn vt:$val)],
73                      "return  \t$val">;
74 }
75
76 let isTerminator = 1, hasCtrlDep = 1, isBarrier = 1 in {
77 let isReturn = 1 in {
78   defm : RETURN<I32>;
79   defm : RETURN<I64>;
80   defm : RETURN<F32>;
81   defm : RETURN<F64>;
82   def RETURN_VOID : I<(outs), (ins), [(WebAssemblyreturn)], "return">;
83 } // isReturn = 1
84   def UNREACHABLE : I<(outs), (ins), [(trap)], "unreachable">;
85 } // isTerminator = 1, hasCtrlDep = 1, isBarrier = 1
86
87 } // Defs = [ARGUMENTS]