summaryrefslogtreecommitdiff
path: root/MLKLLVMCompiler.mm
diff options
context:
space:
mode:
authorMatthias Andreas Benkard <matthias@benkard.de>2008-08-17 12:12:30 +0200
committerMatthias Andreas Benkard <matthias@benkard.de>2008-08-17 12:13:44 +0200
commit68ce22adad85ff1ea04455b466f656ea6b175a5f (patch)
tree904def9f124732265b09fe6b7b8bc827952ebc66 /MLKLLVMCompiler.mm
parentf24c4a95ab655cf47bcea1a2f20b6a1f76329c68 (diff)
LLVM compiler: Implement QUOTE.
Diffstat (limited to 'MLKLLVMCompiler.mm')
-rw-r--r--MLKLLVMCompiler.mm11
1 files changed, 11 insertions, 0 deletions
diff --git a/MLKLLVMCompiler.mm b/MLKLLVMCompiler.mm
index 3b011d5..7767d48 100644
--- a/MLKLLVMCompiler.mm
+++ b/MLKLLVMCompiler.mm
@@ -601,3 +601,14 @@ static Constant
return value;
}
@end
+
+
+@implementation MLKQuoteForm (MLKLLVMCompilation)
+-(Value *) processForLLVM
+{
+ return builder.CreateIntToPtr (ConstantInt::get(Type::Int64Ty,
+ (uint64_t)_quotedData,
+ false),
+ PointerTy);
+}
+@end