6502/llvm-6502
1
0
Fork 0
mirror of https://github.com/c64scene-ar/llvm-6502.git synced 2025-10-26 18:20:39 +00:00
Code Issues Projects Releases Wiki Activity

Add support for parsing global asm blocks

Browse Source 
git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@25557 91177308-0d34-0410-b5e6-96231b3b80d8
This commit is contained in:
Chris Lattner
2006-01-23 23:05:15 +00:00
parent 18365506eb
commit ee45477a48
2 changed files with 22 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
lib/AsmParser/Lexer.l
View File

@@ -212,6 +212,7 @@ big { return BIG; }
volatile { return VOLATILE; } volatile { return VOLATILE; }
align { return ALIGN; } align { return ALIGN; }
section { return SECTION; } section { return SECTION; }
asm { return ASM_TOK; }
cc { return CC_TOK; } cc { return CC_TOK; }
ccc { return CCC_TOK; } ccc { return CCC_TOK; }

25
lib/AsmParser/llvmAsmParser.y
View File

@@ -967,7 +967,7 @@ Module *llvm::RunVMAsmParser(const char * AsmString, Module * M) {
%token DECLARE GLOBAL CONSTANT SECTION VOLATILE %token DECLARE GLOBAL CONSTANT SECTION VOLATILE
%token TO DOTDOTDOT NULL_TOK UNDEF CONST INTERNAL LINKONCE WEAK APPENDING %token TO DOTDOTDOT NULL_TOK UNDEF CONST INTERNAL LINKONCE WEAK APPENDING
%token OPAQUE NOT EXTERNAL TARGET TRIPLE ENDIAN POINTERSIZE LITTLE BIG ALIGN %token OPAQUE NOT EXTERNAL TARGET TRIPLE ENDIAN POINTERSIZE LITTLE BIG ALIGN
%token DEPLIBS CALL TAIL %token DEPLIBS CALL TAIL ASM_TOK
%token CC_TOK CCC_TOK FASTCC_TOK COLDCC_TOK %token CC_TOK CCC_TOK FASTCC_TOK COLDCC_TOK
%type <UIntVal> OptCallingConv %type <UIntVal> OptCallingConv
@@ -1256,11 +1256,12 @@ ConstVal: Types '[' ConstVector ']' { // Nonempty unsized arr
" when array has size " + itostr(NumElements) + "!"); " when array has size " + itostr(NumElements) + "!");
std::vector<Constant*> Vals; std::vector<Constant*> Vals;
if (ETy == Type::SByteTy) { if (ETy == Type::SByteTy) {
for (char *C = $3; C != EndStr; ++C) for (signed char *C = (signed char *)$3; C != (signed char *)EndStr; ++C)
Vals.push_back(ConstantSInt::get(ETy, *C)); Vals.push_back(ConstantSInt::get(ETy, *C));
} else if (ETy == Type::UByteTy) { } else if (ETy == Type::UByteTy) {
for (char *C = $3; C != EndStr; ++C) for (unsigned char *C = (unsigned char *)$3;
Vals.push_back(ConstantUInt::get(ETy, (unsigned char)*C)); C != (unsigned char*)EndStr; ++C)
Vals.push_back(ConstantUInt::get(ETy, *C));
} else { } else {
free($3); free($3);
ThrowException("Cannot build string arrays of non byte sized elements!"); ThrowException("Cannot build string arrays of non byte sized elements!");
@@ -1570,6 +1571,9 @@ FunctionList : FunctionList Function {
| FunctionList FunctionProto { | FunctionList FunctionProto {
$$ = $1; $$ = $1;
} }
| FunctionList ASM_TOK AsmBlock {
$$ = $1;
}
| FunctionList IMPLEMENTATION { | FunctionList IMPLEMENTATION {
$$ = $1; $$ = $1;
} }
@@ -1608,6 +1612,8 @@ ConstPool : ConstPool OptAssign TYPE TypesV {
} }
| ConstPool FunctionProto { // Function prototypes can be in const pool | ConstPool FunctionProto { // Function prototypes can be in const pool
} }
| ConstPool ASM_TOK AsmBlock { // Asm blocks can be in the const pool
}
| ConstPool OptAssign OptLinkage GlobalType ConstVal { | ConstPool OptAssign OptLinkage GlobalType ConstVal {
if ($5 == 0) ThrowException("Global value initializer is not a constant!"); if ($5 == 0) ThrowException("Global value initializer is not a constant!");
CurGV = ParseGlobalVariable($2, $3, $4, $5->getType(), $5); CurGV = ParseGlobalVariable($2, $3, $4, $5->getType(), $5);
@@ -1629,6 +1635,17 @@ ConstPool : ConstPool OptAssign TYPE TypesV {
}; };
AsmBlock : STRINGCONSTANT {
const std::string &AsmSoFar = CurModule.CurrentModule->getInlineAsm();
char *EndStr = UnEscapeLexed($1, true);
std::string NewAsm($1, EndStr);
free($1);
if (AsmSoFar.empty())
CurModule.CurrentModule->setInlineAsm(NewAsm);
else
CurModule.CurrentModule->setInlineAsm(AsmSoFar+"\n"+NewAsm);
};
BigOrLittle : BIG { $$ = Module::BigEndian; }; BigOrLittle : BIG { $$ = Module::BigEndian; };
BigOrLittle : LITTLE { $$ = Module::LittleEndian; }; BigOrLittle : LITTLE { $$ = Module::LittleEndian; };