qt/md/ksr1.s

5  * Permission to use, copy, modify and distribute this software and
31 # and a pointer to a constant block.  The address of function `f' is
41 # Note, by the way, that a pointer to a function is passed as a
42 # pointer to the constant area, and the constant area has the text
54 # Calls to those procedures branch to a 16 byte offset (4 instrs) in
55 # to the procedure to skip those instructions.
65 # Calls that want the returned structure branch directly to the
67 # return value branche 16 bytes in to the procedure, which will zero
68 # %rc, telling the called procedure not to return a structure.
73 #   %i2 -- control block of helper function to run
74 #          (dereference to get helper)
77 #   %i5 -- sp of new to run
130 # (gap to get alignment for st64)
154 # Switch to the stack passed in as fourth argument to the block
157 # block is passed in, so we must derefence it to get the helper's text
164 	finop			; movb8_8 %sp, %i2	# 1st arg to helper
174 # being started.  Blocked threads have a pointer to qt_restore$TXT on
175 # the top of their stacks; manufactured stacks have a pointer to qt_start$TXT
179 # We jump to an offset of 16 to either (1) skip past the two noop pairs
227 # (gap to get alignment for ld64)
248 # FPU registers don't need to be loaded, or will be loaded by an
262 	finop			; jmp 32(%c14)		# jump back to thread
275 # to save and restore the remaining registers.
301 # Call the integer blocking routine, passing the arguments passed to us
323 	finop			; jmp 32(%c14)		# jump back to thread
333 # A new thread is set up to "appear" as if it were executing code at
335 # (qt_blocki).  So when a new thread starts to run, it gets unblocked
336 # by the code above and "returns" to `qt_start$TXT' in the
337 # restore step of the switch.  Blocked threads jump to 16(qt_restore$TXT),
338 # and starting threads jump to 16(qt_start$TXT).
352 # Pop the frame used to store the thread's initial data
382 	finop			; ld8 8(%sp),%i2	# load `t' as arg to
398 	finop			; ld8 8(%sp),%i2	# load `t' as arg to
399 	finop			; ld8 8(%sp),%i2	# load `t' as arg to
400 	finop			; ld8 8(%sp),%i2	# load `t' as arg to
401 	finop			; ld8 8(%sp),%i2	# load `t' as arg to