LLLexer.cpp revision 9100a78bce4e1d34d8ffd5efa2cc79ed864dd1c0
18e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner//===- LLLexer.cpp - Lexer for .ll Files ----------------------------------===// 28e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner// 38e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner// The LLVM Compiler Infrastructure 48e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner// 54ee451de366474b9c228b4e5fa573795a715216dChris Lattner// This file is distributed under the University of Illinois Open Source 64ee451de366474b9c228b4e5fa573795a715216dChris Lattner// License. See LICENSE.TXT for details. 78e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner// 88e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner//===----------------------------------------------------------------------===// 98e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner// 108e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner// Implement the Lexer for .ll files. 118e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner// 128e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner//===----------------------------------------------------------------------===// 138e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner 148e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner#include "LLLexer.h" 15df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner#include "llvm/DerivedTypes.h" 16df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner#include "llvm/Instruction.h" 17ff6c91efcf62d1cb99343fdcb2de6271520a1981Owen Anderson#include "llvm/LLVMContext.h" 18d1e1703c39742f3c9fc3d27a442ff59bbdbfb5aaBenjamin Kramer#include "llvm/ADT/Twine.h" 19d1e1703c39742f3c9fc3d27a442ff59bbdbfb5aaBenjamin Kramer#include "llvm/Assembly/Parser.h" 20c25e7581b9b8088910da31702d4ca21c4734c6d7Torok Edwin#include "llvm/Support/ErrorHandling.h" 218e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner#include "llvm/Support/MemoryBuffer.h" 22d185f64f828ce1f8b476807a4a1345c0c53d8213Chris Lattner#include "llvm/Support/MathExtras.h" 2392bcb426c3e4503c99324afd4ed0a73521711a56Chris Lattner#include "llvm/Support/SourceMgr.h" 24df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner#include "llvm/Support/raw_ostream.h" 25476b242fe7a61e5f9ac6214b0bc5c680d24f152eNick Lewycky#include <cctype> 26bcef7df6ec9aba7c5009a4d33944f80227563665Duncan Sands#include <cstdio> 27a896176973d59d8e22514b363d31e8d1becf185eChris Lattner#include <cstdlib> 285679d18c54ef46170e46f51bf471bb334f2b6525Misha Brukman#include <cstring> 298e3a8e0452695643d04c21e15c94b802aef81baeChris Lattnerusing namespace llvm; 308e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner 31d1e1703c39742f3c9fc3d27a442ff59bbdbfb5aaBenjamin Kramerbool LLLexer::Error(LocTy ErrorLoc, const Twine &Msg) const { 32eeb4a84ac8d91fb1d5a7c484a1c7047409faee30Chris Lattner ErrorInfo = SM.GetMessage(ErrorLoc, Msg, "error"); 33df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return true; 34df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner} 35df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 368e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner//===----------------------------------------------------------------------===// 378e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner// Helper functions. 388e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner//===----------------------------------------------------------------------===// 398e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner 408e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner// atoull - Convert an ascii string of decimal digits into the unsigned long 418e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner// long representation... this does not have to do input error checking, 428e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner// because we know that the input will be matched by a suitable regex... 438e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner// 44df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattneruint64_t LLLexer::atoull(const char *Buffer, const char *End) { 458e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner uint64_t Result = 0; 468e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner for (; Buffer != End; Buffer++) { 478e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner uint64_t OldRes = Result; 488e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner Result *= 10; 498e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner Result += *Buffer-'0'; 508e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (Result < OldRes) { // Uh, oh, overflow detected!!! 51df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Error("constant bigger than 64 bits detected!"); 528e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner return 0; 538e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 548e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 558e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner return Result; 568e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner} 578e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner 58df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattneruint64_t LLLexer::HexIntToVal(const char *Buffer, const char *End) { 598e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner uint64_t Result = 0; 608e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner for (; Buffer != End; ++Buffer) { 618e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner uint64_t OldRes = Result; 628e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner Result *= 16; 638e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner char C = *Buffer; 648e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (C >= '0' && C <= '9') 658e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner Result += C-'0'; 668e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner else if (C >= 'A' && C <= 'F') 678e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner Result += C-'A'+10; 688e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner else if (C >= 'a' && C <= 'f') 698e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner Result += C-'a'+10; 702c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 718e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (Result < OldRes) { // Uh, oh, overflow detected!!! 72df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Error("constant bigger than 64 bits detected!"); 738e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner return 0; 748e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 758e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 768e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner return Result; 778e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner} 788e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner 79df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnervoid LLLexer::HexToIntPair(const char *Buffer, const char *End, 80df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner uint64_t Pair[2]) { 818e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner Pair[0] = 0; 828e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner for (int i=0; i<16; i++, Buffer++) { 838e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner assert(Buffer != End); 848e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner Pair[0] *= 16; 858e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner char C = *Buffer; 868e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (C >= '0' && C <= '9') 878e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner Pair[0] += C-'0'; 888e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner else if (C >= 'A' && C <= 'F') 898e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner Pair[0] += C-'A'+10; 908e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner else if (C >= 'a' && C <= 'f') 918e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner Pair[0] += C-'a'+10; 928e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 938e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner Pair[1] = 0; 948e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner for (int i=0; i<16 && Buffer != End; i++, Buffer++) { 958e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner Pair[1] *= 16; 968e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner char C = *Buffer; 978e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (C >= '0' && C <= '9') 988e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner Pair[1] += C-'0'; 998e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner else if (C >= 'A' && C <= 'F') 1008e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner Pair[1] += C-'A'+10; 1018e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner else if (C >= 'a' && C <= 'f') 1028e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner Pair[1] += C-'a'+10; 1038e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 104d343c6b70ec03b357d42e47ce7c00b3c3cb78efdChris Lattner if (Buffer != End) 105df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Error("constant bigger than 128 bits detected!"); 1068e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner} 1078e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner 1081b25cb2416c46a6cebf2a6c52235e9fe46a10d11Dale Johannesen/// FP80HexToIntPair - translate an 80 bit FP80 number (20 hexits) into 1091b25cb2416c46a6cebf2a6c52235e9fe46a10d11Dale Johannesen/// { low64, high16 } as usual for an APInt. 1101b25cb2416c46a6cebf2a6c52235e9fe46a10d11Dale Johannesenvoid LLLexer::FP80HexToIntPair(const char *Buffer, const char *End, 1111b25cb2416c46a6cebf2a6c52235e9fe46a10d11Dale Johannesen uint64_t Pair[2]) { 1121b25cb2416c46a6cebf2a6c52235e9fe46a10d11Dale Johannesen Pair[1] = 0; 1131b25cb2416c46a6cebf2a6c52235e9fe46a10d11Dale Johannesen for (int i=0; i<4 && Buffer != End; i++, Buffer++) { 1141b25cb2416c46a6cebf2a6c52235e9fe46a10d11Dale Johannesen assert(Buffer != End); 1151b25cb2416c46a6cebf2a6c52235e9fe46a10d11Dale Johannesen Pair[1] *= 16; 1161b25cb2416c46a6cebf2a6c52235e9fe46a10d11Dale Johannesen char C = *Buffer; 1171b25cb2416c46a6cebf2a6c52235e9fe46a10d11Dale Johannesen if (C >= '0' && C <= '9') 1181b25cb2416c46a6cebf2a6c52235e9fe46a10d11Dale Johannesen Pair[1] += C-'0'; 1191b25cb2416c46a6cebf2a6c52235e9fe46a10d11Dale Johannesen else if (C >= 'A' && C <= 'F') 1201b25cb2416c46a6cebf2a6c52235e9fe46a10d11Dale Johannesen Pair[1] += C-'A'+10; 1211b25cb2416c46a6cebf2a6c52235e9fe46a10d11Dale Johannesen else if (C >= 'a' && C <= 'f') 1221b25cb2416c46a6cebf2a6c52235e9fe46a10d11Dale Johannesen Pair[1] += C-'a'+10; 1231b25cb2416c46a6cebf2a6c52235e9fe46a10d11Dale Johannesen } 1241b25cb2416c46a6cebf2a6c52235e9fe46a10d11Dale Johannesen Pair[0] = 0; 1251b25cb2416c46a6cebf2a6c52235e9fe46a10d11Dale Johannesen for (int i=0; i<16; i++, Buffer++) { 1261b25cb2416c46a6cebf2a6c52235e9fe46a10d11Dale Johannesen Pair[0] *= 16; 1271b25cb2416c46a6cebf2a6c52235e9fe46a10d11Dale Johannesen char C = *Buffer; 1281b25cb2416c46a6cebf2a6c52235e9fe46a10d11Dale Johannesen if (C >= '0' && C <= '9') 1291b25cb2416c46a6cebf2a6c52235e9fe46a10d11Dale Johannesen Pair[0] += C-'0'; 1301b25cb2416c46a6cebf2a6c52235e9fe46a10d11Dale Johannesen else if (C >= 'A' && C <= 'F') 1311b25cb2416c46a6cebf2a6c52235e9fe46a10d11Dale Johannesen Pair[0] += C-'A'+10; 1321b25cb2416c46a6cebf2a6c52235e9fe46a10d11Dale Johannesen else if (C >= 'a' && C <= 'f') 1331b25cb2416c46a6cebf2a6c52235e9fe46a10d11Dale Johannesen Pair[0] += C-'a'+10; 1341b25cb2416c46a6cebf2a6c52235e9fe46a10d11Dale Johannesen } 1351b25cb2416c46a6cebf2a6c52235e9fe46a10d11Dale Johannesen if (Buffer != End) 1361b25cb2416c46a6cebf2a6c52235e9fe46a10d11Dale Johannesen Error("constant bigger than 128 bits detected!"); 1371b25cb2416c46a6cebf2a6c52235e9fe46a10d11Dale Johannesen} 1381b25cb2416c46a6cebf2a6c52235e9fe46a10d11Dale Johannesen 1398e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner// UnEscapeLexed - Run through the specified buffer and change \xx codes to the 1408e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner// appropriate character. 1418e3a8e0452695643d04c21e15c94b802aef81baeChris Lattnerstatic void UnEscapeLexed(std::string &Str) { 1428e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (Str.empty()) return; 1432c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 1448e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner char *Buffer = &Str[0], *EndBuffer = Buffer+Str.size(); 1458e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner char *BOut = Buffer; 1468e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner for (char *BIn = Buffer; BIn != EndBuffer; ) { 1478e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (BIn[0] == '\\') { 1488e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (BIn < EndBuffer-1 && BIn[1] == '\\') { 1498e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner *BOut++ = '\\'; // Two \ becomes one 1508e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner BIn += 2; 1518e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } else if (BIn < EndBuffer-2 && isxdigit(BIn[1]) && isxdigit(BIn[2])) { 1528e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner char Tmp = BIn[3]; BIn[3] = 0; // Terminate string 1538e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner *BOut = (char)strtol(BIn+1, 0, 16); // Convert to number 1548e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner BIn[3] = Tmp; // Restore character 1558e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner BIn += 3; // Skip over handled chars 1568e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner ++BOut; 1578e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } else { 1588e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner *BOut++ = *BIn++; 1598e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 1608e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } else { 1618e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner *BOut++ = *BIn++; 1628e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 1638e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 1648e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner Str.resize(BOut-Buffer); 1658e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner} 1668e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner 1678e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner/// isLabelChar - Return true for [-a-zA-Z$._0-9]. 1688e3a8e0452695643d04c21e15c94b802aef81baeChris Lattnerstatic bool isLabelChar(char C) { 1698e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner return isalnum(C) || C == '-' || C == '$' || C == '.' || C == '_'; 1708e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner} 1718e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner 1728e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner 1738e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner/// isLabelTail - Return true if this pointer points to a valid end of a label. 1748e3a8e0452695643d04c21e15c94b802aef81baeChris Lattnerstatic const char *isLabelTail(const char *CurPtr) { 1758e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner while (1) { 1768e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (CurPtr[0] == ':') return CurPtr+1; 1778e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (!isLabelChar(CurPtr[0])) return 0; 1788e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner ++CurPtr; 1798e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 1808e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner} 1818e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner 1828e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner 1838e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner 1848e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner//===----------------------------------------------------------------------===// 1858e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner// Lexer definition. 1868e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner//===----------------------------------------------------------------------===// 1878e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner 188ff6c91efcf62d1cb99343fdcb2de6271520a1981Owen AndersonLLLexer::LLLexer(MemoryBuffer *StartBuf, SourceMgr &sm, SMDiagnostic &Err, 189ff6c91efcf62d1cb99343fdcb2de6271520a1981Owen Anderson LLVMContext &C) 190ff6c91efcf62d1cb99343fdcb2de6271520a1981Owen Anderson : CurBuf(StartBuf), ErrorInfo(Err), SM(sm), Context(C), APFloatVal(0.0) { 1918e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner CurPtr = CurBuf->getBufferStart(); 1928e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner} 1938e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner 1948e3a8e0452695643d04c21e15c94b802aef81baeChris Lattnerstd::string LLLexer::getFilename() const { 1958e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner return CurBuf->getBufferIdentifier(); 1968e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner} 1978e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner 1988e3a8e0452695643d04c21e15c94b802aef81baeChris Lattnerint LLLexer::getNextChar() { 1998e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner char CurChar = *CurPtr++; 2008e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner switch (CurChar) { 2018e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner default: return (unsigned char)CurChar; 2028e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner case 0: 2038e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // A nul character in the stream is either the end of the current buffer or 2048e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // a random nul in the file. Disambiguate that here. 2058e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (CurPtr-1 != CurBuf->getBufferEnd()) 2068e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner return 0; // Just whitespace. 2072c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 2088e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // Otherwise, return end of file. 2092c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling --CurPtr; // Another call to lex will return EOF again. 2108e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner return EOF; 2112c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling } 2128e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner} 2138e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner 2148e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner 215df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerlltok::Kind LLLexer::LexToken() { 2168e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner TokStart = CurPtr; 2172c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 2188e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner int CurChar = getNextChar(); 2198e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner switch (CurChar) { 2208e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner default: 2218e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // Handle letters: [a-zA-Z_] 2228e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (isalpha(CurChar) || CurChar == '_') 2238e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner return LexIdentifier(); 2242c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 225df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::Error; 226df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case EOF: return lltok::Eof; 2278e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner case 0: 2288e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner case ' ': 2298e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner case '\t': 2308e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner case '\n': 2318e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner case '\r': 2328e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // Ignore whitespace. 2338e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner return LexToken(); 2348e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner case '+': return LexPositive(); 2358e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner case '@': return LexAt(); 2368e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner case '%': return LexPercent(); 2378e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner case '"': return LexQuote(); 2388e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner case '.': 2398e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (const char *Ptr = isLabelTail(CurPtr)) { 2408e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner CurPtr = Ptr; 241df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner StrVal.assign(TokStart, CurPtr-1); 242df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::LabelStr; 2438e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 2448e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (CurPtr[0] == '.' && CurPtr[1] == '.') { 2458e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner CurPtr += 2; 246df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::dotdotdot; 2478e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 248df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::Error; 2498e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner case '$': 2508e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (const char *Ptr = isLabelTail(CurPtr)) { 2518e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner CurPtr = Ptr; 252df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner StrVal.assign(TokStart, CurPtr-1); 253df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::LabelStr; 2548e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 255df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::Error; 2568e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner case ';': 2578e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner SkipLineComment(); 2588e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner return LexToken(); 259e434d277ca5183eeb6f881000732dcf4c8edd52eChris Lattner case '!': return LexExclaim(); 2608e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner case '0': case '1': case '2': case '3': case '4': 2618e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner case '5': case '6': case '7': case '8': case '9': 2622c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling case '-': 2638e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner return LexDigitOrNegative(); 264df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case '=': return lltok::equal; 265df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case '[': return lltok::lsquare; 266df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case ']': return lltok::rsquare; 267df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case '{': return lltok::lbrace; 268df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case '}': return lltok::rbrace; 269df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case '<': return lltok::less; 270df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case '>': return lltok::greater; 271df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case '(': return lltok::lparen; 272df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case ')': return lltok::rparen; 273df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case ',': return lltok::comma; 274df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case '*': return lltok::star; 275df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner case '\\': return lltok::backslash; 2768e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 2778e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner} 2788e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner 2798e3a8e0452695643d04c21e15c94b802aef81baeChris Lattnervoid LLLexer::SkipLineComment() { 2808e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner while (1) { 2818e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (CurPtr[0] == '\n' || CurPtr[0] == '\r' || getNextChar() == EOF) 2828e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner return; 2838e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 2848e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner} 2858e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner 2868e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner/// LexAt - Lex all tokens that start with an @ character: 287df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// GlobalVar @\"[^\"]*\" 288df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// GlobalVar @[-a-zA-Z$._][-a-zA-Z$._0-9]* 289df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// GlobalVarID @[0-9]+ 290df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerlltok::Kind LLLexer::LexAt() { 2918e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // Handle AtStringConstant: @\"[^\"]*\" 2928e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (CurPtr[0] == '"') { 2938e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner ++CurPtr; 2942c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 2958e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner while (1) { 2968e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner int CurChar = getNextChar(); 2972c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 2982c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling if (CurChar == EOF) { 299df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Error("end of file in global variable name"); 300df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::Error; 3018e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 3028e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (CurChar == '"') { 303df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner StrVal.assign(TokStart+2, CurPtr-1); 304df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner UnEscapeLexed(StrVal); 305df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::GlobalVar; 3068e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 3078e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 3088e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 3092c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 3108e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // Handle GlobalVarName: @[-a-zA-Z$._][-a-zA-Z$._0-9]* 3119fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky if (ReadVarName()) 312df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::GlobalVar; 3132c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 3148e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // Handle GlobalVarID: @[0-9]+ 3158e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (isdigit(CurPtr[0])) { 3162c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling for (++CurPtr; isdigit(CurPtr[0]); ++CurPtr) 3172c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling /*empty*/; 3182c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 3198e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner uint64_t Val = atoull(TokStart+1, CurPtr); 3208e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if ((unsigned)Val != Val) 321df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Error("invalid value number (too large)!"); 322df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner UIntVal = unsigned(Val); 323df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::GlobalID; 3248e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 3252c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 326df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::Error; 3278e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner} 3288e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner 3299fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky/// ReadString - Read a string until the closing quote. 3309fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewyckylltok::Kind LLLexer::ReadString(lltok::Kind kind) { 3319fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky const char *Start = CurPtr; 3329fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky while (1) { 3339fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky int CurChar = getNextChar(); 3349fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky 3359fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky if (CurChar == EOF) { 3369fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky Error("end of file in string constant"); 3379fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky return lltok::Error; 3389fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky } 3399fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky if (CurChar == '"') { 3409fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky StrVal.assign(Start, CurPtr-1); 3419fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky UnEscapeLexed(StrVal); 3429fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky return kind; 3439fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky } 3449fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky } 3459fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky} 3469fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky 3479fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky/// ReadVarName - Read the rest of a token containing a variable name. 3489fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewyckybool LLLexer::ReadVarName() { 3499fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky const char *NameStart = CurPtr; 3509fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky if (isalpha(CurPtr[0]) || CurPtr[0] == '-' || CurPtr[0] == '$' || 3519fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky CurPtr[0] == '.' || CurPtr[0] == '_') { 3529fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky ++CurPtr; 3539fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky while (isalnum(CurPtr[0]) || CurPtr[0] == '-' || CurPtr[0] == '$' || 3549fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky CurPtr[0] == '.' || CurPtr[0] == '_') 3559fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky ++CurPtr; 3569fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky 3579fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky StrVal.assign(NameStart, CurPtr); 3589fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky return true; 3599fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky } 3609fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky return false; 3619fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky} 3628e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner 3638e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner/// LexPercent - Lex all tokens that start with a % character: 364df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// LocalVar ::= %\"[^\"]*\" 365df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// LocalVar ::= %[-a-zA-Z$._][-a-zA-Z$._0-9]* 366df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner/// LocalVarID ::= %[0-9]+ 367df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerlltok::Kind LLLexer::LexPercent() { 368df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Handle LocalVarName: %\"[^\"]*\" 3698e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (CurPtr[0] == '"') { 3708e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner ++CurPtr; 3719fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky return ReadString(lltok::LocalVar); 3728e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 3732c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 3748e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // Handle LocalVarName: %[-a-zA-Z$._][-a-zA-Z$._0-9]* 3759fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky if (ReadVarName()) 376df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::LocalVar; 3772c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 3788e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // Handle LocalVarID: %[0-9]+ 3798e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (isdigit(CurPtr[0])) { 3802c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling for (++CurPtr; isdigit(CurPtr[0]); ++CurPtr) 3812c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling /*empty*/; 3822c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 3838e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner uint64_t Val = atoull(TokStart+1, CurPtr); 3848e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if ((unsigned)Val != Val) 385df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Error("invalid value number (too large)!"); 386df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner UIntVal = unsigned(Val); 387df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::LocalVarID; 3888e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 3892c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 390df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::Error; 3918e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner} 3928e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner 3938e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner/// LexQuote - Lex all tokens that start with a " character: 3948e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner/// QuoteLabel "[^"]+": 3958e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner/// StringConstant "[^"]*" 396df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerlltok::Kind LLLexer::LexQuote() { 3979fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky lltok::Kind kind = ReadString(lltok::StringConstant); 3989fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky if (kind == lltok::Error || kind == lltok::Eof) 3999fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky return kind; 4002c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 4019fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky if (CurPtr[0] == ':') { 4028e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner ++CurPtr; 4039fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky kind = lltok::LabelStr; 4048e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 4059fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky 4069fa89334f1045b56e8ae409004e119d47ef17ec7Nick Lewycky return kind; 4078e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner} 4088e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner 4098e3a8e0452695643d04c21e15c94b802aef81baeChris Lattnerstatic bool JustWhitespaceNewLine(const char *&Ptr) { 4108e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner const char *ThisPtr = Ptr; 4118e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner while (*ThisPtr == ' ' || *ThisPtr == '\t') 4128e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner ++ThisPtr; 4138e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (*ThisPtr == '\n' || *ThisPtr == '\r') { 4148e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner Ptr = ThisPtr; 4158e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner return true; 4168e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 4178e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner return false; 4188e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner} 4198e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner 420e434d277ca5183eeb6f881000732dcf4c8edd52eChris Lattner/// LexExclaim: 421eff2ab61b5d411fe64ba601d402b7c549644b590Devang Patel/// !foo 4221d92831759620a2e5ce4f5a3088c0a1a77a48c8fChris Lattner/// ! 423e434d277ca5183eeb6f881000732dcf4c8edd52eChris Lattnerlltok::Kind LLLexer::LexExclaim() { 4241d92831759620a2e5ce4f5a3088c0a1a77a48c8fChris Lattner // Lex a metadata name as a MetadataVar. 4259100a78bce4e1d34d8ffd5efa2cc79ed864dd1c0Nick Lewycky if (isalpha(CurPtr[0]) || CurPtr[0] == '-' || CurPtr[0] == '$' || 4269100a78bce4e1d34d8ffd5efa2cc79ed864dd1c0Nick Lewycky CurPtr[0] == '.' || CurPtr[0] == '_' || CurPtr[0] == '\\') { 427eff2ab61b5d411fe64ba601d402b7c549644b590Devang Patel ++CurPtr; 428eff2ab61b5d411fe64ba601d402b7c549644b590Devang Patel while (isalnum(CurPtr[0]) || CurPtr[0] == '-' || CurPtr[0] == '$' || 4299100a78bce4e1d34d8ffd5efa2cc79ed864dd1c0Nick Lewycky CurPtr[0] == '.' || CurPtr[0] == '_' || CurPtr[0] == '\\') 430eff2ab61b5d411fe64ba601d402b7c549644b590Devang Patel ++CurPtr; 4318e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner 432eff2ab61b5d411fe64ba601d402b7c549644b590Devang Patel StrVal.assign(TokStart+1, CurPtr); // Skip ! 4339100a78bce4e1d34d8ffd5efa2cc79ed864dd1c0Nick Lewycky UnEscapeLexed(StrVal); 4341d92831759620a2e5ce4f5a3088c0a1a77a48c8fChris Lattner return lltok::MetadataVar; 435eff2ab61b5d411fe64ba601d402b7c549644b590Devang Patel } 436e434d277ca5183eeb6f881000732dcf4c8edd52eChris Lattner return lltok::exclaim; 437eff2ab61b5d411fe64ba601d402b7c549644b590Devang Patel} 438eff2ab61b5d411fe64ba601d402b7c549644b590Devang Patel 4398e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner/// LexIdentifier: Handle several related productions: 4408e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner/// Label [-a-zA-Z$._0-9]+: 4418e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner/// IntegerType i[0-9]+ 4428e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner/// Keyword sdiv, float, ... 4438e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner/// HexIntConstant [us]0x[0-9A-Fa-f]+ 444df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerlltok::Kind LLLexer::LexIdentifier() { 4458e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner const char *StartChar = CurPtr; 4468e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner const char *IntEnd = CurPtr[-1] == 'i' ? 0 : StartChar; 4478e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner const char *KeywordEnd = 0; 4482c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 4498e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner for (; isLabelChar(*CurPtr); ++CurPtr) { 4508e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // If we decide this is an integer, remember the end of the sequence. 4518e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (!IntEnd && !isdigit(*CurPtr)) IntEnd = CurPtr; 4528e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (!KeywordEnd && !isalnum(*CurPtr) && *CurPtr != '_') KeywordEnd = CurPtr; 4538e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 4542c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 4558e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // If we stopped due to a colon, this really is a label. 4568e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (*CurPtr == ':') { 457df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner StrVal.assign(StartChar-1, CurPtr++); 458df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::LabelStr; 4598e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 4602c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 4618e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // Otherwise, this wasn't a label. If this was valid as an integer type, 4628e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // return it. 4638e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (IntEnd == 0) IntEnd = CurPtr; 4648e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (IntEnd != StartChar) { 4658e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner CurPtr = IntEnd; 4668e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner uint64_t NumBits = atoull(StartChar, CurPtr); 4672c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling if (NumBits < IntegerType::MIN_INT_BITS || 4688e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner NumBits > IntegerType::MAX_INT_BITS) { 469df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner Error("bitwidth for integer type out of range!"); 470df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::Error; 4718e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 4721d0be15f89cb5056e20e2d24faa8d6afb1573bcaOwen Anderson TyVal = IntegerType::get(Context, NumBits); 473df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::Type; 4748e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 4752c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 4768e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // Otherwise, this was a letter sequence. See which keyword this is. 4778e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (KeywordEnd == 0) KeywordEnd = CurPtr; 4788e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner CurPtr = KeywordEnd; 4798e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner --StartChar; 4808e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner unsigned Len = CurPtr-StartChar; 481df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner#define KEYWORD(STR) \ 482df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Len == strlen(#STR) && !memcmp(StartChar, #STR, strlen(#STR))) \ 483df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::kw_##STR; 484df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 485df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(begin); KEYWORD(end); 486df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(true); KEYWORD(false); 487df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(declare); KEYWORD(define); 488df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(global); KEYWORD(constant); 489df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 490bb46f52027416598a662dc1c58f48d9d56b1a65bRafael Espindola KEYWORD(private); 4913d10a5a75794356a0a568ce283713adc3a963200Bill Wendling KEYWORD(linker_private); 4925e721d768254a920b78b9129d79a84c0163cb3f4Bill Wendling KEYWORD(linker_private_weak); 49355ae515f9db484125a23429d4906c5edaf9f10d2Bill Wendling KEYWORD(linker_private_weak_def_auto); 494df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(internal); 495266c7bbbbcc4b326dea82e577de1a415d6acc23eChris Lattner KEYWORD(available_externally); 496df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(linkonce); 497667d4b8de6dea70195ff12ef39a4deebffa2f5c7Duncan Sands KEYWORD(linkonce_odr); 498df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(weak); 499667d4b8de6dea70195ff12ef39a4deebffa2f5c7Duncan Sands KEYWORD(weak_odr); 500df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(appending); 501df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(dllimport); 502df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(dllexport); 503df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(common); 504df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(default); 505df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(hidden); 506df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(protected); 507bea4626f93c830e31f82cc947df28fdae583cd09Rafael Espindola KEYWORD(unnamed_addr); 508df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(extern_weak); 509df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(external); 510df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(thread_local); 511df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(zeroinitializer); 512df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(undef); 513df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(null); 514df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(to); 515df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(tail); 516df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(target); 517df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(triple); 518df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(deplibs); 519df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(datalayout); 520df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(volatile); 52108d012eba490c4906ec773c39db9f2a18a78c997Dan Gohman KEYWORD(nuw); 52208d012eba490c4906ec773c39db9f2a18a78c997Dan Gohman KEYWORD(nsw); 5231224c386981f7948f298ed9ad444c40609570f2eDan Gohman KEYWORD(exact); 524dd8004dc73d091ccb3927dbbc3b41639a3738ae3Dan Gohman KEYWORD(inbounds); 525df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(align); 526df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(addrspace); 527df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(section); 528df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(alias); 529df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(module); 530df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(asm); 531df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(sideeffect); 5328ba2d5befc05ca73d3bac8708819bbbe759e2cf9Dale Johannesen KEYWORD(alignstack); 533df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(gc); 534df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 535df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(ccc); 536df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(fastcc); 537df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(coldcc); 538df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(x86_stdcallcc); 539df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(x86_fastcallcc); 540ded05e34b65dc42998e9db6ca1abd513e7a9d120Anton Korobeynikov KEYWORD(x86_thiscallcc); 541385f5a99ecc7fee48a7539bc63d3e1d3b5089c0dAnton Korobeynikov KEYWORD(arm_apcscc); 542385f5a99ecc7fee48a7539bc63d3e1d3b5089c0dAnton Korobeynikov KEYWORD(arm_aapcscc); 543385f5a99ecc7fee48a7539bc63d3e1d3b5089c0dAnton Korobeynikov KEYWORD(arm_aapcs_vfpcc); 544211a14e476abc9b864ab6a5d5e0bbb86d288b650Anton Korobeynikov KEYWORD(msp430_intrcc); 545f9930da2ef72350c6c805af09e754e4e6e13d47bChe-Liang Chiou KEYWORD(ptx_kernel); 546f9930da2ef72350c6c805af09e754e4e6e13d47bChe-Liang Chiou KEYWORD(ptx_device); 547385f5a99ecc7fee48a7539bc63d3e1d3b5089c0dAnton Korobeynikov 548df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(cc); 549df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(c); 550df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 551df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(signext); 552df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(zeroext); 553df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(inreg); 554df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(sret); 555df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(nounwind); 556df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(noreturn); 557df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(noalias); 558df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(nocapture); 559df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(byval); 560df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(nest); 561df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(readnone); 562df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(readonly); 563fc2bb8c4448fa884d79e437cc2d2627a7d7740a8Rafael Espindola KEYWORD(uwtable); 564df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 565570a4a5d9ca31f276a67502d1e0533d59d331feaJakob Stoklund Olesen KEYWORD(inlinehint); 566df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(noinline); 567df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(alwaysinline); 568df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(optsize); 569df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(ssp); 570df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(sspreq); 571d18e31ae17390d9c6f6cf93d18badf962452031dDevang Patel KEYWORD(noredzone); 572578efa920abd218ba75a0fb3c9b8398f4c0a774bDevang Patel KEYWORD(noimplicitfloat); 573c5ec8a78ea898087ad361e5b755f74a76150e5fdAnton Korobeynikov KEYWORD(naked); 574970bfcc7d8b9991430caa7ab33975617f3f4c40dCharles Davis KEYWORD(hotpatch); 575df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 576df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(type); 577df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(opaque); 578df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 579df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(eq); KEYWORD(ne); KEYWORD(slt); KEYWORD(sgt); KEYWORD(sle); 580df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(sge); KEYWORD(ult); KEYWORD(ugt); KEYWORD(ule); KEYWORD(uge); 581df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(oeq); KEYWORD(one); KEYWORD(olt); KEYWORD(ogt); KEYWORD(ole); 582df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(oge); KEYWORD(ord); KEYWORD(uno); KEYWORD(ueq); KEYWORD(une); 5839ea4034e007a83c778cd306ea66481be1317a51bMisha Brukman 584df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner KEYWORD(x); 58509d9ef4122414a1a2ec95f52d660d6500f2819d0Chris Lattner KEYWORD(blockaddress); 5868e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner#undef KEYWORD 5878e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner 5888e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // Keywords for types. 589df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner#define TYPEKEYWORD(STR, LLVMTY) \ 5908e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (Len == strlen(STR) && !memcmp(StartChar, STR, strlen(STR))) { \ 591df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner TyVal = LLVMTY; return lltok::Type; } 5921d0be15f89cb5056e20e2d24faa8d6afb1573bcaOwen Anderson TYPEKEYWORD("void", Type::getVoidTy(Context)); 5931d0be15f89cb5056e20e2d24faa8d6afb1573bcaOwen Anderson TYPEKEYWORD("float", Type::getFloatTy(Context)); 5941d0be15f89cb5056e20e2d24faa8d6afb1573bcaOwen Anderson TYPEKEYWORD("double", Type::getDoubleTy(Context)); 5951d0be15f89cb5056e20e2d24faa8d6afb1573bcaOwen Anderson TYPEKEYWORD("x86_fp80", Type::getX86_FP80Ty(Context)); 5961d0be15f89cb5056e20e2d24faa8d6afb1573bcaOwen Anderson TYPEKEYWORD("fp128", Type::getFP128Ty(Context)); 5971d0be15f89cb5056e20e2d24faa8d6afb1573bcaOwen Anderson TYPEKEYWORD("ppc_fp128", Type::getPPC_FP128Ty(Context)); 5981d0be15f89cb5056e20e2d24faa8d6afb1573bcaOwen Anderson TYPEKEYWORD("label", Type::getLabelTy(Context)); 5991d0be15f89cb5056e20e2d24faa8d6afb1573bcaOwen Anderson TYPEKEYWORD("metadata", Type::getMetadataTy(Context)); 600bb811a244567aa8a1522203f15588f4d001b7353Dale Johannesen TYPEKEYWORD("x86_mmx", Type::getX86_MMXTy(Context)); 6018e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner#undef TYPEKEYWORD 6028e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner 6038e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // Handle special forms for autoupgrading. Drop these in LLVM 3.0. This is 6048e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // to avoid conflicting with the sext/zext instructions, below. 6058e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (Len == 4 && !memcmp(StartChar, "sext", 4)) { 6068e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // Scan CurPtr ahead, seeing if there is just whitespace before the newline. 6078e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (JustWhitespaceNewLine(CurPtr)) 608df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::kw_signext; 6098e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } else if (Len == 4 && !memcmp(StartChar, "zext", 4)) { 6108e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // Scan CurPtr ahead, seeing if there is just whitespace before the newline. 6118e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (JustWhitespaceNewLine(CurPtr)) 612df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::kw_zeroext; 61313ad5aaaff8a446758b402fd5e9aea22f5bc5682Victor Hernandez } else if (Len == 6 && !memcmp(StartChar, "malloc", 6)) { 614cf4d2f11a1acc12a0f6b50991907e4a998ee9cddChris Lattner // FIXME: Remove in LLVM 3.0. 615cf4d2f11a1acc12a0f6b50991907e4a998ee9cddChris Lattner // Autoupgrade malloc instruction. 61613ad5aaaff8a446758b402fd5e9aea22f5bc5682Victor Hernandez return lltok::kw_malloc; 617046e78ce55a7c3d82b7b6758d2d77f2d99f970bfVictor Hernandez } else if (Len == 4 && !memcmp(StartChar, "free", 4)) { 618046e78ce55a7c3d82b7b6758d2d77f2d99f970bfVictor Hernandez // FIXME: Remove in LLVM 3.0. 619046e78ce55a7c3d82b7b6758d2d77f2d99f970bfVictor Hernandez // Autoupgrade malloc instruction. 620046e78ce55a7c3d82b7b6758d2d77f2d99f970bfVictor Hernandez return lltok::kw_free; 6218e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 6222c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 6238e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // Keywords for instructions. 624df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner#define INSTKEYWORD(STR, Enum) \ 625df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner if (Len == strlen(#STR) && !memcmp(StartChar, #STR, strlen(#STR))) { \ 626df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner UIntVal = Instruction::Enum; return lltok::kw_##STR; } 627df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 628ae3a0be92e33bc716722aa600983fc1535acb122Dan Gohman INSTKEYWORD(add, Add); INSTKEYWORD(fadd, FAdd); 629ae3a0be92e33bc716722aa600983fc1535acb122Dan Gohman INSTKEYWORD(sub, Sub); INSTKEYWORD(fsub, FSub); 630ae3a0be92e33bc716722aa600983fc1535acb122Dan Gohman INSTKEYWORD(mul, Mul); INSTKEYWORD(fmul, FMul); 631df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(udiv, UDiv); INSTKEYWORD(sdiv, SDiv); INSTKEYWORD(fdiv, FDiv); 632df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(urem, URem); INSTKEYWORD(srem, SRem); INSTKEYWORD(frem, FRem); 633df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(shl, Shl); INSTKEYWORD(lshr, LShr); INSTKEYWORD(ashr, AShr); 634df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(and, And); INSTKEYWORD(or, Or); INSTKEYWORD(xor, Xor); 635df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(icmp, ICmp); INSTKEYWORD(fcmp, FCmp); 636df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 637df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(phi, PHI); 638df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(call, Call); 639df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(trunc, Trunc); 640df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(zext, ZExt); 641df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(sext, SExt); 642df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(fptrunc, FPTrunc); 643df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(fpext, FPExt); 644df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(uitofp, UIToFP); 645df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(sitofp, SIToFP); 646df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(fptoui, FPToUI); 647df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(fptosi, FPToSI); 648df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(inttoptr, IntToPtr); 649df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(ptrtoint, PtrToInt); 650df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(bitcast, BitCast); 651df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(select, Select); 652df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(va_arg, VAArg); 653df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(ret, Ret); 654df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(br, Br); 655df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(switch, Switch); 656ab21db79ef1d2530880ad11f21f0b87ffca02dd4Chris Lattner INSTKEYWORD(indirectbr, IndirectBr); 657df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(invoke, Invoke); 658df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(unwind, Unwind); 659df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(unreachable, Unreachable); 660df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 661df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(alloca, Alloca); 662df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(load, Load); 663df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(store, Store); 664df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(getelementptr, GetElementPtr); 665df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner 666df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(extractelement, ExtractElement); 667df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(insertelement, InsertElement); 668df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(shufflevector, ShuffleVector); 669df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(getresult, ExtractValue); 670df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(extractvalue, ExtractValue); 671df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner INSTKEYWORD(insertvalue, InsertValue); 6722c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling#undef INSTKEYWORD 6732c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 6748e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // Check for [us]0x[0-9A-Fa-f]+ which are Hexadecimal constant generated by 6758e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // the CFE to avoid forcing it to deal with 64-bit numbers. 6768e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if ((TokStart[0] == 'u' || TokStart[0] == 's') && 6778e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner TokStart[1] == '0' && TokStart[2] == 'x' && isxdigit(TokStart[3])) { 6788e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner int len = CurPtr-TokStart-3; 6798e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner uint32_t bits = len * 4; 680689ad6ef3fd2e89394f1e8860dfebfe56b73c3daDaniel Dunbar APInt Tmp(bits, StringRef(TokStart+3, len), 16); 6818e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner uint32_t activeBits = Tmp.getActiveBits(); 6828e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (activeBits > 0 && activeBits < bits) 68340f8f6264d5af2c38e797e0dc59827cd231e8ff7Jay Foad Tmp = Tmp.trunc(activeBits); 684df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner APSIntVal = APSInt(Tmp, TokStart[0] == 'u'); 685df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::APSInt; 6868e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 6872c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 6884ce0df610879e82d9853c6a38a75b1883feaee06Chris Lattner // If this is "cc1234", return this as just "cc". 6898e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (TokStart[0] == 'c' && TokStart[1] == 'c') { 6908e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner CurPtr = TokStart+2; 691df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::kw_cc; 6928e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 6932c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 6944ce0df610879e82d9853c6a38a75b1883feaee06Chris Lattner // If this starts with "call", return it as CALL. This is to support old 6954ce0df610879e82d9853c6a38a75b1883feaee06Chris Lattner // broken .ll files. FIXME: remove this with LLVM 3.0. 6964ce0df610879e82d9853c6a38a75b1883feaee06Chris Lattner if (CurPtr-TokStart > 4 && !memcmp(TokStart, "call", 4)) { 6974ce0df610879e82d9853c6a38a75b1883feaee06Chris Lattner CurPtr = TokStart+4; 698df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner UIntVal = Instruction::Call; 699df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::kw_call; 7004ce0df610879e82d9853c6a38a75b1883feaee06Chris Lattner } 7012c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 702df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Finally, if this isn't known, return an error. 7038e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner CurPtr = TokStart+1; 704df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::Error; 7058e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner} 7068e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner 7078e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner 7088e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner/// Lex0x: Handle productions that start with 0x, knowing that it matches and 7098e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner/// that this is not a label: 7108e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner/// HexFPConstant 0x[0-9A-Fa-f]+ 7118e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner/// HexFP80Constant 0xK[0-9A-Fa-f]+ 7128e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner/// HexFP128Constant 0xL[0-9A-Fa-f]+ 7138e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner/// HexPPC128Constant 0xM[0-9A-Fa-f]+ 714df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerlltok::Kind LLLexer::Lex0x() { 7158e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner CurPtr = TokStart + 2; 7162c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 7178e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner char Kind; 7188e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (CurPtr[0] >= 'K' && CurPtr[0] <= 'M') { 7198e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner Kind = *CurPtr++; 7208e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } else { 7218e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner Kind = 'J'; 7228e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 7238e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner 7248e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (!isxdigit(CurPtr[0])) { 725df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner // Bad token, return it as an error. 7268e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner CurPtr = TokStart+1; 727df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::Error; 7288e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 7292c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 7308e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner while (isxdigit(CurPtr[0])) 7318e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner ++CurPtr; 7322c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 7338e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (Kind == 'J') { 7348e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // HexFPConstant - Floating point constant represented in IEEE format as a 7358e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // hexadecimal number for when exponential notation is not precise enough. 7368e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // Float and double only. 737df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner APFloatVal = APFloat(BitsToDouble(HexIntToVal(TokStart+2, CurPtr))); 738df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::APFloat; 7398e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 7402c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 7418e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner uint64_t Pair[2]; 7428e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner switch (Kind) { 743c23197a26f34f559ea9797de51e187087c039c42Torok Edwin default: llvm_unreachable("Unknown kind!"); 7448e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner case 'K': 7458e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // F80HexFPConstant - x87 long double in hexadecimal format (10 bytes) 7461b25cb2416c46a6cebf2a6c52235e9fe46a10d11Dale Johannesen FP80HexToIntPair(TokStart+3, CurPtr, Pair); 747df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner APFloatVal = APFloat(APInt(80, 2, Pair)); 748df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::APFloat; 7498e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner case 'L': 7508e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // F128HexFPConstant - IEEE 128-bit in hexadecimal format (16 bytes) 7511b25cb2416c46a6cebf2a6c52235e9fe46a10d11Dale Johannesen HexToIntPair(TokStart+3, CurPtr, Pair); 752df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner APFloatVal = APFloat(APInt(128, 2, Pair), true); 753df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::APFloat; 7548e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner case 'M': 7558e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // PPC128HexFPConstant - PowerPC 128-bit in hexadecimal format (16 bytes) 7561b25cb2416c46a6cebf2a6c52235e9fe46a10d11Dale Johannesen HexToIntPair(TokStart+3, CurPtr, Pair); 757df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner APFloatVal = APFloat(APInt(128, 2, Pair)); 758df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::APFloat; 7598e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 7608e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner} 7618e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner 7628e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner/// LexIdentifier: Handle several related productions: 7638e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner/// Label [-a-zA-Z$._0-9]+: 7648e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner/// NInteger -[0-9]+ 7658e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner/// FPConstant [-+]?[0-9]+[.][0-9]*([eE][-+]?[0-9]+)? 7668e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner/// PInteger [0-9]+ 7678e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner/// HexFPConstant 0x[0-9A-Fa-f]+ 7688e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner/// HexFP80Constant 0xK[0-9A-Fa-f]+ 7698e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner/// HexFP128Constant 0xL[0-9A-Fa-f]+ 7708e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner/// HexPPC128Constant 0xM[0-9A-Fa-f]+ 771df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerlltok::Kind LLLexer::LexDigitOrNegative() { 7728e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // If the letter after the negative is a number, this is probably a label. 7738e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (!isdigit(TokStart[0]) && !isdigit(CurPtr[0])) { 7748e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // Okay, this is not a number after the -, it's probably a label. 7758e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (const char *End = isLabelTail(CurPtr)) { 776df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner StrVal.assign(TokStart, End-1); 7778e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner CurPtr = End; 778df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::LabelStr; 7798e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 7802c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 781df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::Error; 7828e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 7832c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 7848e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // At this point, it is either a label, int or fp constant. 7852c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 7868e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // Skip digits, we have at least one. 7872c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling for (; isdigit(CurPtr[0]); ++CurPtr) 7882c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling /*empty*/; 7892c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 7908e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // Check to see if this really is a label afterall, e.g. "-1:". 7918e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (isLabelChar(CurPtr[0]) || CurPtr[0] == ':') { 7928e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (const char *End = isLabelTail(CurPtr)) { 793df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner StrVal.assign(TokStart, End-1); 7948e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner CurPtr = End; 795df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::LabelStr; 7968e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 7978e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 7982c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 7998e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // If the next character is a '.', then it is a fp value, otherwise its 8008e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // integer. 8018e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (CurPtr[0] != '.') { 8028e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (TokStart[0] == '0' && TokStart[1] == 'x') 8038e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner return Lex0x(); 8048e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner unsigned Len = CurPtr-TokStart; 8058e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner uint32_t numBits = ((Len * 64) / 19) + 2; 806689ad6ef3fd2e89394f1e8860dfebfe56b73c3daDaniel Dunbar APInt Tmp(numBits, StringRef(TokStart, Len), 10); 8078e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (TokStart[0] == '-') { 8088e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner uint32_t minBits = Tmp.getMinSignedBits(); 8098e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (minBits > 0 && minBits < numBits) 81040f8f6264d5af2c38e797e0dc59827cd231e8ff7Jay Foad Tmp = Tmp.trunc(minBits); 811df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner APSIntVal = APSInt(Tmp, false); 8128e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } else { 8138e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner uint32_t activeBits = Tmp.getActiveBits(); 8148e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (activeBits > 0 && activeBits < numBits) 81540f8f6264d5af2c38e797e0dc59827cd231e8ff7Jay Foad Tmp = Tmp.trunc(activeBits); 816df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner APSIntVal = APSInt(Tmp, true); 8178e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 818df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::APSInt; 8198e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 8208e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner 8218e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner ++CurPtr; 8222c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 8238e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // Skip over [0-9]*([eE][-+]?[0-9]+)? 8248e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner while (isdigit(CurPtr[0])) ++CurPtr; 8252c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 8268e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (CurPtr[0] == 'e' || CurPtr[0] == 'E') { 8272c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling if (isdigit(CurPtr[1]) || 8288e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner ((CurPtr[1] == '-' || CurPtr[1] == '+') && isdigit(CurPtr[2]))) { 8298e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner CurPtr += 2; 8308e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner while (isdigit(CurPtr[0])) ++CurPtr; 8318e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 8328e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 8332c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 8342402123413080aee8e9418e4f08b8613ef5cc360Nick Lewycky APFloatVal = APFloat(std::atof(TokStart)); 835df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::APFloat; 8368e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner} 8378e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner 8388e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner/// FPConstant [-+]?[0-9]+[.][0-9]*([eE][-+]?[0-9]+)? 839df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattnerlltok::Kind LLLexer::LexPositive() { 8408e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // If the letter after the negative is a number, this is probably not a 8418e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // label. 8428e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (!isdigit(CurPtr[0])) 843df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::Error; 8442c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 8458e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // Skip digits. 8462c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling for (++CurPtr; isdigit(CurPtr[0]); ++CurPtr) 8472c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling /*empty*/; 8488e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner 8498e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // At this point, we need a '.'. 8508e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (CurPtr[0] != '.') { 8518e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner CurPtr = TokStart+1; 852df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::Error; 8538e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 8542c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 8558e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner ++CurPtr; 8562c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 8578e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner // Skip over [0-9]*([eE][-+]?[0-9]+)? 8588e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner while (isdigit(CurPtr[0])) ++CurPtr; 8592c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 8608e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner if (CurPtr[0] == 'e' || CurPtr[0] == 'E') { 8612c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling if (isdigit(CurPtr[1]) || 8628e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner ((CurPtr[1] == '-' || CurPtr[1] == '+') && isdigit(CurPtr[2]))) { 8638e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner CurPtr += 2; 8648e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner while (isdigit(CurPtr[0])) ++CurPtr; 8658e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 8668e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner } 8672c6fd8c7ceea0392635ce21038d2b7fc215d9116Bill Wendling 8682402123413080aee8e9418e4f08b8613ef5cc360Nick Lewycky APFloatVal = APFloat(std::atof(TokStart)); 869df98617b23315e427cc4fad8ccfdd50d68bec2f9Chris Lattner return lltok::APFloat; 8708e3a8e0452695643d04c21e15c94b802aef81baeChris Lattner} 871