addendbug.s 584 B

1234567891011121314151617181920212223
  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. .align 4
  13. .EXPORT initialize_char_syntax,CODE
  14. .EXPORT initialize_char_syntax,ENTRY,PRIV_LEV=3,RTNVAL=GR
  15. initialize_char_syntax
  16. .PROC
  17. .CALLINFO FRAME=64,NO_CALLS,SAVE_SP,ENTRY_GR=3
  18. .ENTRY
  19. addil L'is_idchar-$global$-32,%r27
  20. .EXIT
  21. .PROCEND
  22. is_idchar .comm 256