Set completion-at-point-functions as local hook

Using setq causes haskell-interactive-mode-completion-at-point-function
set globally, then it throws wrong-type-argument error in other modes.