(r5) RepairExampleInSection2321Proposal < P1076

P1076 Web>Vhdl2019CollectedRequirements>RepairExampleInSection2321Proposal (revision 5) (raw view)~~EditAttach~~
---+ Repair Example in Section 23.21 Proposal

<br />%TOC%
---+++ LCS

[[LCS2016_I16][LCS-2016-I16]]
---++ Proposal Details
   * <p align="LEFT"><span style="color: #000000;"><span style="font-family: arial, verdana, sans-serif;">Language Version: VHDL-2008</span></span></p>
   * <p align="LEFT"><span style="color: #000000;"><span style="font-family: arial, verdana, sans-serif;">Classification: LRM Correction</span></span></p>
   * <p align="LEFT"><span style="color: #000000;"><span style="font-family: arial, verdana, sans-serif;">Summary: One of the examples in LRM section 23.21 is incorrect.</span></span></p>
   * <p align="LEFT"><span style="color: #000000;"><span style="font-family: arial, verdana, sans-serif;">Relevant_LRM_Sections: 23.21</span></span></p>
   * <p align="LEFT"><span style="color: #000000;"><span style="font-family: arial, verdana, sans-serif;">Authors_Name:</span></span> [[Main.RadoslawNawrot][<span style="color: #444444;"><span style="font-family: arial, verdana, sans-serif;">Radoslaw Nawrot</span></span>]]</p>
   * <p align="LEFT"><span style="color: #000000;"><span style="font-family: arial, verdana, sans-serif;">Authors_Fax_Number: </span></span><span style="color: #000000;">+48 32 608 7693 </span></p>
   * <p align="LEFT"><span style="color: #000000;"><span style="font-family: arial, verdana, sans-serif;">Authors_Email_Address:</span></span> [[mailto:Radoslaw.Nawrot@aldecNOSPAM.com.pl][<span style="color: #4571d0;"><span style="font-family: arial, verdana, sans-serif;">Radoslaw.Nawrot@aldecNOSPAM.com.pl</span></span>]]</p>
   * <p align="LEFT"><span style="color: #000000;"><span style="font-family: arial, verdana, sans-serif;">Authors_Affiliation: Aldec</span></span></p>
   * <p align="LEFT"><span style="color: #000000;"><span style="font-family: arial, verdana, sans-serif;">Authors_Address1: </span></span><span style="color: #000000;"><span style="font-family: arial, verdana, sans-serif;">2260 Corporate Circle </span></span></p>
   * <p align="LEFT"><span style="color: #000000;"><span style="font-family: arial, verdana, sans-serif;">Authors_Address2: </span></span><span style="color: #000000;"><span style="font-family: arial, verdana, sans-serif;">Henderson, NV 89074 </span></span></p>
   * <p align="LEFT"><span style="color: #000000;"><span style="font-family: arial, verdana, sans-serif;">Authors_Address3: </span></span><span style="color: #000000;"><span style="font-family: arial, verdana, sans-serif;">USA </span></span></p>
   * <p align="LEFT"><span style="color: #000000;"><span style="font-family: arial, verdana, sans-serif;">Date Submitted:November 14, 2014</span></span></p>
   * <p align="LEFT"><span style="color: #000000;"><span style="font-family: arial, verdana, sans-serif;">Date Analyzed:</span></span></p>
   * <p align="LEFT"><span style="color: #000000;"><span style="font-family: arial, verdana, sans-serif;">Author of Analysis:</span></span></p>
   * <p align="LEFT"><span style="color: #000000;"><span style="font-family: arial, verdana, sans-serif;">Revision Number: 1</span></span></p>
   * <p align="LEFT"><span style="color: #000000;"><span style="font-family: arial, verdana, sans-serif;">Date Last Revised:November 14, 2014</span></span></p>

---+++ Current Situation
<sticky><pre><verbatim>
void exec_proc(vhpiCbDataT cbDatap) {
  vhpiHandleT subpCallHdl, formal1, formalIt;
  int val = 0;
  vhpiValueT value;

  value.format = vhpiIntVal;
  value.value->integer = &val;
  subpCallHdl = cbDatap->obj;

  /* get a handle to the first formal parameter
     of the subprogram call */
  formal1 = vhpi_handle_by_index(vhpiParamDecls, subpCallHdl, 0);

  switch(vhpi_get(vhpiModeP, formal1)) {
  case vhpiIN:
    vhpi_get_value(formal1, &value);
    break;
  case vhpiOUT:
    vhpi_put_value(formal1, &value);
    break;
  default:
    break;
  }
}
</verbatim></pre></sticky>

---+++ Proposed Resolution
<sticky><pre><verbatim>
void exec_proc(vhpiCbDataT cbDatap) {
  vhpiHandleT subpCallHdl, formal1, formalIt;
  int val = 0;
  vhpiValueT value;

  value.format = vhpiIntVal;
  value.value.intg = &val;
  subpCallHdl = cbDatap->obj;

  /* get a handle to the first formal parameter
     of the subprogram call */
  formal1 = vhpi_handle_by_index(vhpiParamDecls, subpCallHdl, 0);

  switch(vhpi_get(vhpiModeP, formal1)) {
  case vhpiIN:
    vhpi_get_value(formal1, &value);
    break;
  case vhpiOUT:
    vhpi_put_value(formal1, &value, vhpiDepositPropagate);
    break;
  default:
    break;
  }
}
</verbatim></pre></sticky>

---++ General Comments

Place for general comments
---++ Supporters

_Add your signature here to indicate your support for the proposal_

<p align="LEFT"> </p> <p align="LEFT">-- Main.RadoslawNawrot - 2014-11-14</p>
Attachments
I	Attachment	Action	Size	Date	Who	Comment
pdf	Repair_Example_in_Section_23.21_Proposal.pdf	manage	64.3 K	2014-11-14 - 08:14	RadoslawNawrot	PDF version
Topic revision: r1 - 2020-02-17 - 15:34:38 - TWikiGuest
P1076