La fonction print_string permet d'afficher une chaîne. Essayez d'écrire une fonction équivalente, nommée affiche_chaine et qui utilise uniquement print_char comme fonction d'affichage.
entrée :
Un petit texte d'exemple
sortie :
Un petit texte d'exemple
Code à compléter Caml
let affiche_chaine str = (*à compléter *) in affiche_chaine (read_line() );;