[llvm] r194508 - [OCaml] Fix a typo

[Peter Zotov]

Author: whitequark
Date: Tue Nov 12 14:55:42 2013
New Revision: 194508

URL: http://llvm.org/viewvc/llvm-project?rev=194508&view=rev
Log:
[OCaml] Fix a typo

Modified:
    llvm/trunk/bindings/ocaml/llvm/llvm_ocaml.c

Modified: llvm/trunk/bindings/ocaml/llvm/llvm_ocaml.c
URL: http://llvm.org/viewvc/llvm-project/llvm/trunk/bindings/ocaml/llvm/llvm_ocaml.c?rev=194508&r1=194507&r2=194508&view=diff
==============================================================================
--- llvm/trunk/bindings/ocaml/llvm/llvm_ocaml.c (original)
+++ llvm/trunk/bindings/ocaml/llvm/llvm_ocaml.c Tue Nov 12 14:55:42 2013
@@ -528,14 +528,14 @@ CAMLprim value llvm_dump_value(LLVMValue
 }
 
 /* llvalue -> string */
-CAMLprim value llvm_string_of_llvalue(LLVMTypeRef M) {
-  char* TypeCStr;
-  TypeCStr = LLVMPrintValueToString(M);
+CAMLprim value llvm_string_of_llvalue(LLVMValueRef M) {
+  char* ValueCStr;
+  ValueCStr = LLVMPrintValueToString(M);
 
-  value TypeStr = caml_copy_string(TypeCStr);
-  LLVMDisposeMessage(TypeCStr);
+  value ValueStr = caml_copy_string(ValueCStr);
+  LLVMDisposeMessage(ValueCStr);
 
-  return TypeStr;
+  return ValueStr;
 }
 
 /* llvalue -> llvalue -> unit */