home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World Komputer 1999 mARCH
/
PCWK3A99.iso
/
Linux
/
DDD331
/
DDD-3_1_.000
/
DDD-3_1_
/
ddd-3.1.1
/
ddd
/
BuiltinCN.h
< prev
next >
Wrap
C/C++ Source or Header
|
1998-11-23
|
3KB
|
104 lines
// $Id: BuiltinCN.h,v 1.9 1998/11/23 17:43:18 zeller Exp $
// Calling built-in VSL functions
// Copyright (C) 1995 Technische Universitaet Braunschweig, Germany.
// Written by Andreas Zeller <zeller@ips.cs.tu-bs.de>.
//
// This file is part of DDD.
//
// DDD is free software; you can redistribute it and/or
// modify it under the terms of the GNU General Public
// License as published by the Free Software Foundation; either
// version 2 of the License, or (at your option) any later version.
//
// DDD 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 General Public License for more details.
//
// You should have received a copy of the GNU General Public
// License along with DDD -- see the file COPYING.
// If not, write to the Free Software Foundation, Inc.,
// 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
//
// DDD is the data display debugger.
// For details, see the DDD World-Wide-Web page,
// `http://www.cs.tu-bs.de/softech/ddd/',
// or send a mail to the DDD developers <ddd@ips.cs.tu-bs.de>.
#ifndef _DDD_BuiltinCallNode_h
#define _DDD_BuiltinCallNode_h
#ifdef __GNUG__
#pragma interface
#endif
// A BuiltinCallNode calls a built-in VSL function upon run-time.
#include "assert.h"
#include <iostream.h>
#include "VSLBuiltin.h"
#include "VSLNode.h"
#include "CallNode.h"
#include "DefCallN.h"
// BuiltinCallNode
class BuiltinCallNode: public CallNode {
public:
DECLARE_TYPE_INFO
friend class DefCallNode;
private:
int _index;
protected:
BuiltinCallNode(const BuiltinCallNode& node):
CallNode(node), _index(node._index)
{}
const Box *call(Box *arg) const;
char *func_name() const { return VSLBuiltin::ext_name(_index); }
bool isInfix() const { return VSLBuiltin::isInfix(_index); }
bool matches (const VSLNode& node) const
{
return matchesAll || (CallNode::matches(node) &&
_index == ((BuiltinCallNode *)&node)->_index); // dirty trick
}
public:
// Constructor
BuiltinCallNode(int i, VSLNode *a,
char *type = "BuiltinCallNode")
: CallNode(a, type), _index(i)
{}
BuiltinCallNode(BuiltinCallNode &node, VSLNode *a,
char *type = "BuiltinCallNode")
: CallNode(a, type), _index(node._index)
{}
// Copy
VSLNode *dup() const
{
return new BuiltinCallNode(*this);
}
int foldOps(VSLDef *cdef, VSLNode** node);
int foldConsts(VSLDef *cdef, VSLNode** node);
bool isBuiltinCallNode() const { return true; }
// Representation invariant
bool OK() const;
};
#endif