From 0e13726e835a0d5406931d2dc8d920b02a1ab50a Mon Sep 17 00:00:00 2001
From: Stephen Williams <steve@icarus.com>
Date: Tue, 21 Jan 2014 13:31:49 -0800
Subject: [PATCH] fix broken call-out of real-valued system functions.

---
 vvp/sfunc.cc | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/vvp/sfunc.cc b/vvp/sfunc.cc
index 2fb678cf1..09c31fec9 100644
--- a/vvp/sfunc.cc
+++ b/vvp/sfunc.cc
@@ -98,7 +98,7 @@ static int make_vpi_argv(unsigned argc, vpiHandle*vpi_argv,
       switch (*cp) {
 	  case 'r': // real result
 	    cp += 1;
-	    return_type = -vpiRealConst;
+	    return_type = -vpiRealVal;
 	    break;
 
 	  case 'v': // vector4_t