Confidentialité des fonctions et tests unitaires Haskell

Question

Comment traitez-vous avec la fonction de visibilité des tests unitaires et en Haskell?

Si vous exportez chaque fonction dans un module, de sorte que les tests unitaires ont accès, vous risque d'autres personnes à appeler des fonctions qui ne devraient pas être dans l'API publique.

J'ai pensé à l'aide d' {-# LANGUAGE CPP #-} puis environnant les exportations avec un #ifdef:

{-# LANGUAGE CPP #-}

module SomeModule
#ifndef TESTING
( export1
, export2
)
#endif
where

Est-il un meilleur moyen?

Answer 1

La convention habituelle est de fractionner votre module dans publique et partie privée, c'est à dire

module SomeModule.Internal where

-- ... exports all private methods

et puis, l'API publique

module SomeModule where (export1, export2)

import SomeModule.Internal

Vous pouvez ensuite importer SomeModule.Internal dans les tests et autres endroits où ses crucial d'obtenir l'accès à l'interne, la mise en œuvre.

L'idée est que les utilisateurs de votre bibliothèque ne jamais accidentellement appel de l'API privée, mais ils peuvent l'utiliser si la savent ce qu'ils font (débogage, etc.). Cela augmente considérablement la facilité d'utilisation de la bibliothèque vous par rapport à la force de cacher les API privée.

Answer 2

Pour les tests, normalement, vous fractionnez l'application dans la cabale fichier de projet, entre une bibliothèque, la production de l'exécutable, et une suite de test exécutable qui permet de tester les fonctions de la bibliothèque, de sorte que l'assertion de test fonctions sont tenus à l'écart.

Pour les externes en fonction de la visibilité de diviser la bibliothèque de modules entre les "exposés-modules" et la section "autres modules" section.