mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-03-12 07:50:26 -07:00
Code Issues Projects Releases Packages Wiki Activity

tests: add a regression test for a symbol parser bug

Browse source
This commit is contained in:
Daniel Kochmański 2026-03-02 13:56:16 +01:00
parent 83fc257cfa
commit 56f1ce7850
1 changed files with 10 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

10
src/tests/normal-tests/mixed.lsp
View file

@ -669,3 +669,13 @@
(is (string=
(symbol-name (read-from-string "DANIEL|--xXx--|MANSKI"))
"daniel--xXx--manski"))))
;;; Reported by: Daniel Kochmański
;;; Created: 2026-03-02
;;; Issue: https://gitlab.com/embeddable-common-lisp/ecl/-/issues/814
;;; Description
;;;
;;; Reader allows for multiple package prefixes and uses only the last one.
;;; For example FOO::BAR::QUX is equivalent to BAR:QUX (FOO must exist).
(deftest mix.0034.dont-allow-invalid-package-prefixes ()
(signals reader-error (read-from-string "CL-USER::CL::LIST")))