`:' and other type related things not working with loaded code

[megane]

main.scm

;(register-feature! 'csi)	   ; uncomment to make things work
(print "loading")
(load "foo.scm")
(print bar)

foo.scm

(: bar fixnum)
(define bar 1)
(print "here")

output:

$ csc -uses chicken-syntax main.scm && ./main 
loading
Segmentation fault

I have attached a patch that fixes it for me, but I'm just guessing here how the thing should really work.

[felix winkelmann]

Milestone 4.8.0 deleted