6502/llvm-6502
1
0
Fork 0
mirror of https://github.com/c64scene-ar/llvm-6502.git synced 2024-08-17 21:29:20 +00:00
Code Issues Projects Releases Wiki Activity

Added lexer and parser support for the extractelement operation.

Browse Source 
git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@25177 91177308-0d34-0410-b5e6-96231b3b80d8
This commit is contained in:
Robert Bocchino 2006-01-10 19:04:32 +00:00
parent 49b78a5696
commit 9c62b5630c
5 changed files with 1162 additions and 1104 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

722
lib/AsmParser/Lexer.cpp
View File

File diff suppressed because it is too large Load Diff

2
lib/AsmParser/Lexer.l
View File

@ -272,6 +272,8 @@ load { RET_TOK(MemOpVal, Load, LOAD); }
store { RET_TOK(MemOpVal, Store, STORE); }
getelementptr { RET_TOK(MemOpVal, GetElementPtr, GETELEMENTPTR); }
extractelement { RET_TOK(OtherOpVal, ExtractElement, EXTRACTELEMENT); }
{VarID} {
UnEscapeLexed(yytext+1);

1518
lib/AsmParser/llvmAsmParser.cpp
View File

File diff suppressed because it is too large Load Diff

5
lib/AsmParser/llvmAsmParser.h
View File

@ -128,8 +128,9 @@ typedef union {
#define SHL 345
#define SHR 346
#define VAARG 347
#define VAARG_old 348
#define VANEXT_old 349
#define EXTRACTELEMENT 348
#define VAARG_old 349
#define VANEXT_old 350
extern YYSTYPE llvmAsmlval;

19
lib/AsmParser/llvmAsmParser.y
View File

@ -979,7 +979,7 @@ Module *llvm::RunVMAsmParser(const char * AsmString, Module * M) {
// Other Operators
%type <OtherOpVal> ShiftOps
%token <OtherOpVal> PHI_TOK CAST SELECT SHL SHR VAARG
%token <OtherOpVal> PHI_TOK CAST SELECT SHL SHR VAARG EXTRACTELEMENT
%token VAARG_old VANEXT_old //OBSOLETE
@ -1519,9 +1519,16 @@ ConstExpr: CAST '(' ConstVal TO Types ')' {
if (!$3->getType()->isInteger())
ThrowException("Shift constant expression requires integer operand!");
$$ = ConstantExpr::get($1, $3, $5);
}
| EXTRACTELEMENT '(' ConstVal ',' ConstVal ')' {
if (!isa<PackedType>($3->getType()))
ThrowException("First operand of extractelement must be "
"packed type!");
if ($5->getType() != Type::UIntTy)
ThrowException("Second operand of extractelement must be uint!");
$$ = ConstantExpr::getExtractElement($3, $5);
};
// ConstVector - A list of comma separated constants.
ConstVector : ConstVector ',' ConstVal {
($$ = $1)->push_back($3);
@ -2181,6 +2188,14 @@ InstVal : ArithmeticOps Types ValueRef ',' ValueRef {
$$ = new LoadInst(foo);
delete $4;
}
| EXTRACTELEMENT ResolvedVal ',' ResolvedVal {
if (!isa<PackedType>($2->getType()))
ThrowException("First operand of extractelement must be a "
"packed type val!");
if ($4->getType() != Type::UIntTy)
ThrowException("Second operand of extractelement must be a uint!");
$$ = new ExtractElementInst($2, $4);
}
| PHI_TOK PHIList {
const Type *Ty = $2->front().first->getType();
if (!Ty->isFirstClassType())