a.out: Type error in dynamic application. Can't apply function [Char]> to argument <[Char]>