-- FILE NAME:        waves_events.vhd
--
--                                   DISCLAIMER
--
--        This code is the sole property of the Institute for Technology
--        Development (ITD), Jackson, Mississippi, and is distributed for
--        the purpose of providing examples of VHDL models written to
--        modeling standards.  This code may not be used for commercial
--        purposes, and may not be redistributed without permission from
--        the Institute for Technology Development.  ITD assumes no 
--        responsibility for errors, omissions, uses made, or decisions
--        based on its use.  No warranties, expressed or implied, are given.
--
--        This is a modified IEEE WAVES package.  This package was modified
--        to handle the logic_mv state/strength value system used in the 
--        models being tested.
--
--        ------------------------------------------------------------------

package body Waves_Events is
  
  function VALUE_DICTIONARY ( Value : in Logic_Value ) return EVENT_VALUE is
    begin
      case Value is
        when U  => return EVALUE(UNSPECIFIED, UNSPECIFIED,  UNSPECIFIED, CARE);
        when X  => return EVALUE(UNKNOWN,     DRIVE,        UNKNOWN,     CARE);
        when D0 => return EVALUE(LOW,         DRIVE,        STIMULUS,    CARE);
        when D1 => return EVALUE(HIGH,        DRIVE,        STIMULUS,    CARE);
        when Z  => return EVALUE(MIDBAND,     DISCONNECTED, STIMULUS,    CARE);
        when L  => return EVALUE(LOW,         RESISTIVE,    STIMULUS,    CARE);
        when H  => return EVALUE(HIGH,        RESISTIVE,    STIMULUS,    CARE);
        when W  => return EVALUE(UNKNOWN,     RESISTIVE,    STIMULUS,    CARE);
        when S0 => return EVALUE(LOW,         DRIVE,        RESPONSE,    CARE);
        when S1 => return EVALUE(HIGH,        DRIVE,        RESPONSE,    CARE);
        when DC => return EVALUE(UNSPECIFIED, UNSPECIFIED,  UNSPECIFIED, MASK);
      end case;
    end Value_Dictionary;

end Waves_Events;