Aren
/
NetBSD
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

insert a conversion operator from argument type to parameter type also 

if the subtypes of both argument and parameter do not match (use
eqtype() instead of comparing t_tspec fields only).
This commit is contained in:
jpo 1995-10-02 17:37:57 +00:00
parent 0c1422d6bc
commit c31bb6f41c
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
usr.bin/xlint/lint1/tree.c
View File

@ -1,4 +1,4 @@
/* $NetBSD: tree.c,v 1.11 1995/10/02 17:37:02 jpo Exp $ */
/* $NetBSD: tree.c,v 1.12 1995/10/02 17:37:57 jpo Exp $ */
/*
* Copyright (c) 1994, 1995 Jochen Pohl
@ -32,7 +32,7 @@
*/
#ifndef lint
static char rcsid[] = "$NetBSD: tree.c,v 1.11 1995/10/02 17:37:02 jpo Exp $";
static char rcsid[] = "$NetBSD: tree.c,v 1.12 1995/10/02 17:37:57 jpo Exp $";
#endif
#include <stdlib.h>
@ -3261,13 +3261,14 @@ parg(n, tp, tn)
tnode_t *tn; /* argument */
{
tnode_t *ln;
int warn;
ln = xcalloc(1, sizeof (tnode_t));
ln->tn_type = tduptyp(tp);
ln->tn_type->t_const = 0;
ln->tn_lvalue = 1;
if (typeok(FARG, n, ln, tn)) {
if (tp->t_tspec != tn->tn_type->t_tspec)
if (!eqtype(tp, tn->tn_type, 1, 0, (warn = 0, &warn)) || warn)
tn = convert(FARG, n, tp, tn);
}
free(ln);