1 /* Copyright (c) 1979 Regents of the University of California */ 2 3 static char sccsid[] = "@(#)stklval.c 1.1 08/27/80"; 4 5 #include "whoami.h" 6 #include "0.h" 7 #include "tree.h" 8 #include "opcode.h" 9 #include "objfmt.h" 10 11 /* 12 * Lvalue computes the address 13 * of a qualified name and 14 * leaves it on the stack. 15 */ 16 struct nl * 17 stklval(r, modflag) 18 int *r, modflag; 19 { 20 /* 21 * For the purposes of the interpreter stklval 22 * is the same as an lvalue. 23 */ 24 25 return(lvalue(r, modflag , LREQ )); 26 } 27