Bonjour,

je suis en train d'écrire un programme avec une structure de donnée de la sorte :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
 
type monRecord = { a : float; b : bool; c : string; }
type qualite = [ `Douteux | `Valable of monRecord ]
puis je travaille sur des listes de monRecord :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
 
let u = [ `Douteux ; `Valable { a=3.14159 ;b= true ;c= "NimporteKwa" } ; 
(* très *) `Douteux (* etc *) }
je voudrais stocker ces listes dans des fichiers et les relire par la suite.

Pour l'instant j'ai créé des fonctions de filtrages et je convertis en "Strings", mais c'est très laborieux...

Quel est le moyen le plus simple ?

Merci d'avance