From: Christophe R. <cr...@us...> - 2003-03-07 12:16:06
|
Update of /cvsroot/sbcl/sbcl/src/compiler/sparc In directory sc8-pr-cvs1:/tmp/cvs-serv31822/src/compiler/sparc Modified Files: nlx.lisp Log Message: 0.7.13.17: Merge mini backend-refactor, motivated by APD's *CHECK-CONSISTENCY*/non-local-exit observations ... OAOOize MAKE-DYNAMIC-SPACE-TNS VM support routine Also add tests for documentation in the presence of generalized function names that should have been merged before but were forgotten (sorry). Index: nlx.lisp =================================================================== RCS file: /cvsroot/sbcl/sbcl/src/compiler/sparc/nlx.lisp,v retrieving revision 1.3 retrieving revision 1.4 diff -u -d -r1.3 -r1.4 --- nlx.lisp 7 Jun 2002 12:14:56 -0000 1.3 +++ nlx.lisp 7 Mar 2003 12:15:30 -0000 1.4 @@ -33,12 +33,6 @@ ;;; additional stacks, then this would be the place to restore the top ;;; pointers. - -;;; Return a list of TNs that can be used to snapshot the dynamic -;;; state for use with the Save/Restore-Dynamic-Environment VOPs. -(!def-vm-support-routine make-dynamic-state-tns () - (make-n-tns 4 *backend-t-primitive-type*)) - (define-vop (save-dynamic-state) (:results (catch :scs (descriptor-reg)) (nfp :scs (descriptor-reg)) |