X-Git-Url: http://plrg.eecs.uci.edu/git/?p=oota-llvm.git;a=blobdiff_plain;f=include%2Fllvm%2FCallingConv.h;h=8b6a01a0cf5605d0d0e3c4baea5994d048ae1ed6;hp=bb76defc26614bcde989091a00cd54fbbeb6033a;hb=572742e876478d3ec7ff0750c0473d7621804b15;hpb=9bb06810289a8a4281e49130b64cb1d57b1960f4

diff --git a/include/llvm/CallingConv.h b/include/llvm/CallingConv.h
index bb76defc266..8b6a01a0cf5 100644
--- a/include/llvm/CallingConv.h
+++ b/include/llvm/CallingConv.h
@@ -57,7 +57,12 @@ namespace CallingConv {
     /// X86_FastCall - 'fast' analog of X86_StdCall. Passes first two arguments
     /// in ECX:EDX registers, others - via stack. Callee is responsible for
     /// stack cleaning.
-    X86_FastCall = 65
+    X86_FastCall = 65,
+
+    /// X86_Ocaml - This is a weird ABI used by Objective Caml. Formally, it
+    /// supports only one to six integer/address arguments, all in-reg. It also
+    /// supports tail call emission.
+    X86_Ocaml = 66
   };
 } // End CallingConv namespace