From a0ba35537c34cd3c7eced8107c9578efbe99cb8b Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Fri, 12 Feb 2016 05:52:26 +0100
Subject: PSL: move canon code to canon.adb

---
 src/vhdl/canon.adb | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/vhdl/canon.adb b/src/vhdl/canon.adb
index bf4536088..44a92073e 100644
--- a/src/vhdl/canon.adb
+++ b/src/vhdl/canon.adb
@@ -1927,6 +1927,8 @@ package body Canon is
                   use PSL.Nodes;
                   Prop : PSL_Node;
                   Fa : PSL_NFA;
+                  Num : Natural;
+                  List : Iir_List;
                begin
                   Prop := Get_Psl_Property (El);
                   Prop := PSL.Rewrites.Rewrite_Property (Prop);
-- 
cgit v1.2.3