LLParser.cpp revision f570e621ab6eec6c7656cc4c511e19aba12b42cd
1df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner//===-- LLParser.cpp - Parser Class ---------------------------------------===// 2df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner// 3df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner// The LLVM Compiler Infrastructure 4df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner// 5df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner// This file is distributed under the University of Illinois Open Source 6df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner// License. See LICENSE.TXT for details. 7df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner// 8df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner//===----------------------------------------------------------------------===// 9df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner// 10df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner// This file defines the parser class for .ll files. 11df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner// 12df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner//===----------------------------------------------------------------------===// 13df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 14df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner#include "LLParser.h" 15df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner#include "llvm/AutoUpgrade.h" 16df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner#include "llvm/CallingConv.h" 17df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner#include "llvm/Constants.h" 18df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner#include "llvm/DerivedTypes.h" 19df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner#include "llvm/InlineAsm.h" 20df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner#include "llvm/Instructions.h" 21df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner#include "llvm/Module.h" 22df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner#include "llvm/ValueSymbolTable.h" 23df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner#include "llvm/ADT/SmallPtrSet.h" 24df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner#include "llvm/ADT/StringExtras.h" 25df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner#include "llvm/Support/raw_ostream.h" 26df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerusing namespace llvm; 27df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 28df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnernamespace llvm { 293ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner /// ValID - Represents a reference of a definition of some sort with no type. 303ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner /// There are several cases where we have to parse the value but where the 313ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner /// type can depend on later context. This may either be a numeric reference 323ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner /// or a symbolic (%var) reference. This is just a discriminated union. 33df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner struct ValID { 34df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner enum { 35df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner t_LocalID, t_GlobalID, // ID in UIntVal. 36df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner t_LocalName, t_GlobalName, // Name in StrVal. 37df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner t_APSInt, t_APFloat, // Value in APSIntVal/APFloatVal. 38df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner t_Null, t_Undef, t_Zero, // No value. 39081b505f77b183b7b029818218245cf4986e8948Chris Lattner t_EmptyArray, // No value: [] 40df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner t_Constant, // Value in ConstantVal. 41df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner t_InlineAsm // Value in StrVal/StrVal2/UIntVal. 42df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } Kind; 43df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 44df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LLParser::LocTy Loc; 45df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned UIntVal; 46df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner std::string StrVal, StrVal2; 47df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner APSInt APSIntVal; 48df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner APFloat APFloatVal; 49df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Constant *ConstantVal; 50df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ValID() : APFloatVal(0.0) {} 51df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner }; 52df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 53df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 543ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner/// Run: module ::= toplevelentity* 55ad7d1e2085a489dbedc65b99bab811771ead1aabChris Lattnerbool LLParser::Run() { 563ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner // Prime the lexer. 573ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner Lex.Lex(); 583ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner 59ad7d1e2085a489dbedc65b99bab811771ead1aabChris Lattner return ParseTopLevelEntities() || 60ad7d1e2085a489dbedc65b99bab811771ead1aabChris Lattner ValidateEndOfModule(); 61df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 62df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 63df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ValidateEndOfModule - Do final validity and sanity checks at the end of the 64df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// module. 65df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ValidateEndOfModule() { 66df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!ForwardRefTypes.empty()) 67df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ForwardRefTypes.begin()->second.second, 68df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner "use of undefined type named '" + 69df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ForwardRefTypes.begin()->first + "'"); 70df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!ForwardRefTypeIDs.empty()) 71df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ForwardRefTypeIDs.begin()->second.second, 72df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner "use of undefined type '%" + 73df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner utostr(ForwardRefTypeIDs.begin()->first) + "'"); 74df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 75df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!ForwardRefVals.empty()) 76df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ForwardRefVals.begin()->second.second, 77df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner "use of undefined value '@" + ForwardRefVals.begin()->first + 78df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner "'"); 79df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 80df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!ForwardRefValIDs.empty()) 81df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ForwardRefValIDs.begin()->second.second, 82df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner "use of undefined value '@" + 83df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner utostr(ForwardRefValIDs.begin()->first) + "'"); 84df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 85df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Look for intrinsic functions and CallInst that need to be upgraded 86df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner for (Module::iterator FI = M->begin(), FE = M->end(); FI != FE; ) 87df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner UpgradeCallsToIntrinsic(FI++); // must be post-increment, as we remove 88df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 89df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 90df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 91df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 92df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner//===----------------------------------------------------------------------===// 93df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner// Top-Level Entities 94df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner//===----------------------------------------------------------------------===// 95df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 96df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseTopLevelEntities() { 97df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner while (1) { 98df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner switch (Lex.getKind()) { 99df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner default: return TokError("expected top-level entity"); 100df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::Eof: return false; 101df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner //case lltok::kw_define: 102df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_declare: if (ParseDeclare()) return true; break; 103df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_define: if (ParseDefine()) return true; break; 104df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_module: if (ParseModuleAsm()) return true; break; 105df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_target: if (ParseTargetDefinition()) return true; break; 106df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_deplibs: if (ParseDepLibs()) return true; break; 107df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_type: if (ParseUnnamedType()) return true; break; 108df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::StringConstant: // FIXME: REMOVE IN LLVM 3.0 109df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::LocalVar: if (ParseNamedType()) return true; break; 110df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::GlobalVar: if (ParseNamedGlobal()) return true; break; 111df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 112df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // The Global variable production with no name can have many different 113df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // optional leading prefixes, the production is: 114df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // GlobalVar ::= OptionalLinkage OptionalVisibility OptionalThreadLocal 115df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // OptionalAddrSpace ('constant'|'global') ... 116bb46f52027416598a662dc1c58f48d9d56b1a65bRafael Espindola case lltok::kw_private: // OptionalLinkage 117df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_internal: // OptionalLinkage 118df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_weak: // OptionalLinkage 119df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_linkonce: // OptionalLinkage 120df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_appending: // OptionalLinkage 121df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_dllexport: // OptionalLinkage 122df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_common: // OptionalLinkage 123df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_dllimport: // OptionalLinkage 124df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_extern_weak: // OptionalLinkage 125df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_external: { // OptionalLinkage 126df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned Linkage, Visibility; 127df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseOptionalLinkage(Linkage) || 128df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseOptionalVisibility(Visibility) || 129df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseGlobal("", 0, Linkage, true, Visibility)) 130df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 131df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner break; 132df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 133df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_default: // OptionalVisibility 134df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_hidden: // OptionalVisibility 135df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_protected: { // OptionalVisibility 136df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned Visibility; 137df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseOptionalVisibility(Visibility) || 138df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseGlobal("", 0, 0, false, Visibility)) 139df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 140df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner break; 141df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 142df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 143df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_thread_local: // OptionalThreadLocal 144df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_addrspace: // OptionalAddrSpace 145df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_constant: // GlobalType 146df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_global: // GlobalType 147df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseGlobal("", 0, 0, false, 0)) return true; 148df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner break; 149df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 150df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 151df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 152df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 153df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 154df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// toplevelentity 155df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'module' 'asm' STRINGCONSTANT 156df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseModuleAsm() { 157df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner assert(Lex.getKind() == lltok::kw_module); 158df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 159df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1603ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner std::string AsmStr; 1613ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner if (ParseToken(lltok::kw_asm, "expected 'module asm'") || 1623ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner ParseStringConstant(AsmStr)) return true; 163df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 164df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner const std::string &AsmSoFar = M->getModuleInlineAsm(); 165df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (AsmSoFar.empty()) 1663ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner M->setModuleInlineAsm(AsmStr); 167df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner else 1683ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner M->setModuleInlineAsm(AsmSoFar+"\n"+AsmStr); 169df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 170df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 171df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 172df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// toplevelentity 173df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'target' 'triple' '=' STRINGCONSTANT 174df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'target' 'datalayout' '=' STRINGCONSTANT 175df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseTargetDefinition() { 176df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner assert(Lex.getKind() == lltok::kw_target); 1773ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner std::string Str; 178df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner switch (Lex.Lex()) { 179df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner default: return TokError("unknown target property"); 180df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_triple: 181df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 1823ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner if (ParseToken(lltok::equal, "expected '=' after target triple") || 1833ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner ParseStringConstant(Str)) 184df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 1853ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner M->setTargetTriple(Str); 186df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 187df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_datalayout: 188df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 1893ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner if (ParseToken(lltok::equal, "expected '=' after target datalayout") || 1903ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner ParseStringConstant(Str)) 191df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 1923ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner M->setDataLayout(Str); 193df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 194df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 195df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 196df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 197df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// toplevelentity 198df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'deplibs' '=' '[' ']' 199df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'deplibs' '=' '[' STRINGCONSTANT (',' STRINGCONSTANT)* ']' 200df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseDepLibs() { 201df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner assert(Lex.getKind() == lltok::kw_deplibs); 2023ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner Lex.Lex(); 2033ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner if (ParseToken(lltok::equal, "expected '=' after deplibs") || 2043ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner ParseToken(lltok::lsquare, "expected '=' after deplibs")) 2053ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner return true; 206df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2073ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner if (EatIfPresent(lltok::rsquare)) 208df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 209df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2103ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner std::string Str; 2113ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner if (ParseStringConstant(Str)) return true; 2123ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner M->addLibrary(Str); 213df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2143ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner while (EatIfPresent(lltok::comma)) { 2153ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner if (ParseStringConstant(Str)) return true; 2163ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner M->addLibrary(Str); 217df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 218df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2193ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner return ParseToken(lltok::rsquare, "expected ']' at end of list"); 220df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 221df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 222df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// toplevelentity 223df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'type' type 224df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseUnnamedType() { 225df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner assert(Lex.getKind() == lltok::kw_type); 226df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy TypeLoc = Lex.getLoc(); 227df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); // eat kw_type 228df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 229df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner PATypeHolder Ty(Type::VoidTy); 230df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseType(Ty)) return true; 231df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 232df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned TypeID = NumberedTypes.size(); 233df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 234df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // We don't allow assigning names to void type 235df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Ty == Type::VoidTy) 236df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(TypeLoc, "can't assign name to the void type"); 237df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 238df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // See if this type was previously referenced. 239df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner std::map<unsigned, std::pair<PATypeHolder, LocTy> >::iterator 240df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner FI = ForwardRefTypeIDs.find(TypeID); 241df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (FI != ForwardRefTypeIDs.end()) { 242c38daba25b66f9a0386fc28861db66e62663310dChris Lattner if (FI->second.first.get() == Ty) 243c38daba25b66f9a0386fc28861db66e62663310dChris Lattner return Error(TypeLoc, "self referential type is invalid"); 244c38daba25b66f9a0386fc28861db66e62663310dChris Lattner 245df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner cast<DerivedType>(FI->second.first.get())->refineAbstractTypeTo(Ty); 246df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Ty = FI->second.first.get(); 247df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ForwardRefTypeIDs.erase(FI); 248df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 249df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 250df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner NumberedTypes.push_back(Ty); 251df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 252df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 253df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 254df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 255df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// toplevelentity 256df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= LocalVar '=' 'type' type 257df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseNamedType() { 258df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner std::string Name = Lex.getStrVal(); 259df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy NameLoc = Lex.getLoc(); 2603ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner Lex.Lex(); // eat LocalVar. 261df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 262df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner PATypeHolder Ty(Type::VoidTy); 2633ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner 2643ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner if (ParseToken(lltok::equal, "expected '=' after name") || 2653ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner ParseToken(lltok::kw_type, "expected 'type' after name") || 2663ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner ParseType(Ty)) 2673ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner return true; 268df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 269df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // We don't allow assigning names to void type 270df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Ty == Type::VoidTy) 271df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(NameLoc, "can't assign name '" + Name + "' to the void type"); 272df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 273df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Set the type name, checking for conflicts as we do so. 274df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner bool AlreadyExists = M->addTypeName(Name, Ty); 275df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!AlreadyExists) return false; 276df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 277df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // See if this type is a forward reference. We need to eagerly resolve 278df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // types to allow recursive type redefinitions below. 279df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner std::map<std::string, std::pair<PATypeHolder, LocTy> >::iterator 280df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner FI = ForwardRefTypes.find(Name); 281df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (FI != ForwardRefTypes.end()) { 282c38daba25b66f9a0386fc28861db66e62663310dChris Lattner if (FI->second.first.get() == Ty) 283c38daba25b66f9a0386fc28861db66e62663310dChris Lattner return Error(NameLoc, "self referential type is invalid"); 284c38daba25b66f9a0386fc28861db66e62663310dChris Lattner 285df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner cast<DerivedType>(FI->second.first.get())->refineAbstractTypeTo(Ty); 286df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Ty = FI->second.first.get(); 287df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ForwardRefTypes.erase(FI); 288df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 289df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 290df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Inserting a name that is already defined, get the existing name. 291df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner const Type *Existing = M->getTypeByName(Name); 292df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner assert(Existing && "Conflict but no matching type?!"); 293df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 294df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Otherwise, this is an attempt to redefine a type. That's okay if 295df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // the redefinition is identical to the original. 296df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // FIXME: REMOVE REDEFINITIONS IN LLVM 3.0 297df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Existing == Ty) return false; 298df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 299df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Any other kind of (non-equivalent) redefinition is an error. 300df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(NameLoc, "redefinition of type named '" + Name + "' of type '" + 301df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Ty->getDescription() + "'"); 302df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 303df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 304df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 305df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// toplevelentity 306df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'declare' FunctionHeader 307df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseDeclare() { 308df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner assert(Lex.getKind() == lltok::kw_declare); 309df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 310df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 311df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Function *F; 312df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return ParseFunctionHeader(F, false); 313df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 314df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 315df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// toplevelentity 316df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'define' FunctionHeader '{' ... 317df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseDefine() { 318df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner assert(Lex.getKind() == lltok::kw_define); 319df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 320df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 321df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Function *F; 3223ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner return ParseFunctionHeader(F, true) || 3233ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner ParseFunctionBody(*F); 324df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 325df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 3263ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner/// ParseGlobalType 3273ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner/// ::= 'constant' 3283ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner/// ::= 'global' 329df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseGlobalType(bool &IsConstant) { 330df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Lex.getKind() == lltok::kw_constant) 331df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner IsConstant = true; 332df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner else if (Lex.getKind() == lltok::kw_global) 333df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner IsConstant = false; 33435b5107951582f58bf9d6f786fdddbf7811420fdDuncan Sands else { 33535b5107951582f58bf9d6f786fdddbf7811420fdDuncan Sands IsConstant = false; 336df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return TokError("expected 'global' or 'constant'"); 33735b5107951582f58bf9d6f786fdddbf7811420fdDuncan Sands } 338df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 339df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 340df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 341df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 342df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseNamedGlobal: 343df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// GlobalVar '=' OptionalVisibility ALIAS ... 344df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// GlobalVar '=' OptionalLinkage OptionalVisibility ... -> global variable 345df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseNamedGlobal() { 346df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner assert(Lex.getKind() == lltok::GlobalVar); 347df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy NameLoc = Lex.getLoc(); 348df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner std::string Name = Lex.getStrVal(); 349df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 350df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 351df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner bool HasLinkage; 352df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned Linkage, Visibility; 353df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseToken(lltok::equal, "expected '=' in global variable") || 354df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseOptionalLinkage(Linkage, HasLinkage) || 355df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseOptionalVisibility(Visibility)) 356df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 357df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 358df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (HasLinkage || Lex.getKind() != lltok::kw_alias) 359df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return ParseGlobal(Name, NameLoc, Linkage, HasLinkage, Visibility); 360df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return ParseAlias(Name, NameLoc, Visibility); 361df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 362df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 363df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseAlias: 364df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= GlobalVar '=' OptionalVisibility 'alias' OptionalLinkage Aliasee 365df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// Aliasee 366df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= TypeAndValue | 'bitcast' '(' TypeAndValue 'to' Type ')' 367df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// 368df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// Everything through visibility has already been parsed. 369df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// 370df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseAlias(const std::string &Name, LocTy NameLoc, 371df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned Visibility) { 372df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner assert(Lex.getKind() == lltok::kw_alias); 373df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 374df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned Linkage; 375df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy LinkageLoc = Lex.getLoc(); 376df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseOptionalLinkage(Linkage)) 377df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 378df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 379df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Linkage != GlobalValue::ExternalLinkage && 380df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Linkage != GlobalValue::WeakLinkage && 381bb46f52027416598a662dc1c58f48d9d56b1a65bRafael Espindola Linkage != GlobalValue::InternalLinkage && 382bb46f52027416598a662dc1c58f48d9d56b1a65bRafael Espindola Linkage != GlobalValue::PrivateLinkage) 383df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(LinkageLoc, "invalid linkage type for alias"); 384df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 385df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Constant *Aliasee; 386df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy AliaseeLoc = Lex.getLoc(); 387df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Lex.getKind() != lltok::kw_bitcast) { 388df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseGlobalTypeAndValue(Aliasee)) return true; 389df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } else { 390df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // The bitcast dest type is not present, it is implied by the dest type. 391df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ValID ID; 392df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseValID(ID)) return true; 393df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ID.Kind != ValID::t_Constant) 394df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(AliaseeLoc, "invalid aliasee"); 395df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Aliasee = ID.ConstantVal; 396df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 397df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 398df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!isa<PointerType>(Aliasee->getType())) 399df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(AliaseeLoc, "alias must have pointer type"); 400df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 401df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Okay, create the alias but do not insert it into the module yet. 402df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner GlobalAlias* GA = new GlobalAlias(Aliasee->getType(), 403df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner (GlobalValue::LinkageTypes)Linkage, Name, 404df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Aliasee); 405df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner GA->setVisibility((GlobalValue::VisibilityTypes)Visibility); 406df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 407df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // See if this value already exists in the symbol table. If so, it is either 408df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // a redefinition or a definition of a forward reference. 409df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (GlobalValue *Val = 410df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner cast_or_null<GlobalValue>(M->getValueSymbolTable().lookup(Name))) { 411df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // See if this was a redefinition. If so, there is no entry in 412df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // ForwardRefVals. 413df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner std::map<std::string, std::pair<GlobalValue*, LocTy> >::iterator 414df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner I = ForwardRefVals.find(Name); 415df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (I == ForwardRefVals.end()) 416df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(NameLoc, "redefinition of global named '@" + Name + "'"); 417df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 418df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Otherwise, this was a definition of forward ref. Verify that types 419df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // agree. 420df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Val->getType() != GA->getType()) 421df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(NameLoc, 422df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner "forward reference and definition of alias have different types"); 423df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 424df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // If they agree, just RAUW the old value with the alias and remove the 425df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // forward ref info. 426df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Val->replaceAllUsesWith(GA); 427df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Val->eraseFromParent(); 428df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ForwardRefVals.erase(I); 429df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 430df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 431df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Insert into the module, we know its name won't collide now. 432df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner M->getAliasList().push_back(GA); 433df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner assert(GA->getNameStr() == Name && "Should not be a name conflict!"); 434df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 435df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 436df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 437df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 438df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseGlobal 439df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= GlobalVar '=' OptionalLinkage OptionalVisibility OptionalThreadLocal 440df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// OptionalAddrSpace GlobalType Type Const 441df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= OptionalLinkage OptionalVisibility OptionalThreadLocal 442df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// OptionalAddrSpace GlobalType Type Const 443df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// 444df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// Everything through visibility has been parsed already. 445df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// 446df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseGlobal(const std::string &Name, LocTy NameLoc, 447df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned Linkage, bool HasLinkage, 448df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned Visibility) { 449df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned AddrSpace; 450df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner bool ThreadLocal, IsConstant; 451df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy TyLoc; 452df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 453df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner PATypeHolder Ty(Type::VoidTy); 454df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseOptionalToken(lltok::kw_thread_local, ThreadLocal) || 455df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseOptionalAddrSpace(AddrSpace) || 456df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseGlobalType(IsConstant) || 457df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseType(Ty, TyLoc)) 458df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 459df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 460df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // If the linkage is specified and is external, then no initializer is 461df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // present. 462df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Constant *Init = 0; 463df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!HasLinkage || (Linkage != GlobalValue::DLLImportLinkage && 464df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Linkage != GlobalValue::ExternalWeakLinkage && 465df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Linkage != GlobalValue::ExternalLinkage)) { 466df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseGlobalValue(Ty, Init)) 467df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 468df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 469df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 470b4bd16fc5e3dd416cf68e73cff93544d364159d6Chris Lattner if (isa<FunctionType>(Ty) || Ty == Type::LabelTy || Ty == Type::VoidTy) 4714a2f112a5c774cb1ab3fd890a88ba1db9709f561Chris Lattner return Error(TyLoc, "invalid type for global variable"); 472df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 473df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner GlobalVariable *GV = 0; 474df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 475df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // See if the global was forward referenced, if so, use the global. 47691dad87ddc1e69ac5fa8953a583de4185e1dd0d7Chris Lattner if (!Name.empty()) { 47791dad87ddc1e69ac5fa8953a583de4185e1dd0d7Chris Lattner if ((GV = M->getGlobalVariable(Name, true)) && 47891dad87ddc1e69ac5fa8953a583de4185e1dd0d7Chris Lattner !ForwardRefVals.erase(Name)) 479df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(NameLoc, "redefinition of global '@" + Name + "'"); 480df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } else { 481df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner std::map<unsigned, std::pair<GlobalValue*, LocTy> >::iterator 482df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner I = ForwardRefValIDs.find(NumberedVals.size()); 483df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (I != ForwardRefValIDs.end()) { 484df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner GV = cast<GlobalVariable>(I->second.first); 485df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ForwardRefValIDs.erase(I); 486df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 487df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 488df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 489df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (GV == 0) { 490df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner GV = new GlobalVariable(Ty, false, GlobalValue::ExternalLinkage, 0, Name, 491df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner M, false, AddrSpace); 492df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } else { 493df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (GV->getType()->getElementType() != Ty) 494df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(TyLoc, 495df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner "forward reference and definition of global have different types"); 496df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 497df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Move the forward-reference to the correct spot in the module. 498df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner M->getGlobalList().splice(M->global_end(), M->getGlobalList(), GV); 499df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 500df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 501df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Name.empty()) 502df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner NumberedVals.push_back(GV); 503df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 504df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Set the parsed properties on the global. 505df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Init) 506df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner GV->setInitializer(Init); 507df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner GV->setConstant(IsConstant); 508df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner GV->setLinkage((GlobalValue::LinkageTypes)Linkage); 509df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner GV->setVisibility((GlobalValue::VisibilityTypes)Visibility); 510df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner GV->setThreadLocal(ThreadLocal); 511df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 512df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Parse attributes on the global. 513df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner while (Lex.getKind() == lltok::comma) { 514df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 515df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 516df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Lex.getKind() == lltok::kw_section) { 517df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 518df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner GV->setSection(Lex.getStrVal()); 519df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseToken(lltok::StringConstant, "expected global section string")) 520df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 521df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } else if (Lex.getKind() == lltok::kw_align) { 522df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned Alignment; 523df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseOptionalAlignment(Alignment)) return true; 524df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner GV->setAlignment(Alignment); 525df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } else { 526df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner TokError("unknown global variable property!"); 527df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 528df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 529df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 530df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 531df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 532df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 533df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 534df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner//===----------------------------------------------------------------------===// 535df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner// GlobalValue Reference/Resolution Routines. 536df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner//===----------------------------------------------------------------------===// 537df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 538df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// GetGlobalVal - Get a value with the specified name or ID, creating a 539df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// forward reference record if needed. This can return null if the value 540df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// exists but does not have the right type. 541df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris LattnerGlobalValue *LLParser::GetGlobalVal(const std::string &Name, const Type *Ty, 542df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy Loc) { 543df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner const PointerType *PTy = dyn_cast<PointerType>(Ty); 544df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (PTy == 0) { 545df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Error(Loc, "global variable reference must have pointer type"); 546df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return 0; 547df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 548df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 549df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Look this name up in the normal function symbol table. 550df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner GlobalValue *Val = 551df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner cast_or_null<GlobalValue>(M->getValueSymbolTable().lookup(Name)); 552df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 553df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // If this is a forward reference for the value, see if we already created a 554df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // forward ref record. 555df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Val == 0) { 556df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner std::map<std::string, std::pair<GlobalValue*, LocTy> >::iterator 557df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner I = ForwardRefVals.find(Name); 558df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (I != ForwardRefVals.end()) 559df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Val = I->second.first; 560df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 561df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 562df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // If we have the value in the symbol table or fwd-ref table, return it. 563df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Val) { 564df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Val->getType() == Ty) return Val; 565df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Error(Loc, "'@" + Name + "' defined with type '" + 566df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Val->getType()->getDescription() + "'"); 567df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return 0; 568df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 569df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 570df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Otherwise, create a new forward reference for this value and remember it. 571df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner GlobalValue *FwdVal; 5721e407c338f6944242facb1e0c32903162cc366f0Chris Lattner if (const FunctionType *FT = dyn_cast<FunctionType>(PTy->getElementType())) { 5731e407c338f6944242facb1e0c32903162cc366f0Chris Lattner // Function types can return opaque but functions can't. 5741e407c338f6944242facb1e0c32903162cc366f0Chris Lattner if (isa<OpaqueType>(FT->getReturnType())) { 5751e407c338f6944242facb1e0c32903162cc366f0Chris Lattner Error(Loc, "function may not return opaque type"); 5761e407c338f6944242facb1e0c32903162cc366f0Chris Lattner return 0; 5771e407c338f6944242facb1e0c32903162cc366f0Chris Lattner } 5781e407c338f6944242facb1e0c32903162cc366f0Chris Lattner 579df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner FwdVal = Function::Create(FT, GlobalValue::ExternalWeakLinkage, Name, M); 5801e407c338f6944242facb1e0c32903162cc366f0Chris Lattner } else { 581df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner FwdVal = new GlobalVariable(PTy->getElementType(), false, 582df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner GlobalValue::ExternalWeakLinkage, 0, Name, M); 5831e407c338f6944242facb1e0c32903162cc366f0Chris Lattner } 584df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 585df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ForwardRefVals[Name] = std::make_pair(FwdVal, Loc); 586df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return FwdVal; 587df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 588df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 589df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris LattnerGlobalValue *LLParser::GetGlobalVal(unsigned ID, const Type *Ty, LocTy Loc) { 590df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner const PointerType *PTy = dyn_cast<PointerType>(Ty); 591df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (PTy == 0) { 592df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Error(Loc, "global variable reference must have pointer type"); 593df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return 0; 594df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 595df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 596df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner GlobalValue *Val = ID < NumberedVals.size() ? NumberedVals[ID] : 0; 597df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 598df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // If this is a forward reference for the value, see if we already created a 599df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // forward ref record. 600df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Val == 0) { 601df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner std::map<unsigned, std::pair<GlobalValue*, LocTy> >::iterator 602df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner I = ForwardRefValIDs.find(ID); 603df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (I != ForwardRefValIDs.end()) 604df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Val = I->second.first; 605df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 606df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 607df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // If we have the value in the symbol table or fwd-ref table, return it. 608df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Val) { 609df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Val->getType() == Ty) return Val; 610df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Error(Loc, "'@" + utostr(ID) + "' defined with type '" + 611df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Val->getType()->getDescription() + "'"); 612df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return 0; 613df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 614df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 615df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Otherwise, create a new forward reference for this value and remember it. 616df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner GlobalValue *FwdVal; 617830703b1bd88511e29eec76b1fd146524bc9c5a1Chris Lattner if (const FunctionType *FT = dyn_cast<FunctionType>(PTy->getElementType())) { 618830703b1bd88511e29eec76b1fd146524bc9c5a1Chris Lattner // Function types can return opaque but functions can't. 619830703b1bd88511e29eec76b1fd146524bc9c5a1Chris Lattner if (isa<OpaqueType>(FT->getReturnType())) { 6200d8484f2edb1069522f5c3de6467433e0fbe9323Chris Lattner Error(Loc, "function may not return opaque type"); 621830703b1bd88511e29eec76b1fd146524bc9c5a1Chris Lattner return 0; 622830703b1bd88511e29eec76b1fd146524bc9c5a1Chris Lattner } 623df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner FwdVal = Function::Create(FT, GlobalValue::ExternalWeakLinkage, "", M); 624830703b1bd88511e29eec76b1fd146524bc9c5a1Chris Lattner } else { 625df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner FwdVal = new GlobalVariable(PTy->getElementType(), false, 626df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner GlobalValue::ExternalWeakLinkage, 0, "", M); 627830703b1bd88511e29eec76b1fd146524bc9c5a1Chris Lattner } 628df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 629df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ForwardRefValIDs[ID] = std::make_pair(FwdVal, Loc); 630df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return FwdVal; 631df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 632df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 633df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 634df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner//===----------------------------------------------------------------------===// 635df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner// Helper Routines. 636df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner//===----------------------------------------------------------------------===// 637df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 638df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseToken - If the current token has the specified kind, eat it and return 639df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// success. Otherwise, emit the specified error and return failure. 640df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseToken(lltok::Kind T, const char *ErrMsg) { 641df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Lex.getKind() != T) 642df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return TokError(ErrMsg); 643df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 644df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 645df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 646df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 6473ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner/// ParseStringConstant 6483ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner/// ::= StringConstant 6493ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattnerbool LLParser::ParseStringConstant(std::string &Result) { 6503ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner if (Lex.getKind() != lltok::StringConstant) 6513ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner return TokError("expected string constant"); 6523ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner Result = Lex.getStrVal(); 6533ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner Lex.Lex(); 6543ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner return false; 6553ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner} 6563ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner 6573ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner/// ParseUInt32 6583ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner/// ::= uint32 6593ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattnerbool LLParser::ParseUInt32(unsigned &Val) { 660df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Lex.getKind() != lltok::APSInt || Lex.getAPSIntVal().isSigned()) 661df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return TokError("expected integer"); 662df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner uint64_t Val64 = Lex.getAPSIntVal().getLimitedValue(0xFFFFFFFFULL+1); 663df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Val64 != unsigned(Val64)) 664df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return TokError("expected 32-bit integer (too large)"); 665df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Val = Val64; 666df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 667df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 668df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 669df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 670df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 671df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseOptionalAddrSpace 672df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// := /*empty*/ 673df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// := 'addrspace' '(' uint32 ')' 674df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseOptionalAddrSpace(unsigned &AddrSpace) { 675df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner AddrSpace = 0; 6763ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner if (!EatIfPresent(lltok::kw_addrspace)) 677df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 678df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return ParseToken(lltok::lparen, "expected '(' in address space") || 6793ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner ParseUInt32(AddrSpace) || 680df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::rparen, "expected ')' in address space"); 681df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 682df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 683df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseOptionalAttrs - Parse a potentially empty attribute list. AttrKind 684df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// indicates what kind of attribute list this is: 0: function arg, 1: result, 685df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// 2: function attr. 686df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseOptionalAttrs(unsigned &Attrs, unsigned AttrKind) { 687df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Attrs = Attribute::None; 688df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy AttrLoc = Lex.getLoc(); 689df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 690df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner while (1) { 691df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner switch (Lex.getKind()) { 692df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_sext: 693df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_zext: 694df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Treat these as signext/zeroext unless they are function attrs. 695df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // FIXME: REMOVE THIS IN LLVM 3.0 696df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (AttrKind != 2) { 697df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Lex.getKind() == lltok::kw_sext) 698df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Attrs |= Attribute::SExt; 699df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner else 700df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Attrs |= Attribute::ZExt; 701df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner break; 702df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 703df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // FALL THROUGH. 704df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner default: // End of attributes. 705df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (AttrKind != 2 && (Attrs & Attribute::FunctionOnly)) 706df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(AttrLoc, "invalid use of function-only attribute"); 707df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 708df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (AttrKind != 0 && (Attrs & Attribute::ParameterOnly)) 709df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(AttrLoc, "invalid use of parameter-only attribute"); 710df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 711df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 712df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_zeroext: Attrs |= Attribute::ZExt; break; 713df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_signext: Attrs |= Attribute::SExt; break; 714df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_inreg: Attrs |= Attribute::InReg; break; 715df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_sret: Attrs |= Attribute::StructRet; break; 716df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_noalias: Attrs |= Attribute::NoAlias; break; 717df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_nocapture: Attrs |= Attribute::NoCapture; break; 718df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_byval: Attrs |= Attribute::ByVal; break; 719df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_nest: Attrs |= Attribute::Nest; break; 720df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 721df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_noreturn: Attrs |= Attribute::NoReturn; break; 722df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_nounwind: Attrs |= Attribute::NoUnwind; break; 723df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_noinline: Attrs |= Attribute::NoInline; break; 724df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_readnone: Attrs |= Attribute::ReadNone; break; 725df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_readonly: Attrs |= Attribute::ReadOnly; break; 726df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_alwaysinline: Attrs |= Attribute::AlwaysInline; break; 727df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_optsize: Attrs |= Attribute::OptimizeForSize; break; 728df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_ssp: Attrs |= Attribute::StackProtect; break; 729df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_sspreq: Attrs |= Attribute::StackProtectReq; break; 730df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 731df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 732df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_align: { 733df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned Alignment; 734df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseOptionalAlignment(Alignment)) 735df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 736df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Attrs |= Attribute::constructAlignmentFromInt(Alignment); 737df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner continue; 738df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 739df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 740df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 741df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 742df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 743df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 744df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseOptionalLinkage 745df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= /*empty*/ 746bb46f52027416598a662dc1c58f48d9d56b1a65bRafael Espindola/// ::= 'private' 747df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'internal' 748df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'weak' 749df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'linkonce' 750df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'appending' 751df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'dllexport' 752df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'common' 753df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'dllimport' 754df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'extern_weak' 755df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'external' 756df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseOptionalLinkage(unsigned &Res, bool &HasLinkage) { 757df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner HasLinkage = false; 758df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner switch (Lex.getKind()) { 759df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner default: Res = GlobalValue::ExternalLinkage; return false; 760bb46f52027416598a662dc1c58f48d9d56b1a65bRafael Espindola case lltok::kw_private: Res = GlobalValue::PrivateLinkage; break; 761df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_internal: Res = GlobalValue::InternalLinkage; break; 762df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_weak: Res = GlobalValue::WeakLinkage; break; 763df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_linkonce: Res = GlobalValue::LinkOnceLinkage; break; 764df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_appending: Res = GlobalValue::AppendingLinkage; break; 765df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_dllexport: Res = GlobalValue::DLLExportLinkage; break; 766df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_common: Res = GlobalValue::CommonLinkage; break; 767df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_dllimport: Res = GlobalValue::DLLImportLinkage; break; 768df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_extern_weak: Res = GlobalValue::ExternalWeakLinkage; break; 769df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_external: Res = GlobalValue::ExternalLinkage; break; 770df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 771df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 772df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner HasLinkage = true; 773df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 774df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 775df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 776df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseOptionalVisibility 777df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= /*empty*/ 778df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'default' 779df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'hidden' 780df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'protected' 781df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// 782df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseOptionalVisibility(unsigned &Res) { 783df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner switch (Lex.getKind()) { 784df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner default: Res = GlobalValue::DefaultVisibility; return false; 785df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_default: Res = GlobalValue::DefaultVisibility; break; 786df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_hidden: Res = GlobalValue::HiddenVisibility; break; 787df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_protected: Res = GlobalValue::ProtectedVisibility; break; 788df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 789df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 790df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 791df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 792df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 793df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseOptionalCallingConv 794df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= /*empty*/ 795df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'ccc' 796df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'fastcc' 797df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'coldcc' 798df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'x86_stdcallcc' 799df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'x86_fastcallcc' 800df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'cc' UINT 801df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// 802df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseOptionalCallingConv(unsigned &CC) { 803df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner switch (Lex.getKind()) { 804df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner default: CC = CallingConv::C; return false; 805df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_ccc: CC = CallingConv::C; break; 806df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_fastcc: CC = CallingConv::Fast; break; 807df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_coldcc: CC = CallingConv::Cold; break; 808df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_x86_stdcallcc: CC = CallingConv::X86_StdCall; break; 809df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_x86_fastcallcc: CC = CallingConv::X86_FastCall; break; 8103ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner case lltok::kw_cc: Lex.Lex(); return ParseUInt32(CC); 811df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 812df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 813df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 814df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 815df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 816df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseOptionalAlignment 817df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= /* empty */ 818df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'align' 4 819df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseOptionalAlignment(unsigned &Alignment) { 820df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Alignment = 0; 8213ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner if (!EatIfPresent(lltok::kw_align)) 8223ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner return false; 8233fbb3ab14d86f752a933b5af4e6728c5e57e1155Chris Lattner LocTy AlignLoc = Lex.getLoc(); 8243fbb3ab14d86f752a933b5af4e6728c5e57e1155Chris Lattner if (ParseUInt32(Alignment)) return true; 8253fbb3ab14d86f752a933b5af4e6728c5e57e1155Chris Lattner if (!isPowerOf2_32(Alignment)) 8263fbb3ab14d86f752a933b5af4e6728c5e57e1155Chris Lattner return Error(AlignLoc, "alignment is not a power of two"); 8273fbb3ab14d86f752a933b5af4e6728c5e57e1155Chris Lattner return false; 828df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 829df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 830df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseOptionalCommaAlignment 831df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= /* empty */ 832df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= ',' 'align' 4 833df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseOptionalCommaAlignment(unsigned &Alignment) { 834df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Alignment = 0; 8353ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner if (!EatIfPresent(lltok::comma)) 836df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 837df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return ParseToken(lltok::kw_align, "expected 'align'") || 8383ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner ParseUInt32(Alignment); 839df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 840df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 841df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseIndexList 842df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= (',' uint32)+ 843df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseIndexList(SmallVectorImpl<unsigned> &Indices) { 844df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Lex.getKind() != lltok::comma) 845df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return TokError("expected ',' as start of index list"); 846df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 8473ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner while (EatIfPresent(lltok::comma)) { 848df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned Idx; 8493ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner if (ParseUInt32(Idx)) return true; 850df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Indices.push_back(Idx); 851df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 852df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 853df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 854df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 855df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 856df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner//===----------------------------------------------------------------------===// 857df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner// Type Parsing. 858df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner//===----------------------------------------------------------------------===// 859df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 860df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseType - Parse and resolve a full type. 861df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseType(PATypeHolder &Result) { 862df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseTypeRec(Result)) return true; 863df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 864df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Verify no unresolved uprefs. 865df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!UpRefs.empty()) 866df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(UpRefs.back().Loc, "invalid unresolved type up reference"); 867df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 868df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 869df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 870df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 871df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// HandleUpRefs - Every time we finish a new layer of types, this function is 872df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// called. It loops through the UpRefs vector, which is a list of the 873df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// currently active types. For each type, if the up-reference is contained in 874df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// the newly completed type, we decrement the level count. When the level 875df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// count reaches zero, the up-referenced type is the type that is passed in: 876df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// thus we can complete the cycle. 877df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// 878df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris LattnerPATypeHolder LLParser::HandleUpRefs(const Type *ty) { 879df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // If Ty isn't abstract, or if there are no up-references in it, then there is 880df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // nothing to resolve here. 881df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!ty->isAbstract() || UpRefs.empty()) return ty; 882df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 883df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner PATypeHolder Ty(ty); 884df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner#if 0 885df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner errs() << "Type '" << Ty->getDescription() 886df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner << "' newly formed. Resolving upreferences.\n" 887df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner << UpRefs.size() << " upreferences active!\n"; 888df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner#endif 889df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 890df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // If we find any resolvable upreferences (i.e., those whose NestingLevel goes 891df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // to zero), we resolve them all together before we resolve them to Ty. At 892df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // the end of the loop, if there is anything to resolve to Ty, it will be in 893df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // this variable. 894df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner OpaqueType *TypeToResolve = 0; 895df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 896df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner for (unsigned i = 0; i != UpRefs.size(); ++i) { 897df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Determine if 'Ty' directly contains this up-references 'LastContainedTy'. 898df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner bool ContainsType = 899df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner std::find(Ty->subtype_begin(), Ty->subtype_end(), 900df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner UpRefs[i].LastContainedTy) != Ty->subtype_end(); 901df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 902df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner#if 0 903df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner errs() << " UR#" << i << " - TypeContains(" << Ty->getDescription() << ", " 904df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner << UpRefs[i].LastContainedTy->getDescription() << ") = " 905df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner << (ContainsType ? "true" : "false") 906df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner << " level=" << UpRefs[i].NestingLevel << "\n"; 907df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner#endif 908df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!ContainsType) 909df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner continue; 910df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 911df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Decrement level of upreference 912df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned Level = --UpRefs[i].NestingLevel; 913df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner UpRefs[i].LastContainedTy = Ty; 914df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 915df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // If the Up-reference has a non-zero level, it shouldn't be resolved yet. 916df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Level != 0) 917df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner continue; 918df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 919df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner#if 0 920df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner errs() << " * Resolving upreference for " << UpRefs[i].UpRefTy << "\n"; 921df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner#endif 922df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!TypeToResolve) 923df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner TypeToResolve = UpRefs[i].UpRefTy; 924df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner else 925df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner UpRefs[i].UpRefTy->refineAbstractTypeTo(TypeToResolve); 926df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner UpRefs.erase(UpRefs.begin()+i); // Remove from upreference list. 927df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner --i; // Do not skip the next element. 928df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 929df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 930df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (TypeToResolve) 931df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner TypeToResolve->refineAbstractTypeTo(Ty); 932df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 933df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Ty; 934df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 935df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 936df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 937df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseTypeRec - The recursive function used to process the internal 938df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// implementation details of types. 939df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseTypeRec(PATypeHolder &Result) { 940df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner switch (Lex.getKind()) { 941df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner default: 942df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return TokError("expected type"); 943df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::Type: 944df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // TypeRec ::= 'float' | 'void' (etc) 945df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Result = Lex.getTyVal(); 946df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 947df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner break; 948df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_opaque: 949df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // TypeRec ::= 'opaque' 950df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Result = OpaqueType::get(); 951df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 952df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner break; 953df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::lbrace: 954df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // TypeRec ::= '{' ... '}' 955df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseStructType(Result, false)) 956df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 957df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner break; 958df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::lsquare: 959df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // TypeRec ::= '[' ... ']' 960df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); // eat the lsquare. 961df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseArrayVectorType(Result, false)) 962df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 963df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner break; 964df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::less: // Either vector or packed struct. 965df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // TypeRec ::= '<' ... '>' 9663ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner Lex.Lex(); 9673ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner if (Lex.getKind() == lltok::lbrace) { 9683ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner if (ParseStructType(Result, true) || 9693ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner ParseToken(lltok::greater, "expected '>' at end of packed struct")) 970df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 971df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } else if (ParseArrayVectorType(Result, true)) 972df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 973df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner break; 974df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::LocalVar: 975df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::StringConstant: // FIXME: REMOVE IN LLVM 3.0 976df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // TypeRec ::= %foo 977df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (const Type *T = M->getTypeByName(Lex.getStrVal())) { 978df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Result = T; 979df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } else { 980df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Result = OpaqueType::get(); 981df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ForwardRefTypes.insert(std::make_pair(Lex.getStrVal(), 982df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner std::make_pair(Result, 983df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.getLoc()))); 984df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner M->addTypeName(Lex.getStrVal(), Result.get()); 985df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 986df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 987df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner break; 988df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 989df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::LocalVarID: 990df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // TypeRec ::= %4 991df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Lex.getUIntVal() < NumberedTypes.size()) 992df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Result = NumberedTypes[Lex.getUIntVal()]; 993df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner else { 994df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner std::map<unsigned, std::pair<PATypeHolder, LocTy> >::iterator 995df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner I = ForwardRefTypeIDs.find(Lex.getUIntVal()); 996df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (I != ForwardRefTypeIDs.end()) 997df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Result = I->second.first; 998df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner else { 999df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Result = OpaqueType::get(); 1000df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ForwardRefTypeIDs.insert(std::make_pair(Lex.getUIntVal(), 1001df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner std::make_pair(Result, 1002df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.getLoc()))); 1003df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1004df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1005df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 1006df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner break; 1007df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::backslash: { 1008df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // TypeRec ::= '\' 4 1009df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 10103ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner unsigned Val; 10113ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner if (ParseUInt32(Val)) return true; 1012df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner OpaqueType *OT = OpaqueType::get(); // Use temporary placeholder. 1013df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner UpRefs.push_back(UpRefRecord(Lex.getLoc(), Val, OT)); 1014df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Result = OT; 1015df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner break; 1016df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1017df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1018df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1019df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Parse the type suffixes. 1020df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner while (1) { 1021df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner switch (Lex.getKind()) { 1022df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // End of type. 1023df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner default: return false; 1024df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1025df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // TypeRec ::= TypeRec '*' 1026df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::star: 1027df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Result.get() == Type::LabelTy) 1028df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return TokError("basic block pointers are invalid"); 1029b4bd16fc5e3dd416cf68e73cff93544d364159d6Chris Lattner if (Result.get() == Type::VoidTy) 1030b9070d3f6309929e47503e2790a368592b4bd201Dan Gohman return TokError("pointers to void are invalid; use i8* instead"); 1031df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Result = HandleUpRefs(PointerType::getUnqual(Result.get())); 1032df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 1033df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner break; 1034df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1035df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // TypeRec ::= TypeRec 'addrspace' '(' uint32 ')' '*' 1036df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_addrspace: { 1037df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Result.get() == Type::LabelTy) 1038df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return TokError("basic block pointers are invalid"); 1039b4bd16fc5e3dd416cf68e73cff93544d364159d6Chris Lattner if (Result.get() == Type::VoidTy) 1040b9070d3f6309929e47503e2790a368592b4bd201Dan Gohman return TokError("pointers to void are invalid; use i8* instead"); 1041df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned AddrSpace; 1042df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseOptionalAddrSpace(AddrSpace) || 1043df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::star, "expected '*' in address space")) 1044df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 1045df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1046df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Result = HandleUpRefs(PointerType::get(Result.get(), AddrSpace)); 1047df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner break; 1048df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1049df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1050df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner /// Types '(' ArgTypeListI ')' OptFuncAttrs 1051df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::lparen: 1052df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseFunctionType(Result)) 1053df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 1054df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner break; 1055df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1056df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1057df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 1058df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1059df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseParameterList 1060df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= '(' ')' 1061df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= '(' Arg (',' Arg)* ')' 1062df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// Arg 1063df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= Type OptionalAttributes Value OptionalAttributes 1064df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseParameterList(SmallVectorImpl<ParamInfo> &ArgList, 1065df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner PerFunctionState &PFS) { 1066df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseToken(lltok::lparen, "expected '(' in call")) 1067df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 1068df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1069df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner while (Lex.getKind() != lltok::rparen) { 1070df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // If this isn't the first argument, we need a comma. 1071df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!ArgList.empty() && 1072df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::comma, "expected ',' in argument list")) 1073df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 1074df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1075df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Parse the argument. 1076df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy ArgLoc; 1077df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner PATypeHolder ArgTy(Type::VoidTy); 1078df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned ArgAttrs1, ArgAttrs2; 1079df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Value *V; 1080df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseType(ArgTy, ArgLoc) || 1081df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseOptionalAttrs(ArgAttrs1, 0) || 1082df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseValue(ArgTy, V, PFS) || 1083df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // FIXME: Should not allow attributes after the argument, remove this in 1084df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // LLVM 3.0. 1085df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseOptionalAttrs(ArgAttrs2, 0)) 1086df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 1087df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ArgList.push_back(ParamInfo(ArgLoc, V, ArgAttrs1|ArgAttrs2)); 1088df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1089df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1090df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); // Lex the ')'. 1091df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 1092df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 1093df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1094df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1095df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1096dfd19ddcfa7568d2118fbc3c6da612295200c31cChris Lattner/// ParseArgumentList - Parse the argument list for a function type or function 1097dfd19ddcfa7568d2118fbc3c6da612295200c31cChris Lattner/// prototype. If 'inType' is true then we are parsing a FunctionType. 1098df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= '(' ArgTypeListI ')' 1099df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ArgTypeListI 1100df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= /*empty*/ 1101df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= '...' 1102df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= ArgTypeList ',' '...' 1103df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= ArgType (',' ArgType)* 1104dfd19ddcfa7568d2118fbc3c6da612295200c31cChris Lattner/// 1105df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseArgumentList(std::vector<ArgInfo> &ArgList, 1106dfd19ddcfa7568d2118fbc3c6da612295200c31cChris Lattner bool &isVarArg, bool inType) { 1107df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner isVarArg = false; 1108df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner assert(Lex.getKind() == lltok::lparen); 1109df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); // eat the (. 1110df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1111df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Lex.getKind() == lltok::rparen) { 1112df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // empty 1113df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } else if (Lex.getKind() == lltok::dotdotdot) { 1114df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner isVarArg = true; 1115df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 1116df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } else { 1117df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy TypeLoc = Lex.getLoc(); 1118df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner PATypeHolder ArgTy(Type::VoidTy); 1119df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned Attrs; 1120df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner std::string Name; 11213ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner 1122dfd19ddcfa7568d2118fbc3c6da612295200c31cChris Lattner // If we're parsing a type, use ParseTypeRec, because we allow recursive 1123dfd19ddcfa7568d2118fbc3c6da612295200c31cChris Lattner // types (such as a function returning a pointer to itself). If parsing a 1124dfd19ddcfa7568d2118fbc3c6da612295200c31cChris Lattner // function prototype, we require fully resolved types. 1125dfd19ddcfa7568d2118fbc3c6da612295200c31cChris Lattner if ((inType ? ParseTypeRec(ArgTy) : ParseType(ArgTy)) || 11263ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner ParseOptionalAttrs(Attrs, 0)) return true; 11273ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner 1128df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Lex.getKind() == lltok::LocalVar || 1129df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.getKind() == lltok::StringConstant) { // FIXME: REMOVE IN LLVM 3.0 1130df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Name = Lex.getStrVal(); 1131df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 1132df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 11333ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner 11343ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner if (!ArgTy->isFirstClassType() && !isa<OpaqueType>(ArgTy)) 11353ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner return Error(TypeLoc, "invalid type for function argument"); 1136df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1137df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ArgList.push_back(ArgInfo(TypeLoc, ArgTy, Attrs, Name)); 1138df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 11393ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner while (EatIfPresent(lltok::comma)) { 1140df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Handle ... at end of arg list. 11413ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner if (EatIfPresent(lltok::dotdotdot)) { 1142df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner isVarArg = true; 1143df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner break; 1144df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1145df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1146df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Otherwise must be an argument type. 1147df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner TypeLoc = Lex.getLoc(); 11483ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner if (ParseTypeRec(ArgTy) || 11493ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner ParseOptionalAttrs(Attrs, 0)) return true; 11503ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner 1151df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Lex.getKind() == lltok::LocalVar || 1152df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.getKind() == lltok::StringConstant) { // FIXME: REMOVE IN LLVM 3.0 1153df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Name = Lex.getStrVal(); 1154df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 1155df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } else { 1156df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Name = ""; 1157df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 11583ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner 11593ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner if (!ArgTy->isFirstClassType() && !isa<OpaqueType>(ArgTy)) 11603ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner return Error(TypeLoc, "invalid type for function argument"); 1161df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1162df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ArgList.push_back(ArgInfo(TypeLoc, ArgTy, Attrs, Name)); 1163df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1164df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1165df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 11663ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner return ParseToken(lltok::rparen, "expected ')' at end of argument list"); 1167df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 1168df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1169df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseFunctionType 1170df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= Type ArgumentList OptionalAttrs 1171df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseFunctionType(PATypeHolder &Result) { 1172df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner assert(Lex.getKind() == lltok::lparen); 1173df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1174d77d04c323f856b07c6e46450e7578dd09c0165fChris Lattner if (!FunctionType::isValidReturnType(Result)) 1175d77d04c323f856b07c6e46450e7578dd09c0165fChris Lattner return TokError("invalid function return type"); 1176d77d04c323f856b07c6e46450e7578dd09c0165fChris Lattner 1177df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner std::vector<ArgInfo> ArgList; 1178df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner bool isVarArg; 1179df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned Attrs; 1180dfd19ddcfa7568d2118fbc3c6da612295200c31cChris Lattner if (ParseArgumentList(ArgList, isVarArg, true) || 1181df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // FIXME: Allow, but ignore attributes on function types! 1182df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // FIXME: Remove in LLVM 3.0 1183df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseOptionalAttrs(Attrs, 2)) 1184df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 1185df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1186df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Reject names on the arguments lists. 1187df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner for (unsigned i = 0, e = ArgList.size(); i != e; ++i) { 1188df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!ArgList[i].Name.empty()) 1189df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ArgList[i].Loc, "argument name invalid in function type"); 1190df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!ArgList[i].Attrs != 0) { 1191df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Allow but ignore attributes on function types; this permits 1192df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // auto-upgrade. 1193df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // FIXME: REJECT ATTRIBUTES ON FUNCTION TYPES in LLVM 3.0 1194df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1195df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1196df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1197df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner std::vector<const Type*> ArgListTy; 1198df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner for (unsigned i = 0, e = ArgList.size(); i != e; ++i) 1199df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ArgListTy.push_back(ArgList[i].Type); 1200df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1201df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Result = HandleUpRefs(FunctionType::get(Result.get(), ArgListTy, isVarArg)); 1202df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 1203df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 1204df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1205df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseStructType: Handles packed and unpacked types. </> parsed elsewhere. 1206df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// TypeRec 1207df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= '{' '}' 1208df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= '{' TypeRec (',' TypeRec)* '}' 1209df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= '<' '{' '}' '>' 1210df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= '<' '{' TypeRec (',' TypeRec)* '}' '>' 1211df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseStructType(PATypeHolder &Result, bool Packed) { 1212df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner assert(Lex.getKind() == lltok::lbrace); 1213df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); // Consume the '{' 1214df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 12153ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner if (EatIfPresent(lltok::rbrace)) { 1216df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Result = StructType::get(std::vector<const Type*>(), Packed); 1217df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 1218df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1219df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1220df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner std::vector<PATypeHolder> ParamsList; 1221df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseTypeRec(Result)) return true; 1222df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParamsList.push_back(Result); 1223df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 12243ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner while (EatIfPresent(lltok::comma)) { 1225df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseTypeRec(Result)) return true; 1226df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParamsList.push_back(Result); 1227df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1228df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 12293ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner if (ParseToken(lltok::rbrace, "expected '}' at end of struct")) 12303ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner return true; 1231df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1232df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner std::vector<const Type*> ParamsListTy; 1233df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner for (unsigned i = 0, e = ParamsList.size(); i != e; ++i) 1234df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParamsListTy.push_back(ParamsList[i].get()); 1235df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Result = HandleUpRefs(StructType::get(ParamsListTy, Packed)); 1236df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 1237df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 1238df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1239df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseArrayVectorType - Parse an array or vector type, assuming the first 1240df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// token has already been consumed. 1241df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// TypeRec 1242df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= '[' APSINTVAL 'x' Types ']' 1243df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= '<' APSINTVAL 'x' Types '>' 1244df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseArrayVectorType(PATypeHolder &Result, bool isVector) { 1245df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Lex.getKind() != lltok::APSInt || Lex.getAPSIntVal().isSigned() || 1246df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.getAPSIntVal().getBitWidth() > 64) 1247df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return TokError("expected number in address space"); 1248df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1249df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy SizeLoc = Lex.getLoc(); 1250df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner uint64_t Size = Lex.getAPSIntVal().getZExtValue(); 12513ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner Lex.Lex(); 12523ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner 12533ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner if (ParseToken(lltok::kw_x, "expected 'x' after element count")) 12543ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner return true; 1255df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1256df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy TypeLoc = Lex.getLoc(); 1257df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner PATypeHolder EltTy(Type::VoidTy); 1258df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseTypeRec(EltTy)) return true; 1259df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 12603ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner if (ParseToken(isVector ? lltok::greater : lltok::rsquare, 12613ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner "expected end of sequential type")) 12623ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner return true; 1263df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1264df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (isVector) { 1265df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if ((unsigned)Size != Size) 1266df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(SizeLoc, "size too large for vector"); 1267df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!EltTy->isFloatingPoint() && !EltTy->isInteger()) 1268df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(TypeLoc, "vector element type must be fp or integer"); 1269df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Result = VectorType::get(EltTy, unsigned(Size)); 1270df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } else { 1271df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!EltTy->isFirstClassType() && !isa<OpaqueType>(EltTy)) 1272df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(TypeLoc, "invalid array element type"); 1273df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Result = HandleUpRefs(ArrayType::get(EltTy, Size)); 1274df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1275df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 1276df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 1277df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1278df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner//===----------------------------------------------------------------------===// 1279df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner// Function Semantic Analysis. 1280df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner//===----------------------------------------------------------------------===// 1281df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1282df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris LattnerLLParser::PerFunctionState::PerFunctionState(LLParser &p, Function &f) 1283df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner : P(p), F(f) { 1284df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1285df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Insert unnamed arguments into the NumberedVals list. 1286df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner for (Function::arg_iterator AI = F.arg_begin(), E = F.arg_end(); 1287df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner AI != E; ++AI) 1288df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!AI->hasName()) 1289df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner NumberedVals.push_back(AI); 1290df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 1291df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1292df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris LattnerLLParser::PerFunctionState::~PerFunctionState() { 1293df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // If there were any forward referenced non-basicblock values, delete them. 1294df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner for (std::map<std::string, std::pair<Value*, LocTy> >::iterator 1295df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner I = ForwardRefVals.begin(), E = ForwardRefVals.end(); I != E; ++I) 1296df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!isa<BasicBlock>(I->second.first)) { 1297df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner I->second.first->replaceAllUsesWith(UndefValue::get(I->second.first 1298df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ->getType())); 1299df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner delete I->second.first; 1300df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner I->second.first = 0; 1301df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1302df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1303df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner for (std::map<unsigned, std::pair<Value*, LocTy> >::iterator 1304df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner I = ForwardRefValIDs.begin(), E = ForwardRefValIDs.end(); I != E; ++I) 1305df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!isa<BasicBlock>(I->second.first)) { 1306df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner I->second.first->replaceAllUsesWith(UndefValue::get(I->second.first 1307df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ->getType())); 1308df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner delete I->second.first; 1309df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner I->second.first = 0; 1310df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1311df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 1312df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1313df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::PerFunctionState::VerifyFunctionComplete() { 1314df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!ForwardRefVals.empty()) 1315df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return P.Error(ForwardRefVals.begin()->second.second, 1316df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner "use of undefined value '%" + ForwardRefVals.begin()->first + 1317df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner "'"); 1318df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!ForwardRefValIDs.empty()) 1319df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return P.Error(ForwardRefValIDs.begin()->second.second, 1320df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner "use of undefined value '%" + 1321df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner utostr(ForwardRefValIDs.begin()->first) + "'"); 1322df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 1323df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 1324df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1325df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1326df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// GetVal - Get a value with the specified name or ID, creating a 1327df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// forward reference record if needed. This can return null if the value 1328df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// exists but does not have the right type. 1329df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris LattnerValue *LLParser::PerFunctionState::GetVal(const std::string &Name, 1330df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner const Type *Ty, LocTy Loc) { 1331df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Look this name up in the normal function symbol table. 1332df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Value *Val = F.getValueSymbolTable().lookup(Name); 1333df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1334df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // If this is a forward reference for the value, see if we already created a 1335df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // forward ref record. 1336df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Val == 0) { 1337df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner std::map<std::string, std::pair<Value*, LocTy> >::iterator 1338df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner I = ForwardRefVals.find(Name); 1339df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (I != ForwardRefVals.end()) 1340df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Val = I->second.first; 1341df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1342df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1343df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // If we have the value in the symbol table or fwd-ref table, return it. 1344df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Val) { 1345df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Val->getType() == Ty) return Val; 1346df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Ty == Type::LabelTy) 1347df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner P.Error(Loc, "'%" + Name + "' is not a basic block"); 1348df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner else 1349df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner P.Error(Loc, "'%" + Name + "' defined with type '" + 1350df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Val->getType()->getDescription() + "'"); 1351df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return 0; 1352df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1353df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1354df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Don't make placeholders with invalid type. 1355df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!Ty->isFirstClassType() && !isa<OpaqueType>(Ty) && Ty != Type::LabelTy) { 1356df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner P.Error(Loc, "invalid use of a non-first-class type"); 1357df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return 0; 1358df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1359df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1360df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Otherwise, create a new forward reference for this value and remember it. 1361df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Value *FwdVal; 1362df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Ty == Type::LabelTy) 1363df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner FwdVal = BasicBlock::Create(Name, &F); 1364df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner else 1365df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner FwdVal = new Argument(Ty, Name); 1366df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1367df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ForwardRefVals[Name] = std::make_pair(FwdVal, Loc); 1368df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return FwdVal; 1369df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 1370df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1371df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris LattnerValue *LLParser::PerFunctionState::GetVal(unsigned ID, const Type *Ty, 1372df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy Loc) { 1373df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Look this name up in the normal function symbol table. 1374df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Value *Val = ID < NumberedVals.size() ? NumberedVals[ID] : 0; 1375df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1376df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // If this is a forward reference for the value, see if we already created a 1377df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // forward ref record. 1378df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Val == 0) { 1379df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner std::map<unsigned, std::pair<Value*, LocTy> >::iterator 1380df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner I = ForwardRefValIDs.find(ID); 1381df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (I != ForwardRefValIDs.end()) 1382df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Val = I->second.first; 1383df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1384df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1385df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // If we have the value in the symbol table or fwd-ref table, return it. 1386df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Val) { 1387df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Val->getType() == Ty) return Val; 1388df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Ty == Type::LabelTy) 1389df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner P.Error(Loc, "'%" + utostr(ID) + "' is not a basic block"); 1390df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner else 1391df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner P.Error(Loc, "'%" + utostr(ID) + "' defined with type '" + 1392df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Val->getType()->getDescription() + "'"); 1393df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return 0; 1394df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1395df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1396df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!Ty->isFirstClassType() && !isa<OpaqueType>(Ty) && Ty != Type::LabelTy) { 1397df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner P.Error(Loc, "invalid use of a non-first-class type"); 1398df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return 0; 1399df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1400df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1401df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Otherwise, create a new forward reference for this value and remember it. 1402df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Value *FwdVal; 1403df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Ty == Type::LabelTy) 1404df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner FwdVal = BasicBlock::Create("", &F); 1405df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner else 1406df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner FwdVal = new Argument(Ty); 1407df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1408df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ForwardRefValIDs[ID] = std::make_pair(FwdVal, Loc); 1409df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return FwdVal; 1410df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 1411df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1412df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// SetInstName - After an instruction is parsed and inserted into its 1413df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// basic block, this installs its name. 1414df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::PerFunctionState::SetInstName(int NameID, 1415df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner const std::string &NameStr, 1416df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy NameLoc, Instruction *Inst) { 1417df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // If this instruction has void type, it cannot have a name or ID specified. 1418df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Inst->getType() == Type::VoidTy) { 1419df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (NameID != -1 || !NameStr.empty()) 1420df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return P.Error(NameLoc, "instructions returning void cannot have a name"); 1421df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 1422df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1423df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1424df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // If this was a numbered instruction, verify that the instruction is the 1425df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // expected value and resolve any forward references. 1426df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (NameStr.empty()) { 1427df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // If neither a name nor an ID was specified, just use the next ID. 1428df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (NameID == -1) 1429df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner NameID = NumberedVals.size(); 1430df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1431df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (unsigned(NameID) != NumberedVals.size()) 1432df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return P.Error(NameLoc, "instruction expected to be numbered '%" + 1433df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner utostr(NumberedVals.size()) + "'"); 1434df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1435df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner std::map<unsigned, std::pair<Value*, LocTy> >::iterator FI = 1436df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ForwardRefValIDs.find(NameID); 1437df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (FI != ForwardRefValIDs.end()) { 1438df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (FI->second.first->getType() != Inst->getType()) 1439df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return P.Error(NameLoc, "instruction forward referenced with type '" + 1440df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner FI->second.first->getType()->getDescription() + "'"); 1441df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner FI->second.first->replaceAllUsesWith(Inst); 1442df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ForwardRefValIDs.erase(FI); 1443df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1444df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1445df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner NumberedVals.push_back(Inst); 1446df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 1447df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1448df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1449df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Otherwise, the instruction had a name. Resolve forward refs and set it. 1450df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner std::map<std::string, std::pair<Value*, LocTy> >::iterator 1451df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner FI = ForwardRefVals.find(NameStr); 1452df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (FI != ForwardRefVals.end()) { 1453df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (FI->second.first->getType() != Inst->getType()) 1454df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return P.Error(NameLoc, "instruction forward referenced with type '" + 1455df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner FI->second.first->getType()->getDescription() + "'"); 1456df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner FI->second.first->replaceAllUsesWith(Inst); 1457df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ForwardRefVals.erase(FI); 1458df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1459df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1460df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Set the name on the instruction. 1461df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Inst->setName(NameStr); 1462df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1463df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Inst->getNameStr() != NameStr) 1464df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return P.Error(NameLoc, "multiple definition of local value named '" + 1465df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner NameStr + "'"); 1466df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 1467df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 1468df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1469df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// GetBB - Get a basic block with the specified name or ID, creating a 1470df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// forward reference record if needed. 1471df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris LattnerBasicBlock *LLParser::PerFunctionState::GetBB(const std::string &Name, 1472df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy Loc) { 1473df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return cast_or_null<BasicBlock>(GetVal(Name, Type::LabelTy, Loc)); 1474df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 1475df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1476df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris LattnerBasicBlock *LLParser::PerFunctionState::GetBB(unsigned ID, LocTy Loc) { 1477df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return cast_or_null<BasicBlock>(GetVal(ID, Type::LabelTy, Loc)); 1478df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 1479df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1480df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// DefineBB - Define the specified basic block, which is either named or 1481df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// unnamed. If there is an error, this returns null otherwise it returns 1482df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// the block being defined. 1483df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris LattnerBasicBlock *LLParser::PerFunctionState::DefineBB(const std::string &Name, 1484df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy Loc) { 1485df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner BasicBlock *BB; 1486df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Name.empty()) 1487df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner BB = GetBB(NumberedVals.size(), Loc); 1488df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner else 1489df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner BB = GetBB(Name, Loc); 1490df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (BB == 0) return 0; // Already diagnosed error. 1491df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1492df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Move the block to the end of the function. Forward ref'd blocks are 1493df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // inserted wherever they happen to be referenced. 1494df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner F.getBasicBlockList().splice(F.end(), F.getBasicBlockList(), BB); 1495df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1496df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Remove the block from forward ref sets. 1497df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Name.empty()) { 1498df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ForwardRefValIDs.erase(NumberedVals.size()); 1499df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner NumberedVals.push_back(BB); 1500df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } else { 1501df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // BB forward references are already in the function symbol table. 1502df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ForwardRefVals.erase(Name); 1503df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1504df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1505df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return BB; 1506df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 1507df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1508df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner//===----------------------------------------------------------------------===// 1509df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner// Constants. 1510df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner//===----------------------------------------------------------------------===// 1511df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1512df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseValID - Parse an abstract value that doesn't necessarily have a 1513df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// type implied. For example, if we parse "4" we don't know what integer type 1514df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// it has. The value will later be combined with its type and checked for 1515df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// sanity. 1516df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseValID(ValID &ID) { 1517df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.Loc = Lex.getLoc(); 1518df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner switch (Lex.getKind()) { 1519df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner default: return TokError("expected value token"); 1520df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::GlobalID: // @42 1521df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.UIntVal = Lex.getUIntVal(); 1522df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.Kind = ValID::t_GlobalID; 1523df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner break; 1524df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::GlobalVar: // @foo 1525df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.StrVal = Lex.getStrVal(); 1526df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.Kind = ValID::t_GlobalName; 1527df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner break; 1528df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::LocalVarID: // %42 1529df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.UIntVal = Lex.getUIntVal(); 1530df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.Kind = ValID::t_LocalID; 1531df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner break; 1532df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::LocalVar: // %foo 1533df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::StringConstant: // "foo" - FIXME: REMOVE IN LLVM 3.0 1534df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.StrVal = Lex.getStrVal(); 1535df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.Kind = ValID::t_LocalName; 1536df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner break; 1537df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::APSInt: 1538df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.APSIntVal = Lex.getAPSIntVal(); 1539df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.Kind = ValID::t_APSInt; 1540df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner break; 1541df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::APFloat: 1542df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.APFloatVal = Lex.getAPFloatVal(); 1543df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.Kind = ValID::t_APFloat; 1544df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner break; 1545df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_true: 1546df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.ConstantVal = ConstantInt::getTrue(); 1547df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.Kind = ValID::t_Constant; 1548df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner break; 1549df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_false: 1550df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.ConstantVal = ConstantInt::getFalse(); 1551df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.Kind = ValID::t_Constant; 1552df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner break; 1553df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_null: ID.Kind = ValID::t_Null; break; 1554df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_undef: ID.Kind = ValID::t_Undef; break; 1555df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_zeroinitializer: ID.Kind = ValID::t_Zero; break; 1556df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1557df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::lbrace: { 1558df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // ValID ::= '{' ConstVector '}' 1559df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 1560df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner SmallVector<Constant*, 16> Elts; 1561df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseGlobalValueVector(Elts) || 1562df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::rbrace, "expected end of struct constant")) 1563df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 1564df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1565df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.ConstantVal = ConstantStruct::get(&Elts[0], Elts.size(), false); 1566df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.Kind = ValID::t_Constant; 1567df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 1568df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1569df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::less: { 1570df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // ValID ::= '<' ConstVector '>' --> Vector. 1571df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // ValID ::= '<' '{' ConstVector '}' '>' --> Packed Struct. 1572df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 15733ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner bool isPackedStruct = EatIfPresent(lltok::lbrace); 1574df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1575df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner SmallVector<Constant*, 16> Elts; 1576df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy FirstEltLoc = Lex.getLoc(); 1577df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseGlobalValueVector(Elts) || 1578df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner (isPackedStruct && 1579df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::rbrace, "expected end of packed struct")) || 1580df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::greater, "expected end of constant")) 1581df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 1582df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1583df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (isPackedStruct) { 1584df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.ConstantVal = ConstantStruct::get(&Elts[0], Elts.size(), true); 1585df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.Kind = ValID::t_Constant; 1586df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 1587df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1588df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1589df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Elts.empty()) 1590df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ID.Loc, "constant vector must not be empty"); 1591df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1592df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!Elts[0]->getType()->isInteger() && 1593df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner !Elts[0]->getType()->isFloatingPoint()) 1594df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(FirstEltLoc, 1595df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner "vector elements must have integer or floating point type"); 1596df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1597df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Verify that all the vector elements have the same type. 1598df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner for (unsigned i = 1, e = Elts.size(); i != e; ++i) 1599df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Elts[i]->getType() != Elts[0]->getType()) 1600df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(FirstEltLoc, 1601df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner "vector element #" + utostr(i) + 1602df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner " is not of type '" + Elts[0]->getType()->getDescription()); 1603df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1604df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.ConstantVal = ConstantVector::get(&Elts[0], Elts.size()); 1605df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.Kind = ValID::t_Constant; 1606df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 1607df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1608df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::lsquare: { // Array Constant 1609df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 1610df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner SmallVector<Constant*, 16> Elts; 1611df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy FirstEltLoc = Lex.getLoc(); 1612df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseGlobalValueVector(Elts) || 1613df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::rsquare, "expected end of array constant")) 1614df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 1615df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1616df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Handle empty element. 1617df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Elts.empty()) { 1618df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Use undef instead of an array because it's inconvenient to determine 1619df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // the element type at this point, there being no elements to examine. 1620081b505f77b183b7b029818218245cf4986e8948Chris Lattner ID.Kind = ValID::t_EmptyArray; 1621df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 1622df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1623df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1624df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!Elts[0]->getType()->isFirstClassType()) 1625df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(FirstEltLoc, "invalid array element type: " + 1626df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Elts[0]->getType()->getDescription()); 1627df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1628df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ArrayType *ATy = ArrayType::get(Elts[0]->getType(), Elts.size()); 1629df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1630df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Verify all elements are correct type! 16316d6b3cc89b9d1911cff4931dadfe670f94fcbb3bChris Lattner for (unsigned i = 0, e = Elts.size(); i != e; ++i) { 1632df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Elts[i]->getType() != Elts[0]->getType()) 1633df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(FirstEltLoc, 1634df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner "array element #" + utostr(i) + 1635df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner " is not of type '" +Elts[0]->getType()->getDescription()); 1636df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1637df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1638df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.ConstantVal = ConstantArray::get(ATy, &Elts[0], Elts.size()); 1639df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.Kind = ValID::t_Constant; 1640df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 1641df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1642df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_c: // c "foo" 1643df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 1644df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.ConstantVal = ConstantArray::get(Lex.getStrVal(), false); 1645df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseToken(lltok::StringConstant, "expected string")) return true; 1646df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.Kind = ValID::t_Constant; 1647df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 1648df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1649df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_asm: { 1650df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // ValID ::= 'asm' SideEffect? STRINGCONSTANT ',' STRINGCONSTANT 1651df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner bool HasSideEffect; 1652df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 1653df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseOptionalToken(lltok::kw_sideeffect, HasSideEffect) || 16543ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner ParseStringConstant(ID.StrVal) || 16553ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner ParseToken(lltok::comma, "expected comma in inline asm expression") || 1656df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::StringConstant, "expected constraint string")) 1657df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 1658df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.StrVal2 = Lex.getStrVal(); 1659df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.UIntVal = HasSideEffect; 1660df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.Kind = ValID::t_InlineAsm; 1661df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 1662df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1663df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1664df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_trunc: 1665df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_zext: 1666df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_sext: 1667df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_fptrunc: 1668df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_fpext: 1669df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_bitcast: 1670df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_uitofp: 1671df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_sitofp: 1672df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_fptoui: 1673df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_fptosi: 1674df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_inttoptr: 1675df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_ptrtoint: { 1676df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned Opc = Lex.getUIntVal(); 1677df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner PATypeHolder DestTy(Type::VoidTy); 1678df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Constant *SrcVal; 1679df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 1680df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseToken(lltok::lparen, "expected '(' after constantexpr cast") || 1681df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseGlobalTypeAndValue(SrcVal) || 1682df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::kw_to, "expected 'to' int constantexpr cast") || 1683df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseType(DestTy) || 1684df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::rparen, "expected ')' at end of constantexpr cast")) 1685df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 1686df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!CastInst::castIsValid((Instruction::CastOps)Opc, SrcVal, DestTy)) 1687df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ID.Loc, "invalid cast opcode for cast from '" + 1688df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner SrcVal->getType()->getDescription() + "' to '" + 1689df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner DestTy->getDescription() + "'"); 1690df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.ConstantVal = ConstantExpr::getCast((Instruction::CastOps)Opc, SrcVal, 1691df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner DestTy); 1692df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.Kind = ValID::t_Constant; 1693df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 1694df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1695df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_extractvalue: { 1696df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 1697df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Constant *Val; 1698df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner SmallVector<unsigned, 4> Indices; 1699df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseToken(lltok::lparen, "expected '(' in extractvalue constantexpr")|| 1700df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseGlobalTypeAndValue(Val) || 1701df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseIndexList(Indices) || 1702df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::rparen, "expected ')' in extractvalue constantexpr")) 1703df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 1704df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!isa<StructType>(Val->getType()) && !isa<ArrayType>(Val->getType())) 1705df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ID.Loc, "extractvalue operand must be array or struct"); 1706df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!ExtractValueInst::getIndexedType(Val->getType(), Indices.begin(), 1707df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Indices.end())) 1708df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ID.Loc, "invalid indices for extractvalue"); 1709df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.ConstantVal = ConstantExpr::getExtractValue(Val, 1710df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner &Indices[0], Indices.size()); 1711df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.Kind = ValID::t_Constant; 1712df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 1713df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1714df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_insertvalue: { 1715df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 1716df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Constant *Val0, *Val1; 1717df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner SmallVector<unsigned, 4> Indices; 1718df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseToken(lltok::lparen, "expected '(' in insertvalue constantexpr")|| 1719df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseGlobalTypeAndValue(Val0) || 1720df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::comma, "expected comma in insertvalue constantexpr")|| 1721df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseGlobalTypeAndValue(Val1) || 1722df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseIndexList(Indices) || 1723df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::rparen, "expected ')' in insertvalue constantexpr")) 1724df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 1725df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!isa<StructType>(Val0->getType()) && !isa<ArrayType>(Val0->getType())) 1726df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ID.Loc, "extractvalue operand must be array or struct"); 1727df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!ExtractValueInst::getIndexedType(Val0->getType(), Indices.begin(), 1728df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Indices.end())) 1729df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ID.Loc, "invalid indices for insertvalue"); 1730df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.ConstantVal = ConstantExpr::getInsertValue(Val0, Val1, 1731df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner &Indices[0], Indices.size()); 1732df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.Kind = ValID::t_Constant; 1733df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 1734df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1735df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_icmp: 1736df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_fcmp: 1737df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_vicmp: 1738df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_vfcmp: { 1739df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned PredVal, Opc = Lex.getUIntVal(); 1740df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Constant *Val0, *Val1; 1741df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 1742df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseCmpPredicate(PredVal, Opc) || 1743df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::lparen, "expected '(' in compare constantexpr") || 1744df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseGlobalTypeAndValue(Val0) || 1745df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::comma, "expected comma in compare constantexpr") || 1746df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseGlobalTypeAndValue(Val1) || 1747df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::rparen, "expected ')' in compare constantexpr")) 1748df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 1749df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1750df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Val0->getType() != Val1->getType()) 1751df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ID.Loc, "compare operands must have the same type"); 1752df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1753df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner CmpInst::Predicate Pred = (CmpInst::Predicate)PredVal; 1754df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1755df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Opc == Instruction::FCmp) { 1756df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!Val0->getType()->isFPOrFPVector()) 1757df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ID.Loc, "fcmp requires floating point operands"); 1758df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.ConstantVal = ConstantExpr::getFCmp(Pred, Val0, Val1); 1759df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } else if (Opc == Instruction::ICmp) { 1760df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!Val0->getType()->isIntOrIntVector() && 1761df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner !isa<PointerType>(Val0->getType())) 1762df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ID.Loc, "icmp requires pointer or integer operands"); 1763df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.ConstantVal = ConstantExpr::getICmp(Pred, Val0, Val1); 1764df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } else if (Opc == Instruction::VFCmp) { 1765df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // FIXME: REMOVE VFCMP Support 1766d0f9c730d4f0dcf008da0814ebcd6da90e4ba995Chris Lattner if (!Val0->getType()->isFPOrFPVector() || 1767d0f9c730d4f0dcf008da0814ebcd6da90e4ba995Chris Lattner !isa<VectorType>(Val0->getType())) 1768d0f9c730d4f0dcf008da0814ebcd6da90e4ba995Chris Lattner return Error(ID.Loc, "vfcmp requires vector floating point operands"); 1769df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.ConstantVal = ConstantExpr::getVFCmp(Pred, Val0, Val1); 1770df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } else if (Opc == Instruction::VICmp) { 1771d0f9c730d4f0dcf008da0814ebcd6da90e4ba995Chris Lattner // FIXME: REMOVE VICMP Support 1772d0f9c730d4f0dcf008da0814ebcd6da90e4ba995Chris Lattner if (!Val0->getType()->isIntOrIntVector() || 1773d0f9c730d4f0dcf008da0814ebcd6da90e4ba995Chris Lattner !isa<VectorType>(Val0->getType())) 1774d0f9c730d4f0dcf008da0814ebcd6da90e4ba995Chris Lattner return Error(ID.Loc, "vicmp requires vector floating point operands"); 1775df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.ConstantVal = ConstantExpr::getVICmp(Pred, Val0, Val1); 1776df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1777df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.Kind = ValID::t_Constant; 1778df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 1779df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1780df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1781df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Binary Operators. 1782df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_add: 1783df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_sub: 1784df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_mul: 1785df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_udiv: 1786df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_sdiv: 1787df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_fdiv: 1788df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_urem: 1789df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_srem: 1790df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_frem: { 1791df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned Opc = Lex.getUIntVal(); 1792df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Constant *Val0, *Val1; 1793df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 1794df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseToken(lltok::lparen, "expected '(' in binary constantexpr") || 1795df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseGlobalTypeAndValue(Val0) || 1796df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::comma, "expected comma in binary constantexpr") || 1797df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseGlobalTypeAndValue(Val1) || 1798df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::rparen, "expected ')' in binary constantexpr")) 1799df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 1800df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Val0->getType() != Val1->getType()) 1801df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ID.Loc, "operands of constexpr must have same type"); 1802df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!Val0->getType()->isIntOrIntVector() && 1803df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner !Val0->getType()->isFPOrFPVector()) 1804df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ID.Loc,"constexpr requires integer, fp, or vector operands"); 1805df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.ConstantVal = ConstantExpr::get(Opc, Val0, Val1); 1806df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.Kind = ValID::t_Constant; 1807df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 1808df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1809df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1810df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Logical Operations 1811df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_shl: 1812df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_lshr: 1813df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_ashr: 1814df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_and: 1815df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_or: 1816df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_xor: { 1817df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned Opc = Lex.getUIntVal(); 1818df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Constant *Val0, *Val1; 1819df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 1820df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseToken(lltok::lparen, "expected '(' in logical constantexpr") || 1821df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseGlobalTypeAndValue(Val0) || 1822df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::comma, "expected comma in logical constantexpr") || 1823df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseGlobalTypeAndValue(Val1) || 1824df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::rparen, "expected ')' in logical constantexpr")) 1825df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 1826df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Val0->getType() != Val1->getType()) 1827df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ID.Loc, "operands of constexpr must have same type"); 1828df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!Val0->getType()->isIntOrIntVector()) 1829df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ID.Loc, 1830df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner "constexpr requires integer or integer vector operands"); 1831df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.ConstantVal = ConstantExpr::get(Opc, Val0, Val1); 1832df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.Kind = ValID::t_Constant; 1833df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 1834df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1835df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1836df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_getelementptr: 1837df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_shufflevector: 1838df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_insertelement: 1839df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_extractelement: 1840df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_select: { 1841df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned Opc = Lex.getUIntVal(); 1842df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner SmallVector<Constant*, 16> Elts; 1843df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 1844df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseToken(lltok::lparen, "expected '(' in constantexpr") || 1845df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseGlobalValueVector(Elts) || 1846df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::rparen, "expected ')' in constantexpr")) 1847df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 1848df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1849df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Opc == Instruction::GetElementPtr) { 1850df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Elts.size() == 0 || !isa<PointerType>(Elts[0]->getType())) 1851df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ID.Loc, "getelementptr requires pointer operand"); 1852df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1853df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!GetElementPtrInst::getIndexedType(Elts[0]->getType(), 1854df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner (Value**)&Elts[1], Elts.size()-1)) 1855df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ID.Loc, "invalid indices for getelementptr"); 1856df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.ConstantVal = ConstantExpr::getGetElementPtr(Elts[0], 1857df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner &Elts[1], Elts.size()-1); 1858df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } else if (Opc == Instruction::Select) { 1859df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Elts.size() != 3) 1860df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ID.Loc, "expected three operands to select"); 1861df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (const char *Reason = SelectInst::areInvalidOperands(Elts[0], Elts[1], 1862df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Elts[2])) 1863df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ID.Loc, Reason); 1864df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.ConstantVal = ConstantExpr::getSelect(Elts[0], Elts[1], Elts[2]); 1865df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } else if (Opc == Instruction::ShuffleVector) { 1866df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Elts.size() != 3) 1867df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ID.Loc, "expected three operands to shufflevector"); 1868df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!ShuffleVectorInst::isValidOperands(Elts[0], Elts[1], Elts[2])) 1869df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ID.Loc, "invalid operands to shufflevector"); 1870df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.ConstantVal = ConstantExpr::getShuffleVector(Elts[0], Elts[1],Elts[2]); 1871df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } else if (Opc == Instruction::ExtractElement) { 1872df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Elts.size() != 2) 1873df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ID.Loc, "expected two operands to extractelement"); 1874df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!ExtractElementInst::isValidOperands(Elts[0], Elts[1])) 1875df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ID.Loc, "invalid extractelement operands"); 1876df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.ConstantVal = ConstantExpr::getExtractElement(Elts[0], Elts[1]); 1877df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } else { 1878df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner assert(Opc == Instruction::InsertElement && "Unknown opcode"); 1879df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Elts.size() != 3) 1880df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ID.Loc, "expected three operands to insertelement"); 1881df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!InsertElementInst::isValidOperands(Elts[0], Elts[1], Elts[2])) 1882df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ID.Loc, "invalid insertelement operands"); 1883df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.ConstantVal = ConstantExpr::getInsertElement(Elts[0], Elts[1],Elts[2]); 1884df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1885df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1886df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.Kind = ValID::t_Constant; 1887df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 1888df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1889df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1890df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1891df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 1892df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 1893df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 1894df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1895df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseGlobalValue - Parse a global value with the specified type. 1896df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseGlobalValue(const Type *Ty, Constant *&V) { 1897df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner V = 0; 1898df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ValID ID; 18993ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner return ParseValID(ID) || 19003ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner ConvertGlobalValIDToValue(Ty, ID, V); 1901df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 1902df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1903df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ConvertGlobalValIDToValue - Apply a type to a ValID to get a fully resolved 1904df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// constant. 1905df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ConvertGlobalValIDToValue(const Type *Ty, ValID &ID, 1906df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Constant *&V) { 1907df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (isa<FunctionType>(Ty)) 1908df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ID.Loc, "functions are not values, refer to them as pointers"); 1909df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1910df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner switch (ID.Kind) { 1911df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner default: assert(0 && "Unknown ValID!"); 1912df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case ValID::t_LocalID: 1913df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case ValID::t_LocalName: 1914df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ID.Loc, "invalid use of function-local name"); 1915df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case ValID::t_InlineAsm: 1916df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ID.Loc, "inline asm can only be an operand of call/invoke"); 1917df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case ValID::t_GlobalName: 1918df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner V = GetGlobalVal(ID.StrVal, Ty, ID.Loc); 1919df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return V == 0; 1920df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case ValID::t_GlobalID: 1921df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner V = GetGlobalVal(ID.UIntVal, Ty, ID.Loc); 1922df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return V == 0; 1923df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case ValID::t_APSInt: 1924df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!isa<IntegerType>(Ty)) 1925df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ID.Loc, "integer constant must have integer type"); 1926df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.APSIntVal.extOrTrunc(Ty->getPrimitiveSizeInBits()); 1927df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner V = ConstantInt::get(ID.APSIntVal); 1928df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 1929df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case ValID::t_APFloat: 1930df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!Ty->isFloatingPoint() || 1931df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner !ConstantFP::isValueValidForType(Ty, ID.APFloatVal)) 1932df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ID.Loc, "floating point constant invalid for type"); 1933df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1934df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // The lexer has no type info, so builds all float and double FP constants 1935df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // as double. Fix this here. Long double does not need this. 1936df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (&ID.APFloatVal.getSemantics() == &APFloat::IEEEdouble && 1937df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Ty == Type::FloatTy) { 1938df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner bool Ignored; 1939df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ID.APFloatVal.convert(APFloat::IEEEsingle, APFloat::rmNearestTiesToEven, 1940df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner &Ignored); 1941df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1942df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner V = ConstantFP::get(ID.APFloatVal); 1943959873d2da763c0e3b3c67c39aab179fc43c5a52Chris Lattner 1944959873d2da763c0e3b3c67c39aab179fc43c5a52Chris Lattner if (V->getType() != Ty) 1945959873d2da763c0e3b3c67c39aab179fc43c5a52Chris Lattner return Error(ID.Loc, "floating point constant does not have type '" + 1946959873d2da763c0e3b3c67c39aab179fc43c5a52Chris Lattner Ty->getDescription() + "'"); 1947959873d2da763c0e3b3c67c39aab179fc43c5a52Chris Lattner 1948df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 1949df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case ValID::t_Null: 1950df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!isa<PointerType>(Ty)) 1951df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ID.Loc, "null must be a pointer type"); 1952df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner V = ConstantPointerNull::get(cast<PointerType>(Ty)); 1953df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 1954df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case ValID::t_Undef: 1955e67c1aa3986cf98f2021a31a6ad502857c757b7bChris Lattner // FIXME: LabelTy should not be a first-class type. 19560b6163506359223fb0f74d856099ee4d5e768ebeChris Lattner if ((!Ty->isFirstClassType() || Ty == Type::LabelTy) && 19570b6163506359223fb0f74d856099ee4d5e768ebeChris Lattner !isa<OpaqueType>(Ty)) 1958e67c1aa3986cf98f2021a31a6ad502857c757b7bChris Lattner return Error(ID.Loc, "invalid type for undef constant"); 1959df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner V = UndefValue::get(Ty); 1960df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 1961081b505f77b183b7b029818218245cf4986e8948Chris Lattner case ValID::t_EmptyArray: 1962081b505f77b183b7b029818218245cf4986e8948Chris Lattner if (!isa<ArrayType>(Ty) || cast<ArrayType>(Ty)->getNumElements() != 0) 1963081b505f77b183b7b029818218245cf4986e8948Chris Lattner return Error(ID.Loc, "invalid empty array initializer"); 1964081b505f77b183b7b029818218245cf4986e8948Chris Lattner V = UndefValue::get(Ty); 1965081b505f77b183b7b029818218245cf4986e8948Chris Lattner return false; 1966df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case ValID::t_Zero: 1967e67c1aa3986cf98f2021a31a6ad502857c757b7bChris Lattner // FIXME: LabelTy should not be a first-class type. 1968e67c1aa3986cf98f2021a31a6ad502857c757b7bChris Lattner if (!Ty->isFirstClassType() || Ty == Type::LabelTy) 1969df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ID.Loc, "invalid type for null constant"); 1970df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner V = Constant::getNullValue(Ty); 1971df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 1972df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case ValID::t_Constant: 1973df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ID.ConstantVal->getType() != Ty) 1974df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ID.Loc, "constant expression type mismatch"); 1975df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner V = ID.ConstantVal; 1976df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 1977df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 1978df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 1979df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1980df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseGlobalTypeAndValue(Constant *&V) { 1981df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner PATypeHolder Type(Type::VoidTy); 1982df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return ParseType(Type) || 1983df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseGlobalValue(Type, V); 1984df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 1985df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 19863ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner/// ParseGlobalValueVector 19873ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner/// ::= /*empty*/ 19883ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner/// ::= TypeAndValue (',' TypeAndValue)* 1989df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseGlobalValueVector(SmallVectorImpl<Constant*> &Elts) { 1990df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Empty list. 1991df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Lex.getKind() == lltok::rbrace || 1992df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.getKind() == lltok::rsquare || 1993df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.getKind() == lltok::greater || 1994df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.getKind() == lltok::rparen) 1995df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 1996df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 1997df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Constant *C; 1998df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseGlobalTypeAndValue(C)) return true; 1999df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Elts.push_back(C); 2000df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 20013ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner while (EatIfPresent(lltok::comma)) { 2002df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseGlobalTypeAndValue(C)) return true; 2003df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Elts.push_back(C); 2004df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 2005df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2006df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 2007df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 2008df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2009df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2010df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner//===----------------------------------------------------------------------===// 2011df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner// Function Parsing. 2012df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner//===----------------------------------------------------------------------===// 2013df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2014df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ConvertValIDToValue(const Type *Ty, ValID &ID, Value *&V, 2015df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner PerFunctionState &PFS) { 2016df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ID.Kind == ValID::t_LocalID) 2017df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner V = PFS.GetVal(ID.UIntVal, Ty, ID.Loc); 2018df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner else if (ID.Kind == ValID::t_LocalName) 2019df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner V = PFS.GetVal(ID.StrVal, Ty, ID.Loc); 2020b0adcdb7e53dcd636a7eafba44d941ac23006473Steve Naroff else if (ID.Kind == ValID::t_InlineAsm) { 2021df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner const PointerType *PTy = dyn_cast<PointerType>(Ty); 2022df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner const FunctionType *FTy = 2023df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner PTy ? dyn_cast<FunctionType>(PTy->getElementType()) : 0; 2024df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!FTy || !InlineAsm::Verify(FTy, ID.StrVal2)) 2025df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ID.Loc, "invalid type for inline asm constraint string"); 2026df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner V = InlineAsm::get(FTy, ID.StrVal, ID.StrVal2, ID.UIntVal); 2027df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 2028df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } else { 2029df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Constant *C; 2030df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ConvertGlobalValIDToValue(Ty, ID, C)) return true; 2031df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner V = C; 2032df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 2033df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 2034df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2035df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return V == 0; 2036df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 2037df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2038df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseValue(const Type *Ty, Value *&V, PerFunctionState &PFS) { 2039df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner V = 0; 2040df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ValID ID; 20413ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner return ParseValID(ID) || 20423ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner ConvertValIDToValue(Ty, ID, V, PFS); 2043df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 2044df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2045df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseTypeAndValue(Value *&V, PerFunctionState &PFS) { 2046df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner PATypeHolder T(Type::VoidTy); 20473ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner return ParseType(T) || 20483ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner ParseValue(T, V, PFS); 2049df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 2050df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2051df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// FunctionHeader 2052df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= OptionalLinkage OptionalVisibility OptionalCallingConv OptRetAttrs 2053df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// Type GlobalName '(' ArgList ')' OptFuncAttrs OptSection 2054df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// OptionalAlign OptGC 2055df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseFunctionHeader(Function *&Fn, bool isDefine) { 2056df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Parse the linkage. 2057df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy LinkageLoc = Lex.getLoc(); 2058df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned Linkage; 2059df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2060df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned Visibility, CC, RetAttrs; 2061df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner PATypeHolder RetType(Type::VoidTy); 2062df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy RetTypeLoc = Lex.getLoc(); 2063df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseOptionalLinkage(Linkage) || 2064df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseOptionalVisibility(Visibility) || 2065df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseOptionalCallingConv(CC) || 2066df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseOptionalAttrs(RetAttrs, 1) || 2067df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseType(RetType, RetTypeLoc)) 2068df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 2069df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2070df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Verify that the linkage is ok. 2071df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner switch ((GlobalValue::LinkageTypes)Linkage) { 2072df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case GlobalValue::ExternalLinkage: 2073df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner break; // always ok. 2074df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case GlobalValue::DLLImportLinkage: 2075df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case GlobalValue::ExternalWeakLinkage: 2076df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (isDefine) 2077df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(LinkageLoc, "invalid linkage for function definition"); 2078df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner break; 2079bb46f52027416598a662dc1c58f48d9d56b1a65bRafael Espindola case GlobalValue::PrivateLinkage: 2080df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case GlobalValue::InternalLinkage: 2081df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case GlobalValue::LinkOnceLinkage: 2082df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case GlobalValue::WeakLinkage: 2083df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case GlobalValue::DLLExportLinkage: 2084df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!isDefine) 2085df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(LinkageLoc, "invalid linkage for function declaration"); 2086df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner break; 2087df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case GlobalValue::AppendingLinkage: 2088df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case GlobalValue::GhostLinkage: 2089df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case GlobalValue::CommonLinkage: 2090df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(LinkageLoc, "invalid function linkage type"); 2091df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 2092df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 209399bb315f32a5f82f9e4978345ee39177db973242Chris Lattner if (!FunctionType::isValidReturnType(RetType) || 209499bb315f32a5f82f9e4978345ee39177db973242Chris Lattner isa<OpaqueType>(RetType)) 2095df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(RetTypeLoc, "invalid function return type"); 2096df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2097f570e621ab6eec6c7656cc4c511e19aba12b42cdChris Lattner LocTy NameLoc = Lex.getLoc(); 2098f570e621ab6eec6c7656cc4c511e19aba12b42cdChris Lattner 2099f570e621ab6eec6c7656cc4c511e19aba12b42cdChris Lattner std::string FunctionName; 2100f570e621ab6eec6c7656cc4c511e19aba12b42cdChris Lattner if (Lex.getKind() == lltok::GlobalVar) { 2101f570e621ab6eec6c7656cc4c511e19aba12b42cdChris Lattner FunctionName = Lex.getStrVal(); 2102f570e621ab6eec6c7656cc4c511e19aba12b42cdChris Lattner } else if (Lex.getKind() == lltok::GlobalID) { // @42 is ok. 2103f570e621ab6eec6c7656cc4c511e19aba12b42cdChris Lattner unsigned NameID = Lex.getUIntVal(); 2104f570e621ab6eec6c7656cc4c511e19aba12b42cdChris Lattner 2105f570e621ab6eec6c7656cc4c511e19aba12b42cdChris Lattner if (NameID != NumberedVals.size()) 2106f570e621ab6eec6c7656cc4c511e19aba12b42cdChris Lattner return TokError("function expected to be numbered '%" + 2107f570e621ab6eec6c7656cc4c511e19aba12b42cdChris Lattner utostr(NumberedVals.size()) + "'"); 2108f570e621ab6eec6c7656cc4c511e19aba12b42cdChris Lattner } else { 2109df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return TokError("expected function name"); 2110f570e621ab6eec6c7656cc4c511e19aba12b42cdChris Lattner } 2111df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 21123ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner Lex.Lex(); 2113df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 21143ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner if (Lex.getKind() != lltok::lparen) 2115df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return TokError("expected '(' in function argument list"); 2116df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2117df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner std::vector<ArgInfo> ArgList; 2118df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner bool isVarArg; 2119df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned FuncAttrs; 2120df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner std::string Section; 2121df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned Alignment; 21223ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner std::string GC; 21233ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner 2124dfd19ddcfa7568d2118fbc3c6da612295200c31cChris Lattner if (ParseArgumentList(ArgList, isVarArg, false) || 21253ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner ParseOptionalAttrs(FuncAttrs, 2) || 21263ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner (EatIfPresent(lltok::kw_section) && 21273ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner ParseStringConstant(Section)) || 21283ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner ParseOptionalAlignment(Alignment) || 21293ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner (EatIfPresent(lltok::kw_gc) && 21303ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner ParseStringConstant(GC))) 21313ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner return true; 2132df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2133df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // If the alignment was parsed as an attribute, move to the alignment field. 2134df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (FuncAttrs & Attribute::Alignment) { 2135df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Alignment = Attribute::getAlignmentFromAttrs(FuncAttrs); 2136df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner FuncAttrs &= ~Attribute::Alignment; 2137df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 2138df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2139df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Okay, if we got here, the function is syntactically valid. Convert types 2140df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // and do semantic checks. 2141df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner std::vector<const Type*> ParamTypeList; 2142df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner SmallVector<AttributeWithIndex, 8> Attrs; 2143df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // FIXME : In 3.0, stop accepting zext, sext and inreg as optional function 2144df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // attributes. 2145df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned ObsoleteFuncAttrs = Attribute::ZExt|Attribute::SExt|Attribute::InReg; 2146df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (FuncAttrs & ObsoleteFuncAttrs) { 2147df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner RetAttrs |= FuncAttrs & ObsoleteFuncAttrs; 2148df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner FuncAttrs &= ~ObsoleteFuncAttrs; 2149df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 2150df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2151df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (RetAttrs != Attribute::None) 2152df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Attrs.push_back(AttributeWithIndex::get(0, RetAttrs)); 2153df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2154df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner for (unsigned i = 0, e = ArgList.size(); i != e; ++i) { 2155df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParamTypeList.push_back(ArgList[i].Type); 2156df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ArgList[i].Attrs != Attribute::None) 2157df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Attrs.push_back(AttributeWithIndex::get(i+1, ArgList[i].Attrs)); 2158df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 2159df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2160df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (FuncAttrs != Attribute::None) 2161df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Attrs.push_back(AttributeWithIndex::get(~0, FuncAttrs)); 2162df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2163df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner AttrListPtr PAL = AttrListPtr::get(Attrs.begin(), Attrs.end()); 2164df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2165df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner const FunctionType *FT = FunctionType::get(RetType, ParamTypeList, isVarArg); 2166df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner const PointerType *PFT = PointerType::getUnqual(FT); 2167df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2168df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Fn = 0; 2169df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!FunctionName.empty()) { 2170df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // If this was a definition of a forward reference, remove the definition 2171df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // from the forward reference table and fill in the forward ref. 2172df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner std::map<std::string, std::pair<GlobalValue*, LocTy> >::iterator FRVI = 2173df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ForwardRefVals.find(FunctionName); 2174df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (FRVI != ForwardRefVals.end()) { 2175df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Fn = M->getFunction(FunctionName); 2176df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ForwardRefVals.erase(FRVI); 2177df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } else if ((Fn = M->getFunction(FunctionName))) { 2178df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // If this function already exists in the symbol table, then it is 2179df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // multiply defined. We accept a few cases for old backwards compat. 2180df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // FIXME: Remove this stuff for LLVM 3.0. 2181df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Fn->getType() != PFT || Fn->getAttributes() != PAL || 2182df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner (!Fn->isDeclaration() && isDefine)) { 2183df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // If the redefinition has different type or different attributes, 2184df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // reject it. If both have bodies, reject it. 2185df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(NameLoc, "invalid redefinition of function '" + 2186df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner FunctionName + "'"); 2187df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } else if (Fn->isDeclaration()) { 2188df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Make sure to strip off any argument names so we can't get conflicts. 2189df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner for (Function::arg_iterator AI = Fn->arg_begin(), AE = Fn->arg_end(); 2190df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner AI != AE; ++AI) 2191df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner AI->setName(""); 2192df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 2193df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 2194df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2195df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } else if (FunctionName.empty()) { 2196df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // If this is a definition of a forward referenced function, make sure the 2197df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // types agree. 2198df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner std::map<unsigned, std::pair<GlobalValue*, LocTy> >::iterator I 2199df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner = ForwardRefValIDs.find(NumberedVals.size()); 2200df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (I != ForwardRefValIDs.end()) { 2201df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Fn = cast<Function>(I->second.first); 2202df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Fn->getType() != PFT) 2203df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(NameLoc, "type of definition and forward reference of '@" + 2204df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner utostr(NumberedVals.size()) +"' disagree"); 2205df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ForwardRefValIDs.erase(I); 2206df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 2207df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 2208df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2209df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Fn == 0) 2210df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Fn = Function::Create(FT, GlobalValue::ExternalLinkage, FunctionName, M); 2211df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner else // Move the forward-reference to the correct spot in the module. 2212df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner M->getFunctionList().splice(M->end(), M->getFunctionList(), Fn); 2213df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2214df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (FunctionName.empty()) 2215df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner NumberedVals.push_back(Fn); 2216df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2217df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Fn->setLinkage((GlobalValue::LinkageTypes)Linkage); 2218df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Fn->setVisibility((GlobalValue::VisibilityTypes)Visibility); 2219df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Fn->setCallingConv(CC); 2220df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Fn->setAttributes(PAL); 2221df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Fn->setAlignment(Alignment); 2222df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Fn->setSection(Section); 2223df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!GC.empty()) Fn->setGC(GC.c_str()); 2224df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2225df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Add all of the arguments we parsed to the function. 2226df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Function::arg_iterator ArgIt = Fn->arg_begin(); 2227df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner for (unsigned i = 0, e = ArgList.size(); i != e; ++i, ++ArgIt) { 2228df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // If the argument has a name, insert it into the argument symbol table. 2229df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ArgList[i].Name.empty()) continue; 2230df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2231df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Set the name, if it conflicted, it will be auto-renamed. 2232df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ArgIt->setName(ArgList[i].Name); 2233df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2234df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ArgIt->getNameStr() != ArgList[i].Name) 2235df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ArgList[i].Loc, "redefinition of argument '%" + 2236df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ArgList[i].Name + "'"); 2237df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 2238df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2239df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 2240df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 2241df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2242df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2243df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseFunctionBody 2244df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= '{' BasicBlock+ '}' 2245df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'begin' BasicBlock+ 'end' // FIXME: remove in LLVM 3.0 2246df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// 2247df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseFunctionBody(Function &Fn) { 2248df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Lex.getKind() != lltok::lbrace && Lex.getKind() != lltok::kw_begin) 2249df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return TokError("expected '{' in function body"); 2250df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); // eat the {. 2251df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2252df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner PerFunctionState PFS(*this, Fn); 2253df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2254df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner while (Lex.getKind() != lltok::rbrace && Lex.getKind() != lltok::kw_end) 2255df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseBasicBlock(PFS)) return true; 2256df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2257df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Eat the }. 2258df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 2259df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2260df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Verify function is ok. 2261df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return PFS.VerifyFunctionComplete(); 2262df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 2263df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2264df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseBasicBlock 2265df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= LabelStr? Instruction* 2266df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseBasicBlock(PerFunctionState &PFS) { 2267df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // If this basic block starts out with a name, remember it. 2268df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner std::string Name; 2269df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy NameLoc = Lex.getLoc(); 2270df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Lex.getKind() == lltok::LabelStr) { 2271df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Name = Lex.getStrVal(); 2272df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 2273df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 2274df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2275df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner BasicBlock *BB = PFS.DefineBB(Name, NameLoc); 2276df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (BB == 0) return true; 2277df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2278df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner std::string NameStr; 2279df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2280df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Parse the instructions in this block until we get a terminator. 2281df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Instruction *Inst; 2282df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner do { 2283df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // This instruction may have three possibilities for a name: a) none 2284df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // specified, b) name specified "%foo =", c) number specified: "%4 =". 2285df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy NameLoc = Lex.getLoc(); 2286df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner int NameID = -1; 2287df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner NameStr = ""; 2288df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2289df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Lex.getKind() == lltok::LocalVarID) { 2290df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner NameID = Lex.getUIntVal(); 2291df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 2292df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseToken(lltok::equal, "expected '=' after instruction id")) 2293df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 2294df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } else if (Lex.getKind() == lltok::LocalVar || 2295df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // FIXME: REMOVE IN LLVM 3.0 2296df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.getKind() == lltok::StringConstant) { 2297df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner NameStr = Lex.getStrVal(); 2298df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 2299df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseToken(lltok::equal, "expected '=' after instruction name")) 2300df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 2301df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 2302df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2303df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseInstruction(Inst, BB, PFS)) return true; 2304df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2305df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner BB->getInstList().push_back(Inst); 2306df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2307df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Set the name on the instruction. 2308df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (PFS.SetInstName(NameID, NameStr, NameLoc, Inst)) return true; 2309df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } while (!isa<TerminatorInst>(Inst)); 2310df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2311df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 2312df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 2313df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2314df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner//===----------------------------------------------------------------------===// 2315df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner// Instruction Parsing. 2316df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner//===----------------------------------------------------------------------===// 2317df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2318df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseInstruction - Parse one of the many different instructions. 2319df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// 2320df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseInstruction(Instruction *&Inst, BasicBlock *BB, 2321df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner PerFunctionState &PFS) { 2322df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner lltok::Kind Token = Lex.getKind(); 2323df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Token == lltok::Eof) 2324df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return TokError("found end of file when expecting more instructions"); 2325df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy Loc = Lex.getLoc(); 2326df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); // Eat the keyword. 2327df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2328df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner switch (Token) { 2329df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner default: return Error(Loc, "expected instruction opcode"); 2330df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Terminator Instructions. 2331df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_unwind: Inst = new UnwindInst(); return false; 2332df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_unreachable: Inst = new UnreachableInst(); return false; 2333df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_ret: return ParseRet(Inst, BB, PFS); 2334df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_br: return ParseBr(Inst, PFS); 2335df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_switch: return ParseSwitch(Inst, PFS); 2336df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_invoke: return ParseInvoke(Inst, PFS); 2337df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Binary Operators. 2338df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_add: 2339df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_sub: 2340e914b59c008745204c49fcf0751f9cc4d91f44bbChris Lattner case lltok::kw_mul: return ParseArithmetic(Inst, PFS, Lex.getUIntVal(), 0); 2341e914b59c008745204c49fcf0751f9cc4d91f44bbChris Lattner 2342df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_udiv: 2343df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_sdiv: 2344df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_urem: 2345e914b59c008745204c49fcf0751f9cc4d91f44bbChris Lattner case lltok::kw_srem: return ParseArithmetic(Inst, PFS, Lex.getUIntVal(), 1); 2346e914b59c008745204c49fcf0751f9cc4d91f44bbChris Lattner case lltok::kw_fdiv: 2347e914b59c008745204c49fcf0751f9cc4d91f44bbChris Lattner case lltok::kw_frem: return ParseArithmetic(Inst, PFS, Lex.getUIntVal(), 2); 2348df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_shl: 2349df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_lshr: 2350df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_ashr: 2351df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_and: 2352df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_or: 2353df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_xor: return ParseLogical(Inst, PFS, Lex.getUIntVal()); 2354df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_icmp: 2355df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_fcmp: 2356df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_vicmp: 2357df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_vfcmp: return ParseCompare(Inst, PFS, Lex.getUIntVal()); 2358df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Casts. 2359df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_trunc: 2360df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_zext: 2361df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_sext: 2362df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_fptrunc: 2363df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_fpext: 2364df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_bitcast: 2365df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_uitofp: 2366df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_sitofp: 2367df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_fptoui: 2368df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_fptosi: 2369df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_inttoptr: 2370df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_ptrtoint: return ParseCast(Inst, PFS, Lex.getUIntVal()); 2371df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Other. 2372df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_select: return ParseSelect(Inst, PFS); 23730088a5cc722b9e32820d31c70175a7650ad4772dChris Lattner case lltok::kw_va_arg: return ParseVA_Arg(Inst, PFS); 2374df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_extractelement: return ParseExtractElement(Inst, PFS); 2375df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_insertelement: return ParseInsertElement(Inst, PFS); 2376df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_shufflevector: return ParseShuffleVector(Inst, PFS); 2377df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_phi: return ParsePHI(Inst, PFS); 2378df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_call: return ParseCall(Inst, PFS, false); 2379df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_tail: return ParseCall(Inst, PFS, true); 2380df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Memory. 2381df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_alloca: 2382df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_malloc: return ParseAlloc(Inst, PFS, Lex.getUIntVal()); 2383df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_free: return ParseFree(Inst, PFS); 2384df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_load: return ParseLoad(Inst, PFS, false); 2385df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_store: return ParseStore(Inst, PFS, false); 2386df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_volatile: 23873ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner if (EatIfPresent(lltok::kw_load)) 2388df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return ParseLoad(Inst, PFS, true); 23893ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner else if (EatIfPresent(lltok::kw_store)) 2390df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return ParseStore(Inst, PFS, true); 23913ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner else 2392df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return TokError("expected 'load' or 'store'"); 2393df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_getresult: return ParseGetResult(Inst, PFS); 2394df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_getelementptr: return ParseGetElementPtr(Inst, PFS); 2395df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_extractvalue: return ParseExtractValue(Inst, PFS); 2396df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_insertvalue: return ParseInsertValue(Inst, PFS); 2397df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 2398df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 2399df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2400df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseCmpPredicate - Parse an integer or fp predicate, based on Kind. 2401df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseCmpPredicate(unsigned &P, unsigned Opc) { 2402df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // FIXME: REMOVE vicmp/vfcmp! 2403df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Opc == Instruction::FCmp || Opc == Instruction::VFCmp) { 2404df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner switch (Lex.getKind()) { 2405df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner default: TokError("expected fcmp predicate (e.g. 'oeq')"); 2406df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_oeq: P = CmpInst::FCMP_OEQ; break; 2407df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_one: P = CmpInst::FCMP_ONE; break; 2408df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_olt: P = CmpInst::FCMP_OLT; break; 2409df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_ogt: P = CmpInst::FCMP_OGT; break; 2410df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_ole: P = CmpInst::FCMP_OLE; break; 2411df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_oge: P = CmpInst::FCMP_OGE; break; 2412df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_ord: P = CmpInst::FCMP_ORD; break; 2413df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_uno: P = CmpInst::FCMP_UNO; break; 2414df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_ueq: P = CmpInst::FCMP_UEQ; break; 2415df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_une: P = CmpInst::FCMP_UNE; break; 2416df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_ult: P = CmpInst::FCMP_ULT; break; 2417df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_ugt: P = CmpInst::FCMP_UGT; break; 2418df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_ule: P = CmpInst::FCMP_ULE; break; 2419df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_uge: P = CmpInst::FCMP_UGE; break; 2420df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_true: P = CmpInst::FCMP_TRUE; break; 2421df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_false: P = CmpInst::FCMP_FALSE; break; 2422df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 2423df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } else { 2424df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner switch (Lex.getKind()) { 2425df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner default: TokError("expected icmp predicate (e.g. 'eq')"); 2426df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_eq: P = CmpInst::ICMP_EQ; break; 2427df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_ne: P = CmpInst::ICMP_NE; break; 2428df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_slt: P = CmpInst::ICMP_SLT; break; 2429df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_sgt: P = CmpInst::ICMP_SGT; break; 2430df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_sle: P = CmpInst::ICMP_SLE; break; 2431df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_sge: P = CmpInst::ICMP_SGE; break; 2432df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_ult: P = CmpInst::ICMP_ULT; break; 2433df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_ugt: P = CmpInst::ICMP_UGT; break; 2434df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_ule: P = CmpInst::ICMP_ULE; break; 2435df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case lltok::kw_uge: P = CmpInst::ICMP_UGE; break; 2436df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 2437df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 2438df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); 2439df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 2440df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 2441df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2442df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner//===----------------------------------------------------------------------===// 2443df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner// Terminator Instructions. 2444df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner//===----------------------------------------------------------------------===// 2445df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2446df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseRet - Parse a return instruction. 2447df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'ret' void 2448df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'ret' TypeAndValue 2449df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'ret' TypeAndValue (',' TypeAndValue)+ [[obsolete: LLVM 3.0]] 2450df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseRet(Instruction *&Inst, BasicBlock *BB, 2451df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner PerFunctionState &PFS) { 2452df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner PATypeHolder Ty(Type::VoidTy); 2453df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseType(Ty)) return true; 2454df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2455df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Ty == Type::VoidTy) { 2456df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Inst = ReturnInst::Create(); 2457df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 2458df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 2459df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2460df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Value *RV; 2461df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseValue(Ty, RV, PFS)) return true; 2462df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2463df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // The normal case is one return value. 2464df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Lex.getKind() == lltok::comma) { 2465df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // FIXME: LLVM 3.0 remove MRV support for 'ret i32 1, i32 2', requiring use 2466df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // of 'ret {i32,i32} {i32 1, i32 2}' 2467df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner SmallVector<Value*, 8> RVs; 2468df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner RVs.push_back(RV); 2469df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 24703ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner while (EatIfPresent(lltok::comma)) { 2471df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseTypeAndValue(RV, PFS)) return true; 2472df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner RVs.push_back(RV); 2473df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 2474df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2475df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner RV = UndefValue::get(PFS.getFunction().getReturnType()); 2476df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner for (unsigned i = 0, e = RVs.size(); i != e; ++i) { 2477df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Instruction *I = InsertValueInst::Create(RV, RVs[i], i, "mrv"); 2478df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner BB->getInstList().push_back(I); 2479df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner RV = I; 2480df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 2481df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 2482df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Inst = ReturnInst::Create(RV); 2483df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 2484df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 2485df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2486df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2487df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseBr 2488df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'br' TypeAndValue 2489df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'br' TypeAndValue ',' TypeAndValue ',' TypeAndValue 2490df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseBr(Instruction *&Inst, PerFunctionState &PFS) { 2491df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy Loc, Loc2; 2492df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Value *Op0, *Op1, *Op2; 2493df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseTypeAndValue(Op0, Loc, PFS)) return true; 2494df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2495df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (BasicBlock *BB = dyn_cast<BasicBlock>(Op0)) { 2496df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Inst = BranchInst::Create(BB); 2497df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 2498df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 2499df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2500df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Op0->getType() != Type::Int1Ty) 2501df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(Loc, "branch condition must have 'i1' type"); 2502df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2503df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseToken(lltok::comma, "expected ',' after branch condition") || 2504df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseTypeAndValue(Op1, Loc, PFS) || 2505df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::comma, "expected ',' after true destination") || 2506df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseTypeAndValue(Op2, Loc2, PFS)) 2507df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 2508df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2509df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!isa<BasicBlock>(Op1)) 2510df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(Loc, "true destination of branch must be a basic block"); 2511df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!isa<BasicBlock>(Op2)) 2512df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(Loc2, "true destination of branch must be a basic block"); 2513df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2514df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Inst = BranchInst::Create(cast<BasicBlock>(Op1), cast<BasicBlock>(Op2), Op0); 2515df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 2516df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 2517df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2518df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseSwitch 2519df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// Instruction 2520df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'switch' TypeAndValue ',' TypeAndValue '[' JumpTable ']' 2521df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// JumpTable 2522df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= (TypeAndValue ',' TypeAndValue)* 2523df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseSwitch(Instruction *&Inst, PerFunctionState &PFS) { 2524df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy CondLoc, BBLoc; 2525df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Value *Cond, *DefaultBB; 2526df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseTypeAndValue(Cond, CondLoc, PFS) || 2527df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::comma, "expected ',' after switch condition") || 2528df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseTypeAndValue(DefaultBB, BBLoc, PFS) || 2529df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::lsquare, "expected '[' with switch table")) 2530df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 2531df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2532df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!isa<IntegerType>(Cond->getType())) 2533df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(CondLoc, "switch condition must have integer type"); 2534df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!isa<BasicBlock>(DefaultBB)) 2535df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(BBLoc, "default destination must be a basic block"); 2536df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2537df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Parse the jump table pairs. 2538df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner SmallPtrSet<Value*, 32> SeenCases; 2539df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner SmallVector<std::pair<ConstantInt*, BasicBlock*>, 32> Table; 2540df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner while (Lex.getKind() != lltok::rsquare) { 2541df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Value *Constant, *DestBB; 2542df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2543df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseTypeAndValue(Constant, CondLoc, PFS) || 2544df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::comma, "expected ',' after case value") || 2545df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseTypeAndValue(DestBB, BBLoc, PFS)) 2546df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 2547df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2548df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!SeenCases.insert(Constant)) 2549df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(CondLoc, "duplicate case value in switch"); 2550df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!isa<ConstantInt>(Constant)) 2551df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(CondLoc, "case value is not a constant integer"); 2552df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!isa<BasicBlock>(DestBB)) 2553df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(BBLoc, "case destination is not a basic block"); 2554df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2555df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Table.push_back(std::make_pair(cast<ConstantInt>(Constant), 2556df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner cast<BasicBlock>(DestBB))); 2557df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 2558df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2559df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Lex.Lex(); // Eat the ']'. 2560df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2561df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner SwitchInst *SI = SwitchInst::Create(Cond, cast<BasicBlock>(DefaultBB), 2562df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Table.size()); 2563df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner for (unsigned i = 0, e = Table.size(); i != e; ++i) 2564df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner SI->addCase(Table[i].first, Table[i].second); 2565df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Inst = SI; 2566df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 2567df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 2568df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2569df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseInvoke 2570df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'invoke' OptionalCallingConv OptionalAttrs Type Value ParamList 2571df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// OptionalAttrs 'to' TypeAndValue 'unwind' TypeAndValue 2572df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseInvoke(Instruction *&Inst, PerFunctionState &PFS) { 2573df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy CallLoc = Lex.getLoc(); 2574df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned CC, RetAttrs, FnAttrs; 2575df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner PATypeHolder RetType(Type::VoidTy); 2576df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy RetTypeLoc; 2577df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ValID CalleeID; 2578df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner SmallVector<ParamInfo, 16> ArgList; 2579df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2580df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Value *NormalBB, *UnwindBB; 2581df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseOptionalCallingConv(CC) || 2582df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseOptionalAttrs(RetAttrs, 1) || 2583df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseType(RetType, RetTypeLoc) || 2584df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseValID(CalleeID) || 2585df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseParameterList(ArgList, PFS) || 2586df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseOptionalAttrs(FnAttrs, 2) || 2587df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::kw_to, "expected 'to' in invoke") || 2588df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseTypeAndValue(NormalBB, PFS) || 2589df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::kw_unwind, "expected 'unwind' in invoke") || 2590df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseTypeAndValue(UnwindBB, PFS)) 2591df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 2592df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2593df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!isa<BasicBlock>(NormalBB)) 2594df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(CallLoc, "normal destination is not a basic block"); 2595df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!isa<BasicBlock>(UnwindBB)) 2596df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(CallLoc, "unwind destination is not a basic block"); 2597df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2598df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // If RetType is a non-function pointer type, then this is the short syntax 2599df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // for the call, which means that RetType is just the return type. Infer the 2600df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // rest of the function argument types from the arguments that are present. 2601df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner const PointerType *PFTy = 0; 2602df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner const FunctionType *Ty = 0; 2603df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!(PFTy = dyn_cast<PointerType>(RetType)) || 2604df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner !(Ty = dyn_cast<FunctionType>(PFTy->getElementType()))) { 2605df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Pull out the types of all of the arguments... 2606df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner std::vector<const Type*> ParamTypes; 2607df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner for (unsigned i = 0, e = ArgList.size(); i != e; ++i) 2608df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParamTypes.push_back(ArgList[i].V->getType()); 2609df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2610df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!FunctionType::isValidReturnType(RetType)) 2611df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(RetTypeLoc, "Invalid result type for LLVM function"); 2612df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2613df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Ty = FunctionType::get(RetType, ParamTypes, false); 2614df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner PFTy = PointerType::getUnqual(Ty); 2615df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 2616df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2617df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Look up the callee. 2618df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Value *Callee; 2619df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ConvertValIDToValue(PFTy, CalleeID, Callee, PFS)) return true; 2620df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2621df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // FIXME: In LLVM 3.0, stop accepting zext, sext and inreg as optional 2622df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // function attributes. 2623df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned ObsoleteFuncAttrs = Attribute::ZExt|Attribute::SExt|Attribute::InReg; 2624df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (FnAttrs & ObsoleteFuncAttrs) { 2625df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner RetAttrs |= FnAttrs & ObsoleteFuncAttrs; 2626df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner FnAttrs &= ~ObsoleteFuncAttrs; 2627df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 2628df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2629df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Set up the Attributes for the function. 2630df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner SmallVector<AttributeWithIndex, 8> Attrs; 2631df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (RetAttrs != Attribute::None) 2632df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Attrs.push_back(AttributeWithIndex::get(0, RetAttrs)); 2633df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2634df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner SmallVector<Value*, 8> Args; 2635df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2636df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Loop through FunctionType's arguments and ensure they are specified 2637df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // correctly. Also, gather any parameter attributes. 2638df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner FunctionType::param_iterator I = Ty->param_begin(); 2639df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner FunctionType::param_iterator E = Ty->param_end(); 2640df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner for (unsigned i = 0, e = ArgList.size(); i != e; ++i) { 2641df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner const Type *ExpectedTy = 0; 2642df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (I != E) { 2643df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ExpectedTy = *I++; 2644df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } else if (!Ty->isVarArg()) { 2645df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ArgList[i].Loc, "too many arguments specified"); 2646df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 2647df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2648df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ExpectedTy && ExpectedTy != ArgList[i].V->getType()) 2649df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ArgList[i].Loc, "argument is not of expected type '" + 2650df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ExpectedTy->getDescription() + "'"); 2651df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Args.push_back(ArgList[i].V); 2652df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ArgList[i].Attrs != Attribute::None) 2653df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Attrs.push_back(AttributeWithIndex::get(i+1, ArgList[i].Attrs)); 2654df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 2655df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2656df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (I != E) 2657df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(CallLoc, "not enough parameters specified for call"); 2658df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2659df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (FnAttrs != Attribute::None) 2660df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Attrs.push_back(AttributeWithIndex::get(~0, FnAttrs)); 2661df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2662df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Finish off the Attributes and check them 2663df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner AttrListPtr PAL = AttrListPtr::get(Attrs.begin(), Attrs.end()); 2664df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2665df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner InvokeInst *II = InvokeInst::Create(Callee, cast<BasicBlock>(NormalBB), 2666df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner cast<BasicBlock>(UnwindBB), 2667df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Args.begin(), Args.end()); 2668df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner II->setCallingConv(CC); 2669df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner II->setAttributes(PAL); 2670df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Inst = II; 2671df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 2672df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 2673df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2674df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2675df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2676df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner//===----------------------------------------------------------------------===// 2677df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner// Binary Operators. 2678df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner//===----------------------------------------------------------------------===// 2679df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2680df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseArithmetic 2681e914b59c008745204c49fcf0751f9cc4d91f44bbChris Lattner/// ::= ArithmeticOps TypeAndValue ',' Value 2682e914b59c008745204c49fcf0751f9cc4d91f44bbChris Lattner/// 2683e914b59c008745204c49fcf0751f9cc4d91f44bbChris Lattner/// If OperandType is 0, then any FP or integer operand is allowed. If it is 1, 2684e914b59c008745204c49fcf0751f9cc4d91f44bbChris Lattner/// then any integer operand is allowed, if it is 2, any fp operand is allowed. 2685df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseArithmetic(Instruction *&Inst, PerFunctionState &PFS, 2686e914b59c008745204c49fcf0751f9cc4d91f44bbChris Lattner unsigned Opc, unsigned OperandType) { 2687df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy Loc; Value *LHS, *RHS; 2688df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseTypeAndValue(LHS, Loc, PFS) || 2689df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::comma, "expected ',' in arithmetic operation") || 2690df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseValue(LHS->getType(), RHS, PFS)) 2691df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 2692df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2693e914b59c008745204c49fcf0751f9cc4d91f44bbChris Lattner bool Valid; 2694e914b59c008745204c49fcf0751f9cc4d91f44bbChris Lattner switch (OperandType) { 2695e914b59c008745204c49fcf0751f9cc4d91f44bbChris Lattner default: assert(0 && "Unknown operand type!"); 2696e914b59c008745204c49fcf0751f9cc4d91f44bbChris Lattner case 0: // int or FP. 2697e914b59c008745204c49fcf0751f9cc4d91f44bbChris Lattner Valid = LHS->getType()->isIntOrIntVector() || 2698e914b59c008745204c49fcf0751f9cc4d91f44bbChris Lattner LHS->getType()->isFPOrFPVector(); 2699e914b59c008745204c49fcf0751f9cc4d91f44bbChris Lattner break; 2700e914b59c008745204c49fcf0751f9cc4d91f44bbChris Lattner case 1: Valid = LHS->getType()->isIntOrIntVector(); break; 2701e914b59c008745204c49fcf0751f9cc4d91f44bbChris Lattner case 2: Valid = LHS->getType()->isFPOrFPVector(); break; 2702e914b59c008745204c49fcf0751f9cc4d91f44bbChris Lattner } 2703e914b59c008745204c49fcf0751f9cc4d91f44bbChris Lattner 2704e914b59c008745204c49fcf0751f9cc4d91f44bbChris Lattner if (!Valid) 2705e914b59c008745204c49fcf0751f9cc4d91f44bbChris Lattner return Error(Loc, "invalid operand type for instruction"); 2706df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2707df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Inst = BinaryOperator::Create((Instruction::BinaryOps)Opc, LHS, RHS); 2708df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 2709df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 2710df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2711df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseLogical 2712df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= ArithmeticOps TypeAndValue ',' Value { 2713df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseLogical(Instruction *&Inst, PerFunctionState &PFS, 2714df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned Opc) { 2715df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy Loc; Value *LHS, *RHS; 2716df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseTypeAndValue(LHS, Loc, PFS) || 2717df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::comma, "expected ',' in logical operation") || 2718df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseValue(LHS->getType(), RHS, PFS)) 2719df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 2720df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2721df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!LHS->getType()->isIntOrIntVector()) 2722df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(Loc,"instruction requires integer or integer vector operands"); 2723df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2724df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Inst = BinaryOperator::Create((Instruction::BinaryOps)Opc, LHS, RHS); 2725df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 2726df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 2727df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2728df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2729df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseCompare 2730df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'icmp' IPredicates TypeAndValue ',' Value 2731df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'fcmp' FPredicates TypeAndValue ',' Value 2732df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'vicmp' IPredicates TypeAndValue ',' Value 2733df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'vfcmp' FPredicates TypeAndValue ',' Value 2734df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseCompare(Instruction *&Inst, PerFunctionState &PFS, 2735df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned Opc) { 2736df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Parse the integer/fp comparison predicate. 2737df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy Loc; 2738df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned Pred; 2739df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Value *LHS, *RHS; 2740df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseCmpPredicate(Pred, Opc) || 2741df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseTypeAndValue(LHS, Loc, PFS) || 2742df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::comma, "expected ',' after compare value") || 2743df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseValue(LHS->getType(), RHS, PFS)) 2744df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 2745df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2746df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Opc == Instruction::FCmp) { 2747df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!LHS->getType()->isFPOrFPVector()) 2748df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(Loc, "fcmp requires floating point operands"); 2749df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Inst = new FCmpInst(CmpInst::Predicate(Pred), LHS, RHS); 2750df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } else if (Opc == Instruction::ICmp) { 2751df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!LHS->getType()->isIntOrIntVector() && 2752df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner !isa<PointerType>(LHS->getType())) 2753df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(Loc, "icmp requires integer operands"); 2754df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Inst = new ICmpInst(CmpInst::Predicate(Pred), LHS, RHS); 2755df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } else if (Opc == Instruction::VFCmp) { 27564a1c4a414ca8ab087dd365eb2e5421ee8535c7aeChris Lattner if (!LHS->getType()->isFPOrFPVector() || !isa<VectorType>(LHS->getType())) 27574a1c4a414ca8ab087dd365eb2e5421ee8535c7aeChris Lattner return Error(Loc, "vfcmp requires vector floating point operands"); 2758df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Inst = new VFCmpInst(CmpInst::Predicate(Pred), LHS, RHS); 2759df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } else if (Opc == Instruction::VICmp) { 27604a1c4a414ca8ab087dd365eb2e5421ee8535c7aeChris Lattner if (!LHS->getType()->isIntOrIntVector() || !isa<VectorType>(LHS->getType())) 27614a1c4a414ca8ab087dd365eb2e5421ee8535c7aeChris Lattner return Error(Loc, "vicmp requires vector floating point operands"); 2762df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Inst = new VICmpInst(CmpInst::Predicate(Pred), LHS, RHS); 2763df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 2764df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 2765df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 2766df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2767df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner//===----------------------------------------------------------------------===// 2768df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner// Other Instructions. 2769df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner//===----------------------------------------------------------------------===// 2770df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2771df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2772df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseCast 2773df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= CastOpc TypeAndValue 'to' Type 2774df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseCast(Instruction *&Inst, PerFunctionState &PFS, 2775df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned Opc) { 2776df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy Loc; Value *Op; 2777df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner PATypeHolder DestTy(Type::VoidTy); 2778df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseTypeAndValue(Op, Loc, PFS) || 2779df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::kw_to, "expected 'to' after cast value") || 2780df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseType(DestTy)) 2781df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 2782df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2783df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!CastInst::castIsValid((Instruction::CastOps)Opc, Op, DestTy)) 2784df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(Loc, "invalid cast opcode for cast from '" + 2785df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Op->getType()->getDescription() + "' to '" + 2786df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner DestTy->getDescription() + "'"); 2787df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Inst = CastInst::Create((Instruction::CastOps)Opc, Op, DestTy); 2788df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 2789df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 2790df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2791df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseSelect 2792df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'select' TypeAndValue ',' TypeAndValue ',' TypeAndValue 2793df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseSelect(Instruction *&Inst, PerFunctionState &PFS) { 2794df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy Loc; 2795df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Value *Op0, *Op1, *Op2; 2796df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseTypeAndValue(Op0, Loc, PFS) || 2797df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::comma, "expected ',' after select condition") || 2798df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseTypeAndValue(Op1, PFS) || 2799df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::comma, "expected ',' after select value") || 2800df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseTypeAndValue(Op2, PFS)) 2801df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 2802df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2803df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (const char *Reason = SelectInst::areInvalidOperands(Op0, Op1, Op2)) 2804df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(Loc, Reason); 2805df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2806df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Inst = SelectInst::Create(Op0, Op1, Op2); 2807df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 2808df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 2809df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 28100088a5cc722b9e32820d31c70175a7650ad4772dChris Lattner/// ParseVA_Arg 28110088a5cc722b9e32820d31c70175a7650ad4772dChris Lattner/// ::= 'va_arg' TypeAndValue ',' Type 28120088a5cc722b9e32820d31c70175a7650ad4772dChris Lattnerbool LLParser::ParseVA_Arg(Instruction *&Inst, PerFunctionState &PFS) { 2813df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Value *Op; 2814df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner PATypeHolder EltTy(Type::VoidTy); 28150088a5cc722b9e32820d31c70175a7650ad4772dChris Lattner LocTy TypeLoc; 2816df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseTypeAndValue(Op, PFS) || 2817df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::comma, "expected ',' after vaarg operand") || 28180088a5cc722b9e32820d31c70175a7650ad4772dChris Lattner ParseType(EltTy, TypeLoc)) 2819df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 28200088a5cc722b9e32820d31c70175a7650ad4772dChris Lattner 28210088a5cc722b9e32820d31c70175a7650ad4772dChris Lattner if (!EltTy->isFirstClassType()) 28220088a5cc722b9e32820d31c70175a7650ad4772dChris Lattner return Error(TypeLoc, "va_arg requires operand with first class type"); 2823df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2824df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Inst = new VAArgInst(Op, EltTy); 2825df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 2826df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 2827df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2828df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseExtractElement 2829df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'extractelement' TypeAndValue ',' TypeAndValue 2830df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseExtractElement(Instruction *&Inst, PerFunctionState &PFS) { 2831df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy Loc; 2832df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Value *Op0, *Op1; 2833df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseTypeAndValue(Op0, Loc, PFS) || 2834df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::comma, "expected ',' after extract value") || 2835df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseTypeAndValue(Op1, PFS)) 2836df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 2837df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2838df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!ExtractElementInst::isValidOperands(Op0, Op1)) 2839df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(Loc, "invalid extractelement operands"); 2840df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2841df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Inst = new ExtractElementInst(Op0, Op1); 2842df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 2843df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 2844df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2845df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseInsertElement 2846df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'insertelement' TypeAndValue ',' TypeAndValue ',' TypeAndValue 2847df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseInsertElement(Instruction *&Inst, PerFunctionState &PFS) { 2848df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy Loc; 2849df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Value *Op0, *Op1, *Op2; 2850df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseTypeAndValue(Op0, Loc, PFS) || 2851df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::comma, "expected ',' after insertelement value") || 2852df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseTypeAndValue(Op1, PFS) || 2853df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::comma, "expected ',' after insertelement value") || 2854df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseTypeAndValue(Op2, PFS)) 2855df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 2856df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2857df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!InsertElementInst::isValidOperands(Op0, Op1, Op2)) 2858df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(Loc, "invalid extractelement operands"); 2859df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2860df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Inst = InsertElementInst::Create(Op0, Op1, Op2); 2861df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 2862df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 2863df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2864df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseShuffleVector 2865df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'shufflevector' TypeAndValue ',' TypeAndValue ',' TypeAndValue 2866df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseShuffleVector(Instruction *&Inst, PerFunctionState &PFS) { 2867df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy Loc; 2868df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Value *Op0, *Op1, *Op2; 2869df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseTypeAndValue(Op0, Loc, PFS) || 2870df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::comma, "expected ',' after shuffle mask") || 2871df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseTypeAndValue(Op1, PFS) || 2872df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::comma, "expected ',' after shuffle value") || 2873df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseTypeAndValue(Op2, PFS)) 2874df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 2875df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2876df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!ShuffleVectorInst::isValidOperands(Op0, Op1, Op2)) 2877df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(Loc, "invalid extractelement operands"); 2878df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2879df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Inst = new ShuffleVectorInst(Op0, Op1, Op2); 2880df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 2881df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 2882df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2883df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParsePHI 2884df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'phi' Type '[' Value ',' Value ']' (',' '[' Value ',' Valueß ']')* 2885df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParsePHI(Instruction *&Inst, PerFunctionState &PFS) { 2886df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner PATypeHolder Ty(Type::VoidTy); 2887df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Value *Op0, *Op1; 2888df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy TypeLoc = Lex.getLoc(); 2889df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2890df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseType(Ty) || 2891df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::lsquare, "expected '[' in phi value list") || 2892df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseValue(Ty, Op0, PFS) || 2893df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::comma, "expected ',' after insertelement value") || 2894df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseValue(Type::LabelTy, Op1, PFS) || 2895df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::rsquare, "expected ']' in phi value list")) 2896df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 2897df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2898df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner SmallVector<std::pair<Value*, BasicBlock*>, 16> PHIVals; 2899df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner while (1) { 2900df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner PHIVals.push_back(std::make_pair(Op0, cast<BasicBlock>(Op1))); 2901df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 29023ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner if (!EatIfPresent(lltok::comma)) 2903df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner break; 2904df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 29053ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner if (ParseToken(lltok::lsquare, "expected '[' in phi value list") || 2906df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseValue(Ty, Op0, PFS) || 2907df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::comma, "expected ',' after insertelement value") || 2908df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseValue(Type::LabelTy, Op1, PFS) || 2909df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::rsquare, "expected ']' in phi value list")) 2910df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 2911df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 2912df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2913df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!Ty->isFirstClassType()) 2914df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(TypeLoc, "phi node must have first class type"); 2915df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2916df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner PHINode *PN = PHINode::Create(Ty); 2917df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner PN->reserveOperandSpace(PHIVals.size()); 2918df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner for (unsigned i = 0, e = PHIVals.size(); i != e; ++i) 2919df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner PN->addIncoming(PHIVals[i].first, PHIVals[i].second); 2920df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Inst = PN; 2921df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 2922df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 2923df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2924df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseCall 2925df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'tail'? 'call' OptionalCallingConv OptionalAttrs Type Value 2926df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParameterList OptionalAttrs 2927df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseCall(Instruction *&Inst, PerFunctionState &PFS, 2928df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner bool isTail) { 2929df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned CC, RetAttrs, FnAttrs; 2930df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner PATypeHolder RetType(Type::VoidTy); 2931df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy RetTypeLoc; 2932df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ValID CalleeID; 2933df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner SmallVector<ParamInfo, 16> ArgList; 2934df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy CallLoc = Lex.getLoc(); 2935df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2936df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if ((isTail && ParseToken(lltok::kw_call, "expected 'tail call'")) || 2937df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseOptionalCallingConv(CC) || 2938df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseOptionalAttrs(RetAttrs, 1) || 2939df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseType(RetType, RetTypeLoc) || 2940df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseValID(CalleeID) || 2941df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseParameterList(ArgList, PFS) || 2942df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseOptionalAttrs(FnAttrs, 2)) 2943df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 2944df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2945df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // If RetType is a non-function pointer type, then this is the short syntax 2946df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // for the call, which means that RetType is just the return type. Infer the 2947df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // rest of the function argument types from the arguments that are present. 2948df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner const PointerType *PFTy = 0; 2949df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner const FunctionType *Ty = 0; 2950df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!(PFTy = dyn_cast<PointerType>(RetType)) || 2951df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner !(Ty = dyn_cast<FunctionType>(PFTy->getElementType()))) { 2952df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Pull out the types of all of the arguments... 2953df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner std::vector<const Type*> ParamTypes; 2954df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner for (unsigned i = 0, e = ArgList.size(); i != e; ++i) 2955df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParamTypes.push_back(ArgList[i].V->getType()); 2956df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2957df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!FunctionType::isValidReturnType(RetType)) 2958df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(RetTypeLoc, "Invalid result type for LLVM function"); 2959df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2960df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Ty = FunctionType::get(RetType, ParamTypes, false); 2961df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner PFTy = PointerType::getUnqual(Ty); 2962df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 2963df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2964df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Look up the callee. 2965df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Value *Callee; 2966df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ConvertValIDToValue(PFTy, CalleeID, Callee, PFS)) return true; 2967df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2968df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // FIXME: In LLVM 3.0, stop accepting zext, sext and inreg as optional 2969df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // function attributes. 2970df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned ObsoleteFuncAttrs = Attribute::ZExt|Attribute::SExt|Attribute::InReg; 2971df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (FnAttrs & ObsoleteFuncAttrs) { 2972df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner RetAttrs |= FnAttrs & ObsoleteFuncAttrs; 2973df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner FnAttrs &= ~ObsoleteFuncAttrs; 2974df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 2975df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2976df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Set up the Attributes for the function. 2977df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner SmallVector<AttributeWithIndex, 8> Attrs; 2978df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (RetAttrs != Attribute::None) 2979df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Attrs.push_back(AttributeWithIndex::get(0, RetAttrs)); 2980df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2981df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner SmallVector<Value*, 8> Args; 2982df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2983df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Loop through FunctionType's arguments and ensure they are specified 2984df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // correctly. Also, gather any parameter attributes. 2985df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner FunctionType::param_iterator I = Ty->param_begin(); 2986df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner FunctionType::param_iterator E = Ty->param_end(); 2987df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner for (unsigned i = 0, e = ArgList.size(); i != e; ++i) { 2988df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner const Type *ExpectedTy = 0; 2989df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (I != E) { 2990df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ExpectedTy = *I++; 2991df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } else if (!Ty->isVarArg()) { 2992df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ArgList[i].Loc, "too many arguments specified"); 2993df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 2994df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 2995df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ExpectedTy && ExpectedTy != ArgList[i].V->getType()) 2996df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ArgList[i].Loc, "argument is not of expected type '" + 2997df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ExpectedTy->getDescription() + "'"); 2998df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Args.push_back(ArgList[i].V); 2999df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ArgList[i].Attrs != Attribute::None) 3000df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Attrs.push_back(AttributeWithIndex::get(i+1, ArgList[i].Attrs)); 3001df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 3002df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 3003df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (I != E) 3004df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(CallLoc, "not enough parameters specified for call"); 3005df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 3006df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (FnAttrs != Attribute::None) 3007df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Attrs.push_back(AttributeWithIndex::get(~0, FnAttrs)); 3008df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 3009df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Finish off the Attributes and check them 3010df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner AttrListPtr PAL = AttrListPtr::get(Attrs.begin(), Attrs.end()); 3011df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 3012df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner CallInst *CI = CallInst::Create(Callee, Args.begin(), Args.end()); 3013df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner CI->setTailCall(isTail); 3014df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner CI->setCallingConv(CC); 3015df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner CI->setAttributes(PAL); 3016df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Inst = CI; 3017df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 3018df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 3019df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 3020df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner//===----------------------------------------------------------------------===// 3021df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner// Memory Instructions. 3022df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner//===----------------------------------------------------------------------===// 3023df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 3024df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseAlloc 3025df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'malloc' Type (',' TypeAndValue)? (',' OptionalAlignment)? 3026df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'alloca' Type (',' TypeAndValue)? (',' OptionalAlignment)? 3027df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseAlloc(Instruction *&Inst, PerFunctionState &PFS, 3028df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned Opc) { 3029df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner PATypeHolder Ty(Type::VoidTy); 3030df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Value *Size = 0; 3031df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner LocTy SizeLoc = 0; 3032df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned Alignment = 0; 30333ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner if (ParseType(Ty)) return true; 3034df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 30353ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner if (EatIfPresent(lltok::comma)) { 3036df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Lex.getKind() == lltok::kw_align) { 3037df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseOptionalAlignment(Alignment)) return true; 30383ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner } else if (ParseTypeAndValue(Size, SizeLoc, PFS) || 30393ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner ParseOptionalCommaAlignment(Alignment)) { 30403ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner return true; 3041df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 3042df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 3043df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 3044df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Size && Size->getType() != Type::Int32Ty) 3045df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(SizeLoc, "element count must be i32"); 3046df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 3047df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Opc == Instruction::Malloc) 3048df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Inst = new MallocInst(Ty, Size, Alignment); 3049df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner else 3050df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Inst = new AllocaInst(Ty, Size, Alignment); 3051df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 3052df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 3053df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 3054df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseFree 3055df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'free' TypeAndValue 3056df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseFree(Instruction *&Inst, PerFunctionState &PFS) { 3057df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Value *Val; LocTy Loc; 3058df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseTypeAndValue(Val, Loc, PFS)) return true; 3059df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!isa<PointerType>(Val->getType())) 3060df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(Loc, "operand to free must be a pointer"); 3061df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Inst = new FreeInst(Val); 3062df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 3063df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 3064df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 3065df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseLoad 3066df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'volatile'? 'load' TypeAndValue (',' 'align' uint)? 3067df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseLoad(Instruction *&Inst, PerFunctionState &PFS, 3068df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner bool isVolatile) { 3069df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Value *Val; LocTy Loc; 3070df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned Alignment; 3071df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseTypeAndValue(Val, Loc, PFS) || 3072df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseOptionalCommaAlignment(Alignment)) 3073df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 3074df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 3075df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!isa<PointerType>(Val->getType()) || 3076df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner !cast<PointerType>(Val->getType())->getElementType()->isFirstClassType()) 3077df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(Loc, "load operand must be a pointer to a first class type"); 3078df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 3079df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Inst = new LoadInst(Val, "", isVolatile, Alignment); 3080df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 3081df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 3082df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 3083df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseStore 3084df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'volatile'? 'store' TypeAndValue ',' TypeAndValue (',' 'align' uint)? 3085df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseStore(Instruction *&Inst, PerFunctionState &PFS, 3086df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner bool isVolatile) { 3087df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Value *Val, *Ptr; LocTy Loc, PtrLoc; 3088df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned Alignment; 3089df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseTypeAndValue(Val, Loc, PFS) || 3090df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::comma, "expected ',' after store operand") || 3091df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseTypeAndValue(Ptr, PtrLoc, PFS) || 3092df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseOptionalCommaAlignment(Alignment)) 3093df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 3094df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 3095df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!isa<PointerType>(Ptr->getType())) 3096df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(PtrLoc, "store operand must be a pointer"); 3097df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!Val->getType()->isFirstClassType()) 3098df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(Loc, "store operand must be a first class value"); 3099df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (cast<PointerType>(Ptr->getType())->getElementType() != Val->getType()) 3100df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(Loc, "stored value and pointer type do not match"); 3101df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 3102df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Inst = new StoreInst(Val, Ptr, isVolatile, Alignment); 3103df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 3104df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 3105df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 3106df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseGetResult 3107df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'getresult' TypeAndValue ',' uint 3108df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// FIXME: Remove support for getresult in LLVM 3.0 3109df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseGetResult(Instruction *&Inst, PerFunctionState &PFS) { 3110df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Value *Val; LocTy ValLoc, EltLoc; 3111df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner unsigned Element; 3112df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseTypeAndValue(Val, ValLoc, PFS) || 3113df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::comma, "expected ',' after getresult operand") || 31143ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner ParseUInt32(Element, EltLoc)) 3115df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 3116df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 3117df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!isa<StructType>(Val->getType()) && !isa<ArrayType>(Val->getType())) 3118df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(ValLoc, "getresult inst requires an aggregate operand"); 3119df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!ExtractValueInst::getIndexedType(Val->getType(), Element)) 3120df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(EltLoc, "invalid getresult index for value"); 3121df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Inst = ExtractValueInst::Create(Val, Element); 3122df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 3123df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 3124df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 3125df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseGetElementPtr 3126df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'getelementptr' TypeAndValue (',' TypeAndValue)* 3127df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseGetElementPtr(Instruction *&Inst, PerFunctionState &PFS) { 3128df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Value *Ptr, *Val; LocTy Loc, EltLoc; 31293ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner if (ParseTypeAndValue(Ptr, Loc, PFS)) return true; 3130df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 3131df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!isa<PointerType>(Ptr->getType())) 3132df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(Loc, "base of getelementptr must be a pointer"); 3133df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 3134df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner SmallVector<Value*, 16> Indices; 31353ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner while (EatIfPresent(lltok::comma)) { 31363ed88efb03c63aae5542efcdfc5cedec9bc4c18aChris Lattner if (ParseTypeAndValue(Val, EltLoc, PFS)) return true; 3137df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!isa<IntegerType>(Val->getType())) 3138df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(EltLoc, "getelementptr index must be an integer"); 3139df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Indices.push_back(Val); 3140df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner } 3141df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 3142df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!GetElementPtrInst::getIndexedType(Ptr->getType(), 3143df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Indices.begin(), Indices.end())) 3144df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(Loc, "invalid getelementptr indices"); 3145df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Inst = GetElementPtrInst::Create(Ptr, Indices.begin(), Indices.end()); 3146df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 3147df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 3148df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 3149df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseExtractValue 3150df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'extractvalue' TypeAndValue (',' uint32)+ 3151df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseExtractValue(Instruction *&Inst, PerFunctionState &PFS) { 3152df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Value *Val; LocTy Loc; 3153df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner SmallVector<unsigned, 4> Indices; 3154df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseTypeAndValue(Val, Loc, PFS) || 3155df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseIndexList(Indices)) 3156df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 3157df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 3158df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!isa<StructType>(Val->getType()) && !isa<ArrayType>(Val->getType())) 3159df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(Loc, "extractvalue operand must be array or struct"); 3160df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 3161df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!ExtractValueInst::getIndexedType(Val->getType(), Indices.begin(), 3162df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Indices.end())) 3163df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(Loc, "invalid indices for extractvalue"); 3164df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Inst = ExtractValueInst::Create(Val, Indices.begin(), Indices.end()); 3165df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 3166df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 3167df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 3168df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ParseInsertValue 3169df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// ::= 'insertvalue' TypeAndValue ',' TypeAndValue (',' uint32)+ 3170df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerbool LLParser::ParseInsertValue(Instruction *&Inst, PerFunctionState &PFS) { 3171df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Value *Val0, *Val1; LocTy Loc0, Loc1; 3172df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner SmallVector<unsigned, 4> Indices; 3173df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (ParseTypeAndValue(Val0, Loc0, PFS) || 3174df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseToken(lltok::comma, "expected comma after insertvalue operand") || 3175df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseTypeAndValue(Val1, Loc1, PFS) || 3176df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner ParseIndexList(Indices)) 3177df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 3178df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 3179df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!isa<StructType>(Val0->getType()) && !isa<ArrayType>(Val0->getType())) 3180df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(Loc0, "extractvalue operand must be array or struct"); 3181df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 3182df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (!ExtractValueInst::getIndexedType(Val0->getType(), Indices.begin(), 3183df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Indices.end())) 3184df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return Error(Loc0, "invalid indices for insertvalue"); 3185df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Inst = InsertValueInst::Create(Val0, Val1, Indices.begin(), Indices.end()); 3186df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return false; 3187df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 3188