142 lines
2.5 KiB
C++
142 lines
2.5 KiB
C++
/*
|
|
1 RList is used to create a RList representation
|
|
of regions and moving regions.
|
|
|
|
*/
|
|
|
|
#include <string>
|
|
#include "interpolate.h"
|
|
|
|
/*
|
|
1.1 Constructor, which creates an empty nested list
|
|
|
|
*/
|
|
RList::RList() : type(NL_LIST) {
|
|
}
|
|
|
|
/*
|
|
1.2 Appends a real number to this nested list
|
|
|
|
*/
|
|
void RList::append(double nr) {
|
|
RList nl;
|
|
|
|
nl.type = NL_DOUBLE;
|
|
nl.nr = nr;
|
|
items.push_back(nl);
|
|
}
|
|
|
|
/*
|
|
1.3 Appends a string to this nested list
|
|
|
|
*/
|
|
void RList::append(string str) {
|
|
RList nl;
|
|
|
|
nl.type = NL_STRING;
|
|
nl.str.append(str);
|
|
items.push_back(nl);
|
|
}
|
|
|
|
/*
|
|
1.4 Appends a boolean value to this nested list.
|
|
|
|
*/
|
|
void RList::append(bool val) {
|
|
RList nl;
|
|
|
|
nl.type = NL_BOOL;
|
|
nl.boolean = val;
|
|
items.push_back(nl);
|
|
}
|
|
|
|
/*
|
|
1.5 Appends another nested list to this nested list.
|
|
|
|
*/
|
|
void RList::append(RList l) {
|
|
items.push_back(l);
|
|
}
|
|
|
|
/*
|
|
1.6 ~point~ is a convenience function which adds a nested
|
|
list with the coordinates of a 2d-point to this nested list.
|
|
|
|
*/
|
|
RList* RList::point(double x, double y) {
|
|
RList pt;
|
|
pt.append(x);
|
|
pt.append(y);
|
|
append(pt);
|
|
|
|
return this;
|
|
}
|
|
|
|
/*
|
|
1.7 ~nest~ appends a new, empty nested list to this nested
|
|
list and returns a pointer to it.
|
|
|
|
*/
|
|
RList* RList::nest() {
|
|
RList nl;
|
|
nl.type = NL_LIST;
|
|
items.push_back(nl);
|
|
|
|
return &items[items.size()-1];
|
|
}
|
|
|
|
/*
|
|
1.8 ~concat~ appends the items of a given nested list to
|
|
this nested list.
|
|
|
|
*/
|
|
void RList::concat(RList l) {
|
|
items.insert(items.end(), l.items.begin(), l.items.end());
|
|
}
|
|
|
|
// Perform indentation for string output
|
|
static string do_indent (int indent) {
|
|
string ret;
|
|
|
|
ret.append("\n");
|
|
while (indent--)
|
|
ret.append(" ");
|
|
|
|
return ret;
|
|
}
|
|
|
|
/*
|
|
1.9 ~ToString~ creates a string representation from this
|
|
nested list with a given indentation-level.
|
|
|
|
*/
|
|
string RList::ToString(int indent) {
|
|
std::stringstream ret;
|
|
|
|
if (type == NL_LIST) {
|
|
ret << do_indent(indent);
|
|
ret << "( ";
|
|
for (unsigned int i = 0; i < items.size(); i++) {
|
|
ret << items[i].ToString(indent+1);
|
|
ret << " ";
|
|
}
|
|
ret << ")";
|
|
} else if (type == NL_DOUBLE) {
|
|
ret << nr;
|
|
} else if (type == NL_BOOL) {
|
|
ret << (boolean ? "TRUE" : "FALSE");
|
|
} else if (type == NL_STRING) {
|
|
ret << "\"" << str << "\"";
|
|
}
|
|
return ret.str();
|
|
}
|
|
|
|
/*
|
|
1.10 ~ToString~ creates a string representation from this
|
|
nested list.
|
|
|
|
*/
|
|
string RList::ToString() {
|
|
return ToString(0);
|
|
}
|