/* * Copyright (c) 1998 David Stes. * * This library is free software; you can redistribute it and/or modify it * under the terms of the GNU Library General Public License as published * by the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU Library General Public License for more details. * * You should have received a copy of the GNU Library General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. * * $Id: commaxpr.m,v 1.1.1.1 2000/06/07 21:09:25 stes Exp $ */ #include "config.h" #include #include #ifndef __OBJECT_INCLUDED__ #define __OBJECT_INCLUDED__ #include /* FILE */ #include "Object.h" /* Stepstone Object.h assumes #import */ #endif #include "node.h" #include "expr.h" #include "commaxpr.h" @implementation CommaExpr - lhs { return lhs; } - lhs:aRcvr { lhs = aRcvr; return self; } - rhs { return rhs; } - rhs:args { rhs = args; return self; } - (int)lineno { return [lhs lineno]; } - filename { return [lhs filename]; } - typesynth { [lhs typesynth]; [rhs typesynth]; type = [rhs type]; return self; } - synth { [lhs synth]; [rhs synth]; return self; } - gen { [lhs gen]; gc(','); [rhs gen]; return self; } - go { [lhs go];return [rhs go]; } @end