mirrors/EQL5
1
Fork 0
mirror of https://gitlab.com/eql/EQL5.git synced 2026-01-09 02:32:01 -08:00
Code Issues Projects Releases Packages Wiki Activity

fix and improve "qml-lisp" example; allow nested QVariantLists (JS arrays in QML);

Browse source
This commit is contained in:
polos 2017-01-17 10:13:45 +01:00
parent 0e82b0a517
commit 03c7a5ded5
5 changed files with 27 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

8
src/ecl_fun.cpp
View file

@ -1115,7 +1115,13 @@ static cl_object from_qvariant_value(const QVariant& var) {
case QVariant::Time: l_obj = from_qtime(var.toTime()); break;
case QVariant::Url: l_obj = from_qurl(var.toUrl()); break;
case QVariant::UInt: l_obj = ecl_make_unsigned_integer(var.toUInt()); break;
case QVariant::ULongLong: l_obj = ecl_make_unsigned_integer(var.toULongLong()); break; }
case QVariant::ULongLong: l_obj = ecl_make_unsigned_integer(var.toULongLong()); break;
// for nested QVariantLists:
case QMetaType::QVariantList:
Q_FOREACH(QVariant v, var.value<QVariantList>()) {
l_obj = CONS(from_qvariant_value(v), l_obj); }
l_obj = cl_nreverse(l_obj);
break; }
return l_obj; }
static cl_object from_qvariantlist(const QVariantList& l) {