ksr1_b.s 1.0 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950
  1. /*
  2. * QuickThreads -- Threads-building toolkit.
  3. * Copyright (c) 1993 by David Keppel
  4. *
  5. * Permission to use, copy, modify and distribute this software and
  6. * its documentation for any purpose and without fee is hereby
  7. * granted, provided that the above copyright notice and this notice
  8. * appear in all copies. This software is provided as a
  9. * proof-of-concept and for demonstration purposes; there is no
  10. * representation about the suitability of this software for any
  11. * purpose.
  12. */
  13. .file "ksr1_b.s"
  14. .def .debug; .endef
  15. .globl b_call_reg$TXT
  16. .globl b_call_reg
  17. .globl b_call_imm$TXT
  18. .globl b_call_imm
  19. .globl b_add$TXT
  20. .globl b_add
  21. .globl b_load$TXT
  22. .globl b_load
  23. b_call_reg:
  24. b_call_imm:
  25. b_add:
  26. b_load:
  27. .word b_call_reg$TXT
  28. .word qt_error
  29. .word qt_error$TXT
  30. b_call_reg$TXT:
  31. b_call_imm$TXT:
  32. b_add$TXT:
  33. b_load$TXT:
  34. finop ; cxnop
  35. finop ; cxnop
  36. finop ; ld8 16(%cp),%c4
  37. finop ; ld8 8(%cp),%cp
  38. finop ; cxnop
  39. finop ; cxnop
  40. finop ; jsr %c4,0(%c4)
  41. finop ; cxnop
  42. finop ; cxnop