I found it necessary to set *special-exports*:
(export (setq *special-exports*
'(defsystem compile-system load-system find-system)))
when using Allegro to avoid conflicts with Allegro's own defsystem.
This was submitted twice.
Anyway it was fixed by preventing the relevant symbols
to be imported in COMMON-LISP-USER .