]> git.ipfire.org Git - thirdparty/binutils-gdb.git/blob - binutils/testsuite/binutils-all/hppa/addendbug.s
19990502 sourceware import
[thirdparty/binutils-gdb.git] / binutils / testsuite / binutils-all / hppa / addendbug.s
1 .SPACE $PRIVATE$
2 .SUBSPA $DATA$,QUAD=1,ALIGN=8,ACCESS=31
3 .SUBSPA $BSS$,QUAD=1,ALIGN=8,ACCESS=31,ZERO,SORT=82
4 .SPACE $TEXT$
5 .SUBSPA $LIT$,QUAD=0,ALIGN=8,ACCESS=44
6 .SUBSPA $CODE$,QUAD=0,ALIGN=8,ACCESS=44,CODE_ONLY
7 .IMPORT $global$,DATA
8 .IMPORT $$dyncall,MILLICODE
9 ; gcc_compiled.:
10 .SPACE $TEXT$
11 .SUBSPA $CODE$
12
13 .align 4
14 .EXPORT initialize_char_syntax,CODE
15 .EXPORT initialize_char_syntax,ENTRY,PRIV_LEV=3,RTNVAL=GR
16 initialize_char_syntax
17 .PROC
18 .CALLINFO FRAME=64,NO_CALLS,SAVE_SP,ENTRY_GR=3
19 .ENTRY
20 addil L'is_idchar-$global$-32,%r27
21 .EXIT
22 .PROCEND
23 is_idchar .comm 256