From 7682c4ceab935d39aafac369c9b110b658b1e575 Mon Sep 17 00:00:00 2001 From: David Robillard Date: Tue, 7 Dec 2010 23:21:08 +0000 Subject: Saner recursive descent lexer/parser. git-svn-id: http://svn.drobilla.net/resp/resp@306 ad02d1e2-f140-0410-9f75-f8b11f17cedd --- src/llvm.cpp | 5 ----- 1 file changed, 5 deletions(-) (limited to 'src/llvm.cpp') diff --git a/src/llvm.cpp b/src/llvm.cpp index b03713d..bc90977 100644 --- a/src/llvm.cpp +++ b/src/llvm.cpp @@ -96,7 +96,6 @@ struct LLVMEngine : public Engine { if (t->head()->str() == "Float") return Type::getFloatTy(context); if (t->head()->str() == "String") return PointerType::get(Type::getInt8Ty(context), NULL); if (t->head()->str() == "Quote") return PointerType::get(Type::getInt8Ty(context), NULL); - if (t->head()->str() == "Lexeme") return PointerType::get(Type::getInt8Ty(context), NULL); throw Error(t->loc, string("Unknown primitive type `") + t->str() + "'"); } else if (t->kind == AType::EXPR && t->head()->str() == "Fn") { AType::const_iterator i = t->begin(); @@ -260,10 +259,6 @@ struct LLVMEngine : public Engine { } } ss << "\""; - } else if (retT->head()->str() == "Lexeme") { - ss << ((char* (*)())fp)(); - } else if (retT->head()->str() == "Quote") { - ss << "(quote " << ((char* (*)())fp)() << ")"; } else if (t != Type::getVoidTy(context)) { ss << ((void* (*)())fp)(); } else { -- cgit v1.2.1