Error: (the) during expansion of (the ...) - invalid type specifier: (alist-type symbol number)

	Call history:

	<syntax>	  (##core#begin (let ((some-alist (the (alist-type symbol number) (quote ())))) (print some-alist)))
	<syntax>	  (let ((some-alist (the (alist-type symbol number) (quote ())))) (print some-alist))
	<syntax>	  (##core#let ((some-alist (the (alist-type symbol number) (quote ())))) (print some-alist))
	<syntax>	  (the (alist-type symbol number) (quote ()))	<--

Error: shell command terminated with non-zero exit status 17920: '/home/siiky/.local/bin/chicken' 'mvp.scm' -output-file 'mvp.c'