/usr/include/ComTerp/dotfunc.h is in ivtools-dev 1.2.11a1-11.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 | /*
* Copyright (c) 2001 Scott E. Johnston
* Copyright (c) 2000 IET Inc.
*
* Permission to use, copy, modify, distribute, and sell this software and
* its documentation for any purpose is hereby granted without fee, provided
* that the above copyright notice appear in all copies and that both that
* copyright notice and this permission notice appear in supporting
* documentation, and that the names of the copyright holders not be used in
* advertising or publicity pertaining to distribution of the software
* without specific, written prior permission. The copyright holders make
* no representations about the suitability of this software for any purpose.
* It is provided "as is" without express or implied warranty.
*
* THE COPYRIGHT HOLDERS DISCLAIM ALL WARRANTIES WITH REGARD TO THIS
* SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS.
* IN NO EVENT SHALL THE COPYRIGHT HOLDERS BE LIABLE FOR ANY SPECIAL,
* INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING
* FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT,
* NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION
* WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
*
*/
/*
* dot func supports a compound variable
*/
#if !defined(_dotfunc_h)
#define _dotfunc_h
#include <ComTerp/numfunc.h>
//: . (dot) operator, for compound variables | dotlst=dot(name) -- construct empty dottted pair list.
class DotFunc : public ComFunc {
public:
DotFunc(ComTerp*);
virtual void execute();
virtual const char* docstring() {
return "%s (.) makes compound variables | dotlst=dot(name) -- construct empty dotted pair list"; }
CLASS_SYMID("DotFunc");
};
//: name returns name field of a dotted pair
// attrname(attribute) returns name field of a dotted pair
class DotNameFunc : public ComFunc {
public:
DotNameFunc(ComTerp*);
virtual void execute();
virtual const char* docstring() {
return "%s(attribute) returns name field of a dotted pair"; }
};
//: value returns value field of a dotted pair
// attrval(attribute) returns value field of a dotted pair
class DotValFunc : public ComFunc {
public:
DotValFunc(ComTerp*);
virtual void execute();
virtual const char* docstring() {
return "%s(attribute) returns value field of a dotted pair"; }
};
#endif /* !defined(_dotfunc_h) */
|