Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Typo #96

Open
SnarkBoojum opened this issue May 11, 2022 · 2 comments
Open

Typo #96

SnarkBoojum opened this issue May 11, 2022 · 2 comments

Comments

@SnarkBoojum
Copy link

In src/parametricity, you should s/environement/environment/g:

--- paramcoq.orig/src/parametricity.ml
+++ paramcoq/src/parametricity.ml
@@ -604,7 +604,7 @@
      compose_prod_assum (lift_rel_context (nfun * order) ft_R) (substl sub bk_R)) ftbk_R
   in
 
-  (* env_rec is the environement under fixpoints. *)
+  (* env_rec is the environment under fixpoints. *)
   let env_rec = push_rec_types (lna, tl, bl) env in
   (* n : fix index *)
   let process_body n =
@@ -705,7 +705,7 @@
      in
      compose_prod_assum (lift_rel_context (nfun * order) ft_R) (substl sub bk_R)) ftbk_R
   in
-  (* env_rec is the environement under fixpoints. *)
+  (* env_rec is the environment under fixpoints. *)
   let env_rec = push_rec_types (lna, tl, bl) env in
   (* n : fix index *)
   let process_body n =
@@ -1059,7 +1059,7 @@
     let env_arities =
       List.fold_left (fun env ind ->
         let typename = ind.mind_typename in
-        debug_string [`Inductive] (Printf.sprintf "Adding '%s' to the environement." (Names.Id.to_string typename));
+        debug_string [`Inductive] (Printf.sprintf "Adding '%s' to the environment." (Names.Id.to_string typename));
         let full_arity, cst =
            Inductive.constrained_type_of_inductive ((b, ind), inst)
         in
@proux01
Copy link
Collaborator

proux01 commented May 11, 2022

@SnarkBoojum Indeed, please open a pull request.

@SnarkBoojum
Copy link
Author

To make a pull request, I need to click around github to clone the repository, then clone it locally, apply the Debian patch, commit, push then click around github for a PR -- it's really overkill!

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Labels
None yet
Projects
None yet
Development

No branches or pull requests

2 participants