-- IO things
printName :: Name
printName         = varQual sYSTEM_IO (fsLit "print") printIdKey
printName :: Name
printName         = varQual sYSTEM_IO (fsLit "print") printIdKey
printName         = varQual sYSTEM_IO (fsLit "print") printIdKey