Or, maybe, you could add another segment analogous to the package segment to each read symbol, e.g.:

    (defpackage :foo
      (:use :cl)
      (:source-language :en))
    (in-package :foo)

    (defun show (:translations :de schau) ()
      ...)

EDIT (forgot): and then, if you needed to access the symbol directly by some particular language's representation, do something like foo:en:show