65 string(
"<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n") +
66 "<function name=\"make_array\" version=\"1.0\" href=\"http://docs.opendap.org/index.php/Server_Side_Processing_Functions#bind_name\">\n" +
70 Str *response =
new Str(
"info");
71 response->set_value(info);
78 throw Error(malformed_expr,
"bind_name(name,variable) requires two arguments.");
89 if (dds.var(argv[0]->name()))
90 throw Error(malformed_expr,
"The name '" + argv[0]->name() +
"' is already in use.");
92 string name = extract_string_argument(argv[0]);
98 if (dds.var(argv[1]->name())) {
99 *btpp = argv[1]->ptr_duplicate();
100 if (!(*btpp)->read_p()) {
102 (*btpp)->set_read_p(
true);
104 (*btpp)->set_send_p(
true);
105 (*btpp)->set_name(name);
108 argv[1]->set_name(name);
void function_bind_name(int argc, BaseType *argv[], DDS &dds, BaseType **btpp)
Bind a new name to a variable.