Fix bug in error message where incorrect type was being passed to typeName

diff --git a/lib/gvpr/compile.c b/lib/gvpr/compile.c
index 134254556781d7eb3eaf12c470279b18b808ef10..425aa11d714ddae1ba2dab625d7096eca5afce3e 100644 (file)
--- a/lib/gvpr/compile.c
+++ b/lib/gvpr/compile.c
@@ -1521,7 +1521,7 @@ setval(Expr_t * pgm, Exnode_t * x, Exid_t * sym, Exref_t * ref,
                state->tvt = (trav_type) iv;
            else
                error(1, "unexpected value %d assigned to %s : ignored",
-                     iv, typeName(pgm, V_travtype));
+                     iv, typeName(pgm, T_tvtyp));
            break;
        case V_travroot:
            np = INT2PTR(Agnode_t *, v.integer);