[Git][cmucl/cmucl][issue-97-define-ud2-inst] Aargh. Really fix the problem.

Raymond Toy gitlab at common-lisp.net
Sat Apr 10 17:51:46 UTC 2021



Raymond Toy pushed to branch issue-97-define-ud2-inst at cmucl / cmucl


Commits:
85639e3d by Raymond Toy at 2021-04-10T10:51:31-07:00
Aargh.  Really fix the problem.

Can't use `#.(format...)` because `code` is defined.  Have to generate
the string at run-time.

- - - - -


1 changed file:

- src/compiler/x86/insts.lisp


Changes:

=====================================
src/compiler/x86/insts.lisp
=====================================
@@ -2126,7 +2126,7 @@
 	 (nt #.(format nil "Trap ~D: Function end breakpoint trap"
 		       vm:function-end-breakpoint-trap)))
 	(t
-	 (nt #.(format nil "Trap ~D: Unexpected trap type!!!!" code)))))))
+	 (nt (format nil "Trap ~D: Unexpected trap type!!!!" code)))))))
 
 ;; The ud1 instruction where we smash the code (trap type) into the
 ;; low 6 bits of the mod r/m byte.  The mod bits are set to #b11 to



View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/85639e3dde6341cc4e171c400d39e52f315a180d

-- 
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/85639e3dde6341cc4e171c400d39e52f315a180d
You're receiving this email because of your account on gitlab.common-lisp.net.


-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/cmucl-cvs/attachments/20210410/f9c0a715/attachment.html>


More information about the cmucl-cvs mailing list