procedure ohne ergebniss

[Mike (Gast)]

Hallo

Also ich wollte ein Procedur bauen mit der in Button pressed und releasd 
feststellen kann. Diese wollte ich dann mittels counter zählen.

Ich habe dafür folgende Procedur in einem package definiert und dann 
verwendet

Leider meint der Quartus compiler das CLK_I und PUSH0 input sind die 
nichts treiben, bzw legt dann PUSH0 auf grund und der Counter 
funktioniert nicht.

In einer eigenen Entity funktioniert der selbe Code als Prozess sehr 
gut.

Hoffe ihr könnt mir sagen was ich an Proceduren nicht verstanden habe 
oder scheitert hier der Synthesiser?

  procedure PUSH(signal clk_i,push_i : in std_logic;
            signal push_pressed, push_released, push_state : out std_logic) is
            
    variable tmp : std_logic_vector(1 downto 0);
  begin
    if rising_edge(clk_i) then
      tmp := tmp(0) & push_i;
      push_pressed <= '0';
      push_released <= '0';
      push_state <= push_i;
      
      if( tmp = "10") then
        push_pressed <= '1';
      elsif( tmp = "01") then
        push_released <= '1';
      end if;
    end if;
end PUSH;

PUSH    (clk_i => CLK_I,
   push_i => PUSH0, 
   push_pressed => pressed, 
   push_released => open, 
   push_state => open);

  PUSH0_P : process(CLK_I)
  begin
  
  if rising_edge(CLK_I) then
    if pressed = '1' then
      counter <= counter + 1;
    end if;
  end if;

lg Mike

[Lothar M. (Firma: Titel) (lkmiller) (Moderator)]

Was sagt die Simulation?

Ich könnte mir gut vorstellen, dass du Probleme mit dem Takt in der 
Prozedur hast. Probiers doch mal so:

   procedure PUSH(push_i : in std_logic;
            signal push_pressed, push_released, push_state : out std_logic) is
            
    variable tmp : std_logic_vector(1 downto 0); -- Hmhmhmhm, ob das gut geht... 
  begin
--    if rising_edge(clk_i) then
      tmp := tmp(0) & push_i;
      push_pressed <= '0';
      push_released <= '0';
      push_state <= push_i;
      
      if( tmp = "10") then
        push_pressed <= '1';
      elsif( tmp = "01") then
        push_released <= '1';
      end if;
--    end if;
end PUSH;
:
:
  PUSH0_P : process(CLK_I)
  begin
   if rising_edge(CLK_I) then
    PUSH(PUSH0,pressed,open,open);
    if pressed = '1' then
      counter <= counter + 1;
    end if;
   end if;
 end process;

[Mike (Gast)]

Hallo

testbench habe ich leider noch keine geschrieben (ich hielt den Code für 
überschaubar)

Bzw vermute ich das der Synthesiser hier aussteigt und die Simulation 
hier nutzlos wird.... (Da selber code als prozess in einer Entity 
FUNKTIONIERT)


Selbe Fehler meldung:
Warning: Design contains 2 input pin(s) that do not drive logic
  Warning (15610): No output dependent on input pin "CLK_I"
  Warning (15610): No output dependent on input pin "PUSH0"

lg Mike