/* * Small program to test libgap linkability and basic working
*/ #include"common.h"
void test_eval(constchar * cmd)
{
Obj res, ires; Int rc, i, ok;
printf("gap> %s\n", cmd);
ok = GAP_Enter(); if (ok) {
res = GAP_EvalString(cmd);
rc = GAP_LenList(res); for (i = 1; i <= rc; i++) {
ires = GAP_ElmList(res, i); if (GAP_ElmList(ires, 1) == GAP_True) { Char * buffer = GAP_CSTR_STRING(GAP_ElmList(ires, 5)); if (buffer)
printf("%s\n", buffer);
}
}
}
GAP_Leave();
}
¤ Die Informationen auf dieser Webseite wurden
nach bestem Wissen sorgfältig zusammengestellt. Es wird jedoch weder Vollständigkeit, noch Richtigkeit,
noch Qualität der bereit gestellten Informationen zugesichert.0.1Bemerkung:
(vorverarbeitet)
¤
Die Informationen auf dieser Webseite wurden
nach bestem Wissen sorgfältig zusammengestellt. Es wird jedoch weder Vollständigkeit, noch Richtigkeit,
noch Qualität der bereit gestellten Informationen zugesichert.
Bemerkung:
Die farbliche Syntaxdarstellung ist noch experimentell.