return true;
}
+//#WIKILINE nth wl_nth
+bool wl_nth (WikiMotorObjVecVec* args, WikiMotorObjVec& out, WikiFormat* wiki) {
+ MotorOutputWiki o (out);
+ ustring var;
+ int idx;
+ ustring val;
+ MNodePtr e;
+ ustring opt;
+
+ if (args->size () != 2)
+ return false;
+ var = (*args)[0]->textOut (wiki);
+ idx = strtol ((*args)[1]->textOut (wiki));
+ e = wiki->getVar (var);
+ if (e ()) {
+ e = e ()->vectorGet (idx);
+ val = fixUTF8 (to_string (e ()));
+ return outamp_opt (o, opt, val);
+ }
+ return true;
+}
+
/*DOC:
===ベクタ展開===
[[vector:NAME:i]]
bool wl_vector (WikiMotorObjVecVec* args, WikiMotorObjVec& out, WikiFormat* wiki);
bool wl_car (WikiMotorObjVecVec* args, WikiMotorObjVec& out, WikiFormat* wiki);
bool wl_cdr (WikiMotorObjVecVec* args, WikiMotorObjVec& out, WikiFormat* wiki);
+bool wl_nth (WikiMotorObjVecVec* args, WikiMotorObjVec& out, WikiFormat* wiki);
bool wl_join (WikiMotorObjVecVec* args, WikiMotorObjVec& out, WikiFormat* wiki);
bool wl_table (WikiMotorObjVecVec* args, WikiMotorObjVec& out, WikiFormat* wiki);
bool wl_eval (WikiMotorObjVec* arg2, WikiMotorObjVec& out, WikiFormat* wiki);