From d6c87f235a98c05a26b4a0e87129335d034219af Mon Sep 17 00:00:00 2001 From: herbelin Date: Tue, 22 Jun 2010 06:31:30 +0000 Subject: New script dev/tools/change-header to automatically update Coq files headers. Applied it to fix mli file headers. git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@13176 85f007b7-540e-0410-9357-904b9bb8a0f7 --- dev/tools/change-header | 32 ++++++++++++++++++++++++++++++++ interp/constrextern.mli | 14 +++++++------- interp/constrintern.mli | 14 +++++++------- interp/coqlib.mli | 14 +++++++------- interp/dumpglob.mli | 14 +++++++------- interp/genarg.mli | 14 +++++++------- interp/implicit_quantifiers.mli | 14 +++++++------- interp/modintern.mli | 14 +++++++------- interp/notation.mli | 14 +++++++------- interp/ppextend.mli | 14 +++++++------- interp/reserve.mli | 14 +++++++------- interp/smartlocate.mli | 14 +++++++------- interp/syntax_def.mli | 14 +++++++------- interp/topconstr.mli | 14 +++++++------- kernel/closure.mli | 14 +++++++------- kernel/conv_oracle.mli | 14 +++++++------- kernel/cooking.mli | 14 +++++++------- kernel/declarations.mli | 14 +++++++------- kernel/entries.mli | 14 +++++++------- kernel/environ.mli | 14 +++++++------- kernel/esubst.mli | 14 +++++++------- kernel/indtypes.mli | 14 +++++++------- kernel/inductive.mli | 14 +++++++------- kernel/mod_subst.mli | 14 +++++++------- kernel/mod_typing.mli | 14 +++++++------- kernel/modops.mli | 14 +++++++------- kernel/names.mli | 14 +++++++------- kernel/pre_env.mli | 14 +++++++------- kernel/reduction.mli | 14 +++++++------- kernel/retroknowledge.mli | 14 +++++++------- kernel/safe_typing.mli | 14 +++++++------- kernel/sign.mli | 14 +++++++------- kernel/subtyping.mli | 14 +++++++------- kernel/term.mli | 14 +++++++------- kernel/term_typing.mli | 14 +++++++------- kernel/type_errors.mli | 14 +++++++------- kernel/typeops.mli | 14 +++++++------- kernel/univ.mli | 14 +++++++------- kernel/vconv.mli | 14 +++++++------- lib/bigint.mli | 14 +++++++------- lib/dnet.mli | 14 +++++++------- lib/dyn.mli | 14 +++++++------- lib/envars.mli | 14 +++++++------- lib/explore.mli | 14 +++++++------- lib/flags.mli | 14 +++++++------- lib/gmap.mli | 14 +++++++------- lib/gmapl.mli | 14 +++++++------- lib/gset.mli | 14 +++++++------- lib/hashcons.mli | 14 +++++++------- lib/heap.mli | 14 +++++++------- lib/option.mli | 14 +++++++------- lib/pp.mli | 14 +++++++------- lib/pp_control.mli | 14 +++++++------- lib/profile.mli | 14 +++++++------- lib/rtree.mli | 14 +++++++------- lib/system.mli | 14 +++++++------- lib/tlm.mli | 14 +++++++------- lib/util.mli | 14 +++++++------- library/decl_kinds.mli | 14 +++++++------- library/declare.mli | 14 +++++++------- library/declaremods.mli | 14 +++++++------- library/decls.mli | 14 +++++++------- library/dischargedhypsmap.mli | 14 +++++++------- library/global.mli | 14 +++++++------- library/goptions.mli | 14 +++++++------- library/heads.mli | 14 +++++++------- library/impargs.mli | 14 +++++++------- library/lib.mli | 14 +++++++------- library/libnames.mli | 14 +++++++------- library/libobject.mli | 14 +++++++------- library/library.mli | 14 +++++++------- library/nameops.mli | 14 +++++++------- library/nametab.mli | 14 +++++++------- library/states.mli | 14 +++++++------- library/summary.mli | 14 +++++++------- parsing/egrammar.mli | 14 +++++++------- parsing/extend.mli | 14 +++++++------- parsing/extrawit.mli | 14 +++++++------- parsing/g_intsyntax.mli | 14 +++++++------- parsing/g_natsyntax.mli | 14 +++++++------- parsing/g_zsyntax.mli | 14 +++++++------- parsing/lexer.mli | 14 +++++++------- parsing/pcoq.mli | 14 +++++++------- parsing/ppconstr.mli | 15 +++++++-------- parsing/pptactic.mli | 14 +++++++------- parsing/ppvernac.mli | 14 +++++++------- parsing/prettyp.mli | 14 +++++++------- parsing/printer.mli | 14 +++++++------- parsing/printmod.mli | 14 +++++++------- parsing/q_util.mli | 14 +++++++------- parsing/tactic_printer.mli | 14 +++++++------- parsing/tok.ml | 14 +++++++------- parsing/tok.mli | 14 +++++++------- pretyping/cases.mli | 14 +++++++------- pretyping/cbv.mli | 14 +++++++------- pretyping/classops.mli | 14 +++++++------- pretyping/coercion.mli | 14 +++++++------- pretyping/detyping.mli | 14 +++++++------- pretyping/evarconv.mli | 14 +++++++------- pretyping/evarutil.mli | 14 +++++++------- pretyping/evd.mli | 15 +++++++-------- pretyping/indrec.mli | 14 +++++++------- pretyping/inductiveops.mli | 14 +++++++------- pretyping/matching.mli | 14 +++++++------- pretyping/namegen.mli | 14 +++++++------- pretyping/pattern.mli | 14 +++++++------- pretyping/pretype_errors.mli | 14 +++++++------- pretyping/pretyping.mli | 14 +++++++------- pretyping/rawterm.mli | 14 +++++++------- pretyping/recordops.mli | 14 +++++++------- pretyping/reductionops.mli | 14 +++++++------- pretyping/retyping.mli | 14 +++++++------- pretyping/tacred.mli | 14 +++++++------- pretyping/term_dnet.mli | 14 +++++++------- pretyping/termops.mli | 14 +++++++------- pretyping/typeclasses.mli | 14 +++++++------- pretyping/typeclasses_errors.mli | 14 +++++++------- pretyping/typing.mli | 14 +++++++------- pretyping/unification.mli | 14 +++++++------- pretyping/vnorm.mli | 14 +++++++------- proofs/clenv.mli | 14 +++++++------- proofs/clenvtac.mli | 14 +++++++------- proofs/evar_refiner.mli | 14 +++++++------- proofs/logic.mli | 14 +++++++------- proofs/pfedit.mli | 14 +++++++------- proofs/proof_type.mli | 14 +++++++------- proofs/redexpr.mli | 14 +++++++------- proofs/refiner.mli | 14 +++++++------- proofs/tacmach.mli | 14 +++++++------- proofs/tactic_debug.mli | 14 +++++++------- tactics/auto.mli | 14 +++++++------- tactics/autorewrite.mli | 14 +++++++------- tactics/btermdn.mli | 14 +++++++------- tactics/contradiction.mli | 14 +++++++------- tactics/dhyp.mli | 14 +++++++------- tactics/eauto.mli | 14 +++++++------- tactics/elim.mli | 14 +++++++------- tactics/elimschemes.mli | 14 +++++++------- tactics/eqschemes.mli | 14 +++++++------- tactics/evar_tactics.mli | 14 +++++++------- tactics/extraargs.mli | 14 +++++++------- tactics/extratactics.mli | 14 +++++++------- tactics/hiddentac.mli | 15 +++++++-------- tactics/hipattern.mli | 14 +++++++------- tactics/inv.mli | 14 +++++++------- tactics/nbtermdn.mli | 14 +++++++------- tactics/refine.mli | 14 +++++++------- tactics/tacinterp.mli | 14 +++++++------- tactics/tacticals.mli | 14 +++++++------- tactics/tactics.mli | 14 +++++++------- tactics/termdn.mli | 14 +++++++------- toplevel/auto_ind_decl.mli | 14 +++++++------- toplevel/autoinstance.mli | 14 +++++++------- toplevel/cerrors.mli | 14 +++++++------- toplevel/class.mli | 14 +++++++------- toplevel/classes.mli | 14 +++++++------- toplevel/command.mli | 14 +++++++------- toplevel/coqinit.mli | 14 +++++++------- toplevel/coqtop.mli | 14 +++++++------- toplevel/discharge.mli | 14 +++++++------- toplevel/himsg.mli | 14 +++++++------- toplevel/ind_tables.mli | 14 +++++++------- toplevel/indschemes.mli | 14 +++++++------- toplevel/lemmas.mli | 14 +++++++------- toplevel/libtypes.mli | 14 +++++++------- toplevel/metasyntax.mli | 14 +++++++------- toplevel/mltop.mli | 14 +++++++------- toplevel/record.mli | 14 +++++++------- toplevel/search.mli | 14 +++++++------- toplevel/toplevel.mli | 14 +++++++------- toplevel/usage.mli | 14 +++++++------- toplevel/vernac.mli | 14 +++++++------- toplevel/vernacentries.mli | 14 +++++++------- toplevel/vernacinterp.mli | 14 +++++++------- toplevel/whelp.mli | 14 +++++++------- 175 files changed, 1250 insertions(+), 1221 deletions(-) create mode 100755 dev/tools/change-header mode change 100755 => 100644 library/nametab.mli mode change 100755 => 100644 pretyping/recordops.mli diff --git a/dev/tools/change-header b/dev/tools/change-header new file mode 100755 index 000000000..8b3560e89 --- /dev/null +++ b/dev/tools/change-header @@ -0,0 +1,32 @@ +#!/bin/sh + +#This script changes the header of .ml* files + +if [ ! $# = 2 ]; then + echo Usage: change-header old-header-file new-header-file + exit 1 +fi + +oldheader=$1 +newheader=$2 + +if [ ! -f $oldheader ]; then echo Cannot read file $oldheader; exit 1; fi +if [ ! -f $newheader ]; then echo Cannot read file $newheader; exit 1; fi + +n=`wc -l $oldheader | sed -e "s/ *\([0-9]*\).*/\1/g"` +nsucc=`expr $n + 1` + +filter="-name \*.mli -o -name \*.ml -o -name \*.ml4 -o -name \*.mll -o -name \*.mly" + +for i in `find . $filter`; do + head -n +$n $i > $i.head.tmp$$ + if diff -a -q $oldheader $i.head.tmp$$ > /dev/null; then + rm $i.head.tmp$$ + echo "$i: header changed" + cat dev/header > $i.tmp$$ + tail -n +$nsucc $i >> $i.tmp$$ + mv $i.tmp$$ $i + else + echo "$i: old header not found, file untouched" + fi +done diff --git a/interp/constrextern.mli b/interp/constrextern.mli index ac3a38833..7bc2ddcec 100644 --- a/interp/constrextern.mli +++ b/interp/constrextern.mli @@ -1,10 +1,10 @@ -(*********************************************************************** - v * The Coq Proof Assistant / The Coq Development Team - unit val close_glob_file : unit -> unit diff --git a/interp/genarg.mli b/interp/genarg.mli index 984f479fb..0ab3b4320 100644 --- a/interp/genarg.mli +++ b/interp/genarg.mli @@ -1,10 +1,10 @@ -(*********************************************************************** - v * The Coq Proof Assistant / The Coq Development Team -