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

Clean up imports #144

Merged
merged 6 commits into from
Mar 8, 2022
Merged
Show file tree
Hide file tree
Changes from 1 commit
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
Next Next commit
Fix require in modules
  • Loading branch information
4ever2 committed Feb 28, 2022
commit ee9c36f981f84761ab72a709f8f51fa446a8384c
2 changes: 0 additions & 2 deletions embedding/extraction/PreludeExt.v
Original file line number Diff line number Diff line change
Expand Up @@ -117,8 +117,6 @@ Definition is_contract (addr: address_coq) :=
| UserAddr_coq _ => false
end.

Print Instances countable.Countable.

Definition encode_addr (addr: address_coq) : nat + nat :=
match addr with
| ContractAddr_coq x => inl x
Expand Down
6 changes: 3 additions & 3 deletions embedding/theories/pcuic/PCUICCorrectnessAux.v
Original file line number Diff line number Diff line change
Expand Up @@ -658,7 +658,7 @@ Proof.
Qed.


Hint Resolve forallb_type_to_term_closed.
Hint Resolve forallb_type_to_term_closed : core.

Lemma expr_closed_term_closed e n Σ:
genv_ok Σ ->
Expand Down Expand Up @@ -1145,7 +1145,7 @@ Proof.
Qed.

Remove Hints iclosed_n_geq: hints.
Remove Hints Bool.absurd_eq_true.
Remove Hints Bool.absurd_eq_true : core.

Open Scope nat.

Expand Down Expand Up @@ -1405,7 +1405,7 @@ Proof.
apply All_snd_combine.
Qed.

Hint Constructors All.
Hint Constructors All : core.

Lemma eval_ge_val_ok n ρ Σ e v :
AllEnv (ge_val_ok Σ) ρ ->
Expand Down
2 changes: 1 addition & 1 deletion execution/tests/CongressTests/Congress_BuggyTests.v
Original file line number Diff line number Diff line change
Expand Up @@ -28,7 +28,7 @@ Close Scope address_scope.

(* -------------------------- Tests of the Buggy Congress Implementation -------------------------- *)

Let creator := BoundedN.of_Z_const AddrSize 10.
Definition creator := BoundedN.of_Z_const AddrSize 10.

Definition rules := {|
min_vote_count_permille := 200;
Expand Down
2 changes: 1 addition & 1 deletion execution/tests/EIP20Tests/EIP20TokenTests.v
Original file line number Diff line number Diff line change
Expand Up @@ -26,7 +26,7 @@ Definition init_supply := (100%N).
Definition token_setup := EIP20Token.build_setup creator init_supply.
Definition deploy_eip20token := create_deployment 0 EIP20Token.contract token_setup.

Let contract_base_addr := BoundedN.of_Z_const AddrSize 128%Z.
Definition contract_base_addr := BoundedN.of_Z_const AddrSize 128%Z.

(* In the initial chain we transfer some assets to a few accounts, just to make the addresses
present in the chain state. The amount transferred is irrelevant. *)
Expand Down
3 changes: 2 additions & 1 deletion execution/tests/FA2Tests/FA2TokenTests.v
Original file line number Diff line number Diff line change
Expand Up @@ -12,6 +12,7 @@ From ExtLib.Structures Require Import Functor Applicative.
From ConCert.Execution.QCTests Require Import
TestUtils ChainPrinters TraceGens TestContracts.
From ConCert.Utils Require Import RecordUpdate.
From ExtLib.Structures Require Monads.
From Coq Require Import List.
Import ListNotations.
Import RecordSetNotations.
Expand Down Expand Up @@ -143,7 +144,7 @@ From ConCert.Execution.QCTests Require Import FA2Gens.


Module TestInfo <: FA2TestsInfo.
From ExtLib.Structures Require Import Monads.
Import Monads.
Import MonadNotation. Open Scope monad_scope.

Definition fa2_contract_addr := token_contract_base_addr.
Expand Down
8 changes: 4 additions & 4 deletions extraction/examples/ERC20LiquidityExtraction.v
Original file line number Diff line number Diff line change
Expand Up @@ -18,13 +18,14 @@ From ConCert.Extraction Require Import
From ConCert.Execution Require Import Automation.
From ConCert.Execution Require Import Serializable.
From ConCert.Execution Require Import Blockchain.
From ConCert.Execution Require Import EIP20Token.
From ConCert.Execution Require EIP20Token.
From ConCert.Execution Require Containers.
From ConCert.Execution.Examples Require Import Common.
From ConCert.Utils Require Import RecordUpdate.

From Coq Require Import List Ascii String.
Local Open Scope string_scope.

From stdpp Require gmap.
From MetaCoq.Template Require Import All.

Import ListNotations.
Expand Down Expand Up @@ -78,8 +79,7 @@ Definition TT_remap_default : list (kername * string) :=
Section EIP20TokenExtraction.
Import EIP20Token.
Import RecordSetNotations.
Require Import Containers.
From stdpp Require gmap.
Import Containers.

Notation params := (ContractCallContext × option EIP20Token.Msg).
Open Scope N_scope.
Expand Down
3 changes: 2 additions & 1 deletion extraction/examples/EscrowExtract.v
Original file line number Diff line number Diff line change
Expand Up @@ -16,6 +16,7 @@ From ConCert.Execution Require Import ResultMonad.
From ConCert.Execution Require Import Serializable.
From ConCert.Extraction Require Import Common Extraction.
From ConCert.Extraction Require CameLIGOPretty CameLIGOExtract.
From ConCert.Extraction Require LPretty LiquidityExtract.
From ConCert.Utils Require Import RecordUpdate.

From Coq Require Import List Ascii String.
Expand Down Expand Up @@ -115,7 +116,7 @@ End EscrowCameLIGOExtraction.
Module EscrowLiquidityExtraction.
Definition PREFIX := "".

From ConCert.Extraction Require Import LPretty LiquidityExtract.
Import LPretty LiquidityExtract.
(** A translation table for definitions we want to remap. The corresponding top-level definitions will be *ignored* *)


Expand Down