From cc0ea4be71cfb321f85d8195328f1db3a0fbb427 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Wed, 13 Nov 2019 18:36:31 +0100
Subject: libraries/openieee: reformating.

---
 libraries/openieee/build_numeric.py          | 68 ++++++++++++++--------------
 libraries/openieee/v87/numeric_bit-body.vhdl | 68 ++++++++++++++--------------
 libraries/openieee/v87/numeric_std-body.vhdl | 68 ++++++++++++++--------------
 libraries/openieee/v93/numeric_bit-body.vhdl | 68 ++++++++++++++--------------
 libraries/openieee/v93/numeric_std-body.vhdl | 68 ++++++++++++++--------------
 5 files changed, 170 insertions(+), 170 deletions(-)

(limited to 'libraries/openieee')

diff --git a/libraries/openieee/build_numeric.py b/libraries/openieee/build_numeric.py
index 43bb04b67..fa02580de 100755
--- a/libraries/openieee/build_numeric.py
+++ b/libraries/openieee/build_numeric.py
@@ -779,41 +779,41 @@ def disp_size():
 
 def disp_divmod():
     w("""
-    --  All index range are normalized (N downto 0).
-    --  NUM and QUOT have the same range.
-    --  DEM and REMAIN have the same range.
-    --  No 'X'.
-    procedure divmod (num, dem : UNSIGNED; quot, remain : out UNSIGNED)
-    is
-       variable reg : unsigned (dem'left + 1 downto 0) := (others => '0');
-       variable sub : unsigned (dem'range) := (others => '0');
-       variable carry, d : """ + logic_type () + """;
-    begin
-       for i in num'range loop
-          --  Shift
-          reg (reg'left downto 1) := reg (reg'left - 1 downto 0);
-          reg (0) := num (i);
-          --  Substract
-          carry := '1';
-          for j in dem'reverse_range loop
-             d := not dem (j);
-             sub (j) := compute_sum (carry, reg (j), d);
-             carry := compute_carry (carry, reg (j), d);
-          end loop;
-          carry := compute_carry (carry, reg (reg'left), '1');
-          --  Test
-          if carry = '0' then
-             --  Greater than
-             quot (i) := '0';
-          else
-             quot (i) := '1';
-             reg (reg'left) := '0';
-             reg (sub'range) := sub;
-          end if;
+  --  All index range are normalized (N downto 0).
+  --  NUM and QUOT have the same range.
+  --  DEM and REMAIN have the same range.
+  --  No 'X'.
+  procedure divmod (num, dem : UNSIGNED; quot, remain : out UNSIGNED)
+  is
+     variable reg : unsigned (dem'left + 1 downto 0) := (others => '0');
+     variable sub : unsigned (dem'range) := (others => '0');
+     variable carry, d : """ + logic_type () + """;
+  begin
+     for i in num'range loop
+        --  Shift
+        reg (reg'left downto 1) := reg (reg'left - 1 downto 0);
+        reg (0) := num (i);
+        --  Substract
+        carry := '1';
+        for j in dem'reverse_range loop
+           d := not dem (j);
+           sub (j) := compute_sum (carry, reg (j), d);
+           carry := compute_carry (carry, reg (j), d);
         end loop;
-        remain := reg (dem'range);
-    end divmod;
-    """)
+        carry := compute_carry (carry, reg (reg'left), '1');
+        --  Test
+        if carry = '0' then
+           --  Greater than
+           quot (i) := '0';
+        else
+           quot (i) := '1';
+           reg (reg'left) := '0';
+           reg (sub'range) := sub;
+        end if;
+     end loop;
+     remain := reg (dem'range);
+  end divmod;
+""")
 
 def disp_vec_vec_udiv(func):
     res = """
diff --git a/libraries/openieee/v87/numeric_bit-body.vhdl b/libraries/openieee/v87/numeric_bit-body.vhdl
index 3bdc634ac..63551d264 100644
--- a/libraries/openieee/v87/numeric_bit-body.vhdl
+++ b/libraries/openieee/v87/numeric_bit-body.vhdl
@@ -715,41 +715,41 @@ package body NUMERIC_BIT is
     return res;
   end has_0x;
 
-    --  All index range are normalized (N downto 0).
-    --  NUM and QUOT have the same range.
-    --  DEM and REMAIN have the same range.
-    --  No 'X'.
-    procedure divmod (num, dem : UNSIGNED; quot, remain : out UNSIGNED)
-    is
-       variable reg : unsigned (dem'left + 1 downto 0) := (others => '0');
-       variable sub : unsigned (dem'range) := (others => '0');
-       variable carry, d : bit;
-    begin
-       for i in num'range loop
-          --  Shift
-          reg (reg'left downto 1) := reg (reg'left - 1 downto 0);
-          reg (0) := num (i);
-          --  Substract
-          carry := '1';
-          for j in dem'reverse_range loop
-             d := not dem (j);
-             sub (j) := compute_sum (carry, reg (j), d);
-             carry := compute_carry (carry, reg (j), d);
-          end loop;
-          carry := compute_carry (carry, reg (reg'left), '1');
-          --  Test
-          if carry = '0' then
-             --  Greater than
-             quot (i) := '0';
-          else
-             quot (i) := '1';
-             reg (reg'left) := '0';
-             reg (sub'range) := sub;
-          end if;
+  --  All index range are normalized (N downto 0).
+  --  NUM and QUOT have the same range.
+  --  DEM and REMAIN have the same range.
+  --  No 'X'.
+  procedure divmod (num, dem : UNSIGNED; quot, remain : out UNSIGNED)
+  is
+     variable reg : unsigned (dem'left + 1 downto 0) := (others => '0');
+     variable sub : unsigned (dem'range) := (others => '0');
+     variable carry, d : bit;
+  begin
+     for i in num'range loop
+        --  Shift
+        reg (reg'left downto 1) := reg (reg'left - 1 downto 0);
+        reg (0) := num (i);
+        --  Substract
+        carry := '1';
+        for j in dem'reverse_range loop
+           d := not dem (j);
+           sub (j) := compute_sum (carry, reg (j), d);
+           carry := compute_carry (carry, reg (j), d);
         end loop;
-        remain := reg (dem'range);
-    end divmod;
-    
+        carry := compute_carry (carry, reg (reg'left), '1');
+        --  Test
+        if carry = '0' then
+           --  Greater than
+           quot (i) := '0';
+        else
+           quot (i) := '1';
+           reg (reg'left) := '0';
+           reg (sub'range) := sub;
+        end if;
+     end loop;
+     remain := reg (dem'range);
+  end divmod;
+
   function size_unsigned (n : natural) return natural
   is
      --  At least one bit (even for 0).
diff --git a/libraries/openieee/v87/numeric_std-body.vhdl b/libraries/openieee/v87/numeric_std-body.vhdl
index c716b19f3..6942bd4e1 100644
--- a/libraries/openieee/v87/numeric_std-body.vhdl
+++ b/libraries/openieee/v87/numeric_std-body.vhdl
@@ -1012,41 +1012,41 @@ package body NUMERIC_STD is
     return res;
   end has_0x;
 
-    --  All index range are normalized (N downto 0).
-    --  NUM and QUOT have the same range.
-    --  DEM and REMAIN have the same range.
-    --  No 'X'.
-    procedure divmod (num, dem : UNSIGNED; quot, remain : out UNSIGNED)
-    is
-       variable reg : unsigned (dem'left + 1 downto 0) := (others => '0');
-       variable sub : unsigned (dem'range) := (others => '0');
-       variable carry, d : sl_x01;
-    begin
-       for i in num'range loop
-          --  Shift
-          reg (reg'left downto 1) := reg (reg'left - 1 downto 0);
-          reg (0) := num (i);
-          --  Substract
-          carry := '1';
-          for j in dem'reverse_range loop
-             d := not dem (j);
-             sub (j) := compute_sum (carry, reg (j), d);
-             carry := compute_carry (carry, reg (j), d);
-          end loop;
-          carry := compute_carry (carry, reg (reg'left), '1');
-          --  Test
-          if carry = '0' then
-             --  Greater than
-             quot (i) := '0';
-          else
-             quot (i) := '1';
-             reg (reg'left) := '0';
-             reg (sub'range) := sub;
-          end if;
+  --  All index range are normalized (N downto 0).
+  --  NUM and QUOT have the same range.
+  --  DEM and REMAIN have the same range.
+  --  No 'X'.
+  procedure divmod (num, dem : UNSIGNED; quot, remain : out UNSIGNED)
+  is
+     variable reg : unsigned (dem'left + 1 downto 0) := (others => '0');
+     variable sub : unsigned (dem'range) := (others => '0');
+     variable carry, d : sl_x01;
+  begin
+     for i in num'range loop
+        --  Shift
+        reg (reg'left downto 1) := reg (reg'left - 1 downto 0);
+        reg (0) := num (i);
+        --  Substract
+        carry := '1';
+        for j in dem'reverse_range loop
+           d := not dem (j);
+           sub (j) := compute_sum (carry, reg (j), d);
+           carry := compute_carry (carry, reg (j), d);
         end loop;
-        remain := reg (dem'range);
-    end divmod;
-    
+        carry := compute_carry (carry, reg (reg'left), '1');
+        --  Test
+        if carry = '0' then
+           --  Greater than
+           quot (i) := '0';
+        else
+           quot (i) := '1';
+           reg (reg'left) := '0';
+           reg (sub'range) := sub;
+        end if;
+     end loop;
+     remain := reg (dem'range);
+  end divmod;
+
   function size_unsigned (n : natural) return natural
   is
      --  At least one bit (even for 0).
diff --git a/libraries/openieee/v93/numeric_bit-body.vhdl b/libraries/openieee/v93/numeric_bit-body.vhdl
index 869b0d2b2..f9ce50b2b 100644
--- a/libraries/openieee/v93/numeric_bit-body.vhdl
+++ b/libraries/openieee/v93/numeric_bit-body.vhdl
@@ -715,41 +715,41 @@ package body NUMERIC_BIT is
     return res;
   end has_0x;
 
-    --  All index range are normalized (N downto 0).
-    --  NUM and QUOT have the same range.
-    --  DEM and REMAIN have the same range.
-    --  No 'X'.
-    procedure divmod (num, dem : UNSIGNED; quot, remain : out UNSIGNED)
-    is
-       variable reg : unsigned (dem'left + 1 downto 0) := (others => '0');
-       variable sub : unsigned (dem'range) := (others => '0');
-       variable carry, d : bit;
-    begin
-       for i in num'range loop
-          --  Shift
-          reg (reg'left downto 1) := reg (reg'left - 1 downto 0);
-          reg (0) := num (i);
-          --  Substract
-          carry := '1';
-          for j in dem'reverse_range loop
-             d := not dem (j);
-             sub (j) := compute_sum (carry, reg (j), d);
-             carry := compute_carry (carry, reg (j), d);
-          end loop;
-          carry := compute_carry (carry, reg (reg'left), '1');
-          --  Test
-          if carry = '0' then
-             --  Greater than
-             quot (i) := '0';
-          else
-             quot (i) := '1';
-             reg (reg'left) := '0';
-             reg (sub'range) := sub;
-          end if;
+  --  All index range are normalized (N downto 0).
+  --  NUM and QUOT have the same range.
+  --  DEM and REMAIN have the same range.
+  --  No 'X'.
+  procedure divmod (num, dem : UNSIGNED; quot, remain : out UNSIGNED)
+  is
+     variable reg : unsigned (dem'left + 1 downto 0) := (others => '0');
+     variable sub : unsigned (dem'range) := (others => '0');
+     variable carry, d : bit;
+  begin
+     for i in num'range loop
+        --  Shift
+        reg (reg'left downto 1) := reg (reg'left - 1 downto 0);
+        reg (0) := num (i);
+        --  Substract
+        carry := '1';
+        for j in dem'reverse_range loop
+           d := not dem (j);
+           sub (j) := compute_sum (carry, reg (j), d);
+           carry := compute_carry (carry, reg (j), d);
         end loop;
-        remain := reg (dem'range);
-    end divmod;
-    
+        carry := compute_carry (carry, reg (reg'left), '1');
+        --  Test
+        if carry = '0' then
+           --  Greater than
+           quot (i) := '0';
+        else
+           quot (i) := '1';
+           reg (reg'left) := '0';
+           reg (sub'range) := sub;
+        end if;
+     end loop;
+     remain := reg (dem'range);
+  end divmod;
+
   function size_unsigned (n : natural) return natural
   is
      --  At least one bit (even for 0).
diff --git a/libraries/openieee/v93/numeric_std-body.vhdl b/libraries/openieee/v93/numeric_std-body.vhdl
index 0625a49f0..ba6b510d6 100644
--- a/libraries/openieee/v93/numeric_std-body.vhdl
+++ b/libraries/openieee/v93/numeric_std-body.vhdl
@@ -1012,41 +1012,41 @@ package body NUMERIC_STD is
     return res;
   end has_0x;
 
-    --  All index range are normalized (N downto 0).
-    --  NUM and QUOT have the same range.
-    --  DEM and REMAIN have the same range.
-    --  No 'X'.
-    procedure divmod (num, dem : UNSIGNED; quot, remain : out UNSIGNED)
-    is
-       variable reg : unsigned (dem'left + 1 downto 0) := (others => '0');
-       variable sub : unsigned (dem'range) := (others => '0');
-       variable carry, d : sl_x01;
-    begin
-       for i in num'range loop
-          --  Shift
-          reg (reg'left downto 1) := reg (reg'left - 1 downto 0);
-          reg (0) := num (i);
-          --  Substract
-          carry := '1';
-          for j in dem'reverse_range loop
-             d := not dem (j);
-             sub (j) := compute_sum (carry, reg (j), d);
-             carry := compute_carry (carry, reg (j), d);
-          end loop;
-          carry := compute_carry (carry, reg (reg'left), '1');
-          --  Test
-          if carry = '0' then
-             --  Greater than
-             quot (i) := '0';
-          else
-             quot (i) := '1';
-             reg (reg'left) := '0';
-             reg (sub'range) := sub;
-          end if;
+  --  All index range are normalized (N downto 0).
+  --  NUM and QUOT have the same range.
+  --  DEM and REMAIN have the same range.
+  --  No 'X'.
+  procedure divmod (num, dem : UNSIGNED; quot, remain : out UNSIGNED)
+  is
+     variable reg : unsigned (dem'left + 1 downto 0) := (others => '0');
+     variable sub : unsigned (dem'range) := (others => '0');
+     variable carry, d : sl_x01;
+  begin
+     for i in num'range loop
+        --  Shift
+        reg (reg'left downto 1) := reg (reg'left - 1 downto 0);
+        reg (0) := num (i);
+        --  Substract
+        carry := '1';
+        for j in dem'reverse_range loop
+           d := not dem (j);
+           sub (j) := compute_sum (carry, reg (j), d);
+           carry := compute_carry (carry, reg (j), d);
         end loop;
-        remain := reg (dem'range);
-    end divmod;
-    
+        carry := compute_carry (carry, reg (reg'left), '1');
+        --  Test
+        if carry = '0' then
+           --  Greater than
+           quot (i) := '0';
+        else
+           quot (i) := '1';
+           reg (reg'left) := '0';
+           reg (sub'range) := sub;
+        end if;
+     end loop;
+     remain := reg (dem'range);
+  end divmod;
+
   function size_unsigned (n : natural) return natural
   is
      --  At least one bit (even for 0).
-- 
cgit v1.2.3

/a>
<a id='n333' href='#n333'>333</a>
<a id='n334' href='#n334'>334</a>
<a id='n335' href='#n335'>335</a>
<a id='n336' href='#n336'>336</a>
<a id='n337' href='#n337'>337</a>
<a id='n338' href='#n338'>338</a>
<a id='n339' href='#n339'>339</a>
<a id='n340' href='#n340'>340</a>
<a id='n341' href='#n341'>341</a>
<a id='n342' href='#n342'>342</a>
<a id='n343' href='#n343'>343</a>
<a id='n344' href='#n344'>344</a>
<a id='n345' href='#n345'>345</a>
<a id='n346' href='#n346'>346</a>
<a id='n347' href='#n347'>347</a>
<a id='n348' href='#n348'>348</a>
<a id='n349' href='#n349'>349</a>
<a id='n350' href='#n350'>350</a>
<a id='n351' href='#n351'>351</a>
<a id='n352' href='#n352'>352</a>
<a id='n353' href='#n353'>353</a>
<a id='n354' href='#n354'>354</a>
<a id='n355' href='#n355'>355</a>
<a id='n356' href='#n356'>356</a>
<a id='n357' href='#n357'>357</a>
<a id='n358' href='#n358'>358</a>
<a id='n359' href='#n359'>359</a>
<a id='n360' href='#n360'>360</a>
<a id='n361' href='#n361'>361</a>
<a id='n362' href='#n362'>362</a>
<a id='n363' href='#n363'>363</a>
<a id='n364' href='#n364'>364</a>
<a id='n365' href='#n365'>365</a>
<a id='n366' href='#n366'>366</a>
</pre></td>
<td class='lines'><pre><code>