Skip to content
Snippets Groups Projects
Commit 18ec53fb authored by Marco Maida's avatar Marco Maida
Browse files

Fixed warnings

parent f9ef8745
No related branches found
No related tags found
No related merge requests found
Showing
with 21 additions and 21 deletions
...@@ -31,4 +31,4 @@ End PropertiesOfEDF. ...@@ -31,4 +31,4 @@ End PropertiesOfEDF.
(** We add the above lemma into a "Hint Database" basic_facts, so Coq (** We add the above lemma into a "Hint Database" basic_facts, so Coq
will be able to apply them automatically. *) will be able to apply them automatically. *)
Hint Resolve EDF_respects_sequential_tasks : basic_facts. Global Hint Resolve EDF_respects_sequential_tasks : basic_facts.
...@@ -196,7 +196,7 @@ End IncrementalService. ...@@ -196,7 +196,7 @@ End IncrementalService.
(** * Automation *) (** * Automation *)
(** We add the above lemmas into a "Hint Database" basic_facts, so Coq (** We add the above lemmas into a "Hint Database" basic_facts, so Coq
will be able to apply them automatically. *) will be able to apply them automatically. *)
Hint Resolve ideal_proc_model_is_a_uniprocessor_model Global Hint Resolve ideal_proc_model_is_a_uniprocessor_model
ideal_proc_model_ensures_ideal_progress ideal_proc_model_ensures_ideal_progress
ideal_proc_model_provides_unit_service : basic_facts. ideal_proc_model_provides_unit_service : basic_facts.
......
...@@ -89,4 +89,4 @@ End PeriodicTasksAsSporadicTasks. ...@@ -89,4 +89,4 @@ End PeriodicTasksAsSporadicTasks.
(** We add the [periodic_task_respects_sporadic_task_model] lemma into a "Hint Database" basic_facts, (** We add the [periodic_task_respects_sporadic_task_model] lemma into a "Hint Database" basic_facts,
so Coq will be able to apply it automatically. *) so Coq will be able to apply it automatically. *)
Hint Extern 1 => apply periodic_task_respects_sporadic_task_model : basic_facts. Global Hint Extern 1 => apply periodic_task_respects_sporadic_task_model : basic_facts.
...@@ -225,4 +225,4 @@ Section ModelWithLimitedPreemptions. ...@@ -225,4 +225,4 @@ Section ModelWithLimitedPreemptions.
Qed. Qed.
End ModelWithLimitedPreemptions. End ModelWithLimitedPreemptions.
Hint Resolve valid_fixed_preemption_points_model_lemma : basic_facts. Global Hint Resolve valid_fixed_preemption_points_model_lemma : basic_facts.
...@@ -126,4 +126,4 @@ Section FullyNonPreemptiveModel. ...@@ -126,4 +126,4 @@ Section FullyNonPreemptiveModel.
Qed. Qed.
End FullyNonPreemptiveModel. End FullyNonPreemptiveModel.
Hint Resolve valid_fully_nonpreemptive_model : basic_facts. Global Hint Resolve valid_fully_nonpreemptive_model : basic_facts.
...@@ -65,4 +65,4 @@ Section FullyPreemptiveModel. ...@@ -65,4 +65,4 @@ Section FullyPreemptiveModel.
Qed. Qed.
End FullyPreemptiveModel. End FullyPreemptiveModel.
Hint Resolve valid_fully_preemptive_model : basic_facts. Global Hint Resolve valid_fully_preemptive_model : basic_facts.
\ No newline at end of file \ No newline at end of file
...@@ -40,4 +40,4 @@ Section TaskRTCThresholdFloatingNonPreemptiveRegions. ...@@ -40,4 +40,4 @@ Section TaskRTCThresholdFloatingNonPreemptiveRegions.
Qed. Qed.
End TaskRTCThresholdFloatingNonPreemptiveRegions. End TaskRTCThresholdFloatingNonPreemptiveRegions.
Hint Resolve floating_preemptive_valid_task_run_to_completion_threshold : basic_facts. Global Hint Resolve floating_preemptive_valid_task_run_to_completion_threshold : basic_facts.
...@@ -261,4 +261,4 @@ End RunToCompletionThreshold. ...@@ -261,4 +261,4 @@ End RunToCompletionThreshold.
(** We add the above lemmas into a "Hint Database" basic_facts, so Coq (** We add the above lemmas into a "Hint Database" basic_facts, so Coq
will be able to apply them automatically. *) will be able to apply them automatically. *)
Hint Resolve job_run_to_completion_threshold_le_job_cost : basic_facts. Global Hint Resolve job_run_to_completion_threshold_le_job_cost : basic_facts.
...@@ -140,4 +140,4 @@ Section TaskRTCThresholdLimitedPreemptions. ...@@ -140,4 +140,4 @@ Section TaskRTCThresholdLimitedPreemptions.
Qed. Qed.
End TaskRTCThresholdLimitedPreemptions. End TaskRTCThresholdLimitedPreemptions.
Hint Resolve limited_valid_task_run_to_completion_threshold : basic_facts. Global Hint Resolve limited_valid_task_run_to_completion_threshold : basic_facts.
...@@ -77,4 +77,4 @@ Section TaskRTCThresholdFullyNonPreemptive. ...@@ -77,4 +77,4 @@ Section TaskRTCThresholdFullyNonPreemptive.
Qed. Qed.
End TaskRTCThresholdFullyNonPreemptive. End TaskRTCThresholdFullyNonPreemptive.
Hint Resolve fully_nonpreemptive_valid_task_run_to_completion_threshold : basic_facts. Global Hint Resolve fully_nonpreemptive_valid_task_run_to_completion_threshold : basic_facts.
...@@ -38,4 +38,4 @@ Section TaskRTCThresholdFullyPreemptiveModel. ...@@ -38,4 +38,4 @@ Section TaskRTCThresholdFullyPreemptiveModel.
Qed. Qed.
End TaskRTCThresholdFullyPreemptiveModel. End TaskRTCThresholdFullyPreemptiveModel.
Hint Resolve fully_preemptive_valid_task_run_to_completion_threshold : basic_facts. Global Hint Resolve fully_preemptive_valid_task_run_to_completion_threshold : basic_facts.
...@@ -107,7 +107,7 @@ Section FloatingNonPreemptiveRegionsModel. ...@@ -107,7 +107,7 @@ Section FloatingNonPreemptiveRegionsModel.
End FloatingNonPreemptiveRegionsModel. End FloatingNonPreemptiveRegionsModel.
(** We add the above lemma into a "Hint Database" basic_facts, so Coq will be able to apply them automatically. *) (** We add the above lemma into a "Hint Database" basic_facts, so Coq will be able to apply them automatically. *)
Hint Resolve Global Hint Resolve
valid_fixed_preemption_points_model_lemma valid_fixed_preemption_points_model_lemma
floating_preemption_points_model_is_model_with_bounded_nonpreemptive_regions floating_preemption_points_model_is_model_with_bounded_nonpreemptive_regions
floating_preemption_points_model_is_valid_model_with_bounded_nonpreemptive_regions : basic_facts. floating_preemption_points_model_is_valid_model_with_bounded_nonpreemptive_regions : basic_facts.
...@@ -109,7 +109,7 @@ Section LimitedPreemptionsModel. ...@@ -109,7 +109,7 @@ Section LimitedPreemptionsModel.
End LimitedPreemptionsModel. End LimitedPreemptionsModel.
(** We add the above lemma into a "Hint Database" basic_facts, so Coq will be able to apply them automatically. *) (** We add the above lemma into a "Hint Database" basic_facts, so Coq will be able to apply them automatically. *)
Hint Resolve Global Hint Resolve
valid_fixed_preemption_points_model_lemma valid_fixed_preemption_points_model_lemma
fixed_preemption_points_model_is_model_with_bounded_nonpreemptive_regions fixed_preemption_points_model_is_model_with_bounded_nonpreemptive_regions
fixed_preemption_points_model_is_valid_model_with_bounded_nonpreemptive_regions : basic_facts. fixed_preemption_points_model_is_valid_model_with_bounded_nonpreemptive_regions : basic_facts.
...@@ -86,7 +86,7 @@ Section FullyNonPreemptiveModel. ...@@ -86,7 +86,7 @@ Section FullyNonPreemptiveModel.
End FullyNonPreemptiveModel. End FullyNonPreemptiveModel.
(** We add the above lemma into a "Hint Database" basic_facts, so Coq will be able to apply them automatically. *) (** We add the above lemma into a "Hint Database" basic_facts, so Coq will be able to apply them automatically. *)
Hint Resolve Global Hint Resolve
valid_fully_nonpreemptive_model valid_fully_nonpreemptive_model
fully_nonpreemptive_model_is_model_with_bounded_nonpreemptive_regions fully_nonpreemptive_model_is_model_with_bounded_nonpreemptive_regions
fully_nonpreemptive_model_is_valid_model_with_bounded_nonpreemptive_regions : basic_facts. fully_nonpreemptive_model_is_valid_model_with_bounded_nonpreemptive_regions : basic_facts.
...@@ -59,7 +59,7 @@ Section FullyPreemptiveModel. ...@@ -59,7 +59,7 @@ Section FullyPreemptiveModel.
End FullyPreemptiveModel. End FullyPreemptiveModel.
(** We add the above lemma into a "Hint Database" basic_facts, so Coq will be able to apply them automatically. *) (** We add the above lemma into a "Hint Database" basic_facts, so Coq will be able to apply them automatically. *)
Hint Resolve Global Hint Resolve
valid_fully_preemptive_model valid_fully_preemptive_model
fully_preemptive_model_is_model_with_bounded_nonpreemptive_regions fully_preemptive_model_is_model_with_bounded_nonpreemptive_regions
fully_preemptive_model_is_valid_model_with_bounded_nonpreemptive_segments : basic_facts. fully_preemptive_model_is_valid_model_with_bounded_nonpreemptive_segments : basic_facts.
...@@ -69,7 +69,7 @@ Proof. by intros; case eqP. Qed. ...@@ -69,7 +69,7 @@ Proof. by intros; case eqP. Qed.
Lemma beq_sym : forall (T : eqType) (x y : T), (x == y) = (y == x). Lemma beq_sym : forall (T : eqType) (x y : T), (x == y) = (y == x).
Proof. intros; do 2 case eqP; congruence. Qed. Proof. intros; do 2 case eqP; congruence. Qed.
Hint Resolve beq_refl : vlib. Global Hint Resolve beq_refl : vlib.
Hint Rewrite beq_refl : vlib_trivial. Hint Rewrite beq_refl : vlib_trivial.
Notation eqxx := beq_refl. Notation eqxx := beq_refl.
...@@ -112,7 +112,7 @@ Proof. by intros; apply/andP; split. Qed. ...@@ -112,7 +112,7 @@ Proof. by intros; apply/andP; split. Qed.
Create HintDb vlib_refl discriminated. Create HintDb vlib_refl discriminated.
Hint Resolve andP orP nandP norP negP vlib__internal_eqP neqP : vlib_refl. Global Hint Resolve andP orP nandP norP negP vlib__internal_eqP neqP : vlib_refl.
(* Add x <= y <= z splitting to the core hint database. *) (* Add x <= y <= z splitting to the core hint database. *)
Hint Immediate vlib__leq_split vlib__ltn_split1 vlib__ltn_split2 : core. Hint Immediate vlib__leq_split vlib__ltn_split1 vlib__ltn_split2 : core.
......
...@@ -153,4 +153,4 @@ End Priorities. ...@@ -153,4 +153,4 @@ End Priorities.
(** We add the above observation into the "Hint Database" basic_facts, so Coq (** We add the above observation into the "Hint Database" basic_facts, so Coq
will be able to apply it automatically. *) will be able to apply it automatically. *)
Hint Resolve respects_sequential_tasks : basic_facts. Global Hint Resolve respects_sequential_tasks : basic_facts.
...@@ -37,7 +37,7 @@ End Properties. ...@@ -37,7 +37,7 @@ End Properties.
(** We add the above lemmas into a "Hint Database" basic_facts, so Coq (** We add the above lemmas into a "Hint Database" basic_facts, so Coq
will be able to apply them automatically. *) will be able to apply them automatically. *)
Hint Resolve Global Hint Resolve
DM_is_reflexive DM_is_reflexive
DM_is_transitive DM_is_transitive
DM_is_total DM_is_total
......
...@@ -37,7 +37,7 @@ End PropertiesOfEDF. ...@@ -37,7 +37,7 @@ End PropertiesOfEDF.
(** We add the above lemmas into a "Hint Database" basic_facts, so Coq (** We add the above lemmas into a "Hint Database" basic_facts, so Coq
will be able to apply them automatically. *) will be able to apply them automatically. *)
Hint Resolve Global Hint Resolve
EDF_is_reflexive EDF_is_reflexive
EDF_is_transitive EDF_is_transitive
EDF_is_total EDF_is_total
......
...@@ -33,7 +33,7 @@ End Properties. ...@@ -33,7 +33,7 @@ End Properties.
(** We add the above lemmas into a "Hint Database" basic_facts, so Coq (** We add the above lemmas into a "Hint Database" basic_facts, so Coq
will be able to apply them automatically. *) will be able to apply them automatically. *)
Hint Resolve Global Hint Resolve
FIFO_is_reflexive FIFO_is_reflexive
FIFO_is_transitive FIFO_is_transitive
FIFO_is_total FIFO_is_total
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment