Raymond Toy pushed to branch issue-297-pprint-assemble at cmucl / cmucl Commits: a4eb4787 by Raymond Toy at 2024-04-01T18:41:35-07:00 Clarify release notes to say new-assem:assemble - - - - - 22f0bec1 by Raymond Toy at 2024-04-01T19:26:37-07:00 Clean up pprint new-assem:assemble test In the source, use the VM package for the symbols instead of defaulting to the `PPRINT-TESTS` package. This means the expected results need to be updated too. - - - - - 2 changed files: - src/general-info/release-21f.md - tests/pprint.lisp Changes: ===================================== src/general-info/release-21f.md ===================================== @@ -65,7 +65,7 @@ public domain. * ~~#288~~ Re-enable `deftransform` for random integers. * ~~#290~~ Pprint `with-float-traps-masked` better * ~~#291~~ Pprint `handler-case` neatly. - * ~~#297~~ Pprint `assemble` with less indentation. + * ~~#297~~ Pprint `new-assem:assemble` with less indentation. * Other changes: * Improvements to the PCL implementation of CLOS: * Changes to building procedure: ===================================== tests/pprint.lisp ===================================== @@ -126,11 +126,12 @@ (:tag :issues) (assert-equal " -(NEW-ASSEM:ASSEMBLE (*CODE-SEGMENT* 'XOROSHIRO-UPDATE) - XOROSHIRO-UPDATE - (PUSH (CONS 'XOROSHIRO-UPDATE XOROSHIRO-UPDATE) C::*ASSEMBLER-ROUTINES*))" +(NEW-ASSEM:ASSEMBLE (C:*CODE-SEGMENT* 'X86::XOROSHIRO-UPDATE) + X86::XOROSHIRO-UPDATE + (PUSH (CONS 'X86::XOROSHIRO-UPDATE X86::XOROSHIRO-UPDATE) + C::*ASSEMBLER-ROUTINES*))" (with-output-to-string (s) - (pprint '(new-assem:assemble (*code-segment* 'xoroshiro-update) - xoroshiro-update - (push (cons 'xoroshiro-update xoroshiro-update) c::*assembler-routines*)) + (pprint '(new-assem:assemble (c::*code-segment* 'vm::xoroshiro-update) + vm::xoroshiro-update + (push (cons 'vm::xoroshiro-update vm::xoroshiro-update) c::*assembler-routines*)) s)))) View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/compare/e9eed900d911463276db32b... -- View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/compare/e9eed900d911463276db32b... You're receiving this email because of your account on gitlab.common-lisp.net.