Entered a primitive array (of data)---this shouldn't happen!

[Fermin Reig]

Same code again, with a 2000 elem. list

nice ./Main
Segmentation fault caught, address = 69656400
zsh: 13994 IOT instruction  nice ./Main


Not even a nice message :-( 

This time it silently crashes.

        pidlist <- put pjsl ([1..2000]::[Int])
        l <- (get pjsl pidlist):: IO [Int]