From af84e080ff674a3d5cf2cf88874ddb6ebaf38ecf Mon Sep 17 00:00:00 2001 From: Pierre Letouzey Date: Tue, 9 Dec 2014 12:48:32 +0100 Subject: Switch the few remaining iso-latin-1 files to utf8 --- pretyping/recordops.ml | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) (limited to 'pretyping/recordops.ml') diff --git a/pretyping/recordops.ml b/pretyping/recordops.ml index 66aa85ecd..f836c2327 100644 --- a/pretyping/recordops.ml +++ b/pretyping/recordops.ml @@ -6,7 +6,7 @@ (* * GNU Lesser General Public License Version 2.1 *) (************************************************************************) -(* Created by Amokrane Saïbi, Dec 1998 *) +(* Created by Amokrane Saïbi, Dec 1998 *) (* Addition of products and sorts in canonical structures by Pierre Corbineau, Feb 2008 *) @@ -28,10 +28,10 @@ open Reductionops constructor (the name of which defaults to Build_S) *) (* Table des structures: le nom de la structure (un [inductive]) donne - le nom du constructeur, le nombre de paramètres et pour chaque - argument réel du constructeur, le nom de la projection - correspondante, si valide, et un booléen disant si c'est une vraie - projection ou bien une fonction constante (associée à un LetIn) *) + le nom du constructeur, le nombre de paramètres et pour chaque + argument réel du constructeur, le nom de la projection + correspondante, si valide, et un booléen disant si c'est une vraie + projection ou bien une fonction constante (associée à un LetIn) *) type struc_typ = { s_CONST : constructor; -- cgit v1.2.3