Context Navigation

Changes between Version 1 and Version 2 of MuxVbe

-                      v1
+                      v2
 {{{
 -- Registre accumulateur 4 bits
+-- Multiplexeur 4 bits
+ENTITY accu IS
+PORT (
+  ck     : IN  BIT;
+  i      : IN  BIT_VECTOR(3 DOWNTO 0);
+  q      : OUT BIT_VECTOR(3 DOWNTO 0);
+  vdd    : IN  BIT;
+  vss    : IN  BIT);
+END accu;
+ENTITY mux4 IS
+  PORT
+    (
+      cmd       : IN  BIT;
+      x         : IN  BIT_VECTOR(3 downto 0);
+      y         : IN  BIT_VECTOR(3 downto 0);
+      q         : OUT BIT_VECTOR(3 downto 0);
+      vdd       : IN  bit;
+      vss       : IN  bit);
+END mux4;
+ARCHITECTURE vbe OF accu IS
+SIGNAL x : REG_VECTOR(3 DOWNTO 0) REGISTER;
+ARCHITECTURE vbe OF mux4 IS
 BEGIN
+  q <= x;
+  label0 : BLOCK(ck='1' AND NOT ck 'STABLE)
+  BEGIN
+    x <= GUARDED i;
+  END BLOCK;
+WITH cmd SELECT
+  q <= x WHEN "0",
+       y WHEN "1";
 END vbe;
+END;
 }}}