6/simp.c
/* takes the address of a node, possibly converting it to
 * a pointer to the base type 'bt' */
takes the address of a node, possibly converting it to
a pointer to the base type 'bt'
takes the address of a node possibly converting it to a pointer to the base type ' bt '
static Node *addr(Simp *s, Node *a, Type *bt)
{
    Node *n;
    n = mkexpr(a->loc, Oaddr, a, NULL);
    if (!addressable(s, a))
        forcelocal(s, a);
    if (!bt)
        n->expr.type = mktyptr(a->loc, a->expr.type);
    else
        n->expr.type = mktyptr(a->loc, bt);
    return n;
}
static Node * addr ( Simp * s , Node * a , Type * bt ) { Node * n ; n = mkexpr ( a -> loc , Oaddr , a , NULL ) ; if ( ! addressable ( s , a ) ) forcelocal ( s , a ) ; if ( ! bt ) n -> expr . type = mktyptr ( a -> loc , a -> expr . type ) ; else n -> expr . type = mktyptr ( a -> loc , bt ) ; return n ; }
takes the address of a node, possibly converting it to
 a pointer to the base type 'bt'
takes the address of a node possibly converting it to a pointer to the base type ' bt '