From 2814efdfaf091b64c1f1eb40cc96f4efb0d2d2d5 Mon Sep 17 00:00:00 2001
From: polos <polos.ruetz@gmail.com>
Date: Thu, 6 Jul 2017 13:38:06 +0200
Subject: [PATCH] slight change to wrapper functions (for easier
 cross-compiling to Android)

---
 README-1.txt                      |   3 +-
 src/eql.cpp                       |   2 +-
 src/lisp/all-wrappers-1.lisp      |  25 +++---
 src/lisp/all-wrappers-10.lisp     |  96 ++++++++++-----------
 src/lisp/all-wrappers-11.lisp     | 138 +++++++++++++++---------------
 src/lisp/all-wrappers-12.lisp     |  75 ++++++++++++++++
 src/lisp/all-wrappers-2.lisp      |  18 ++--
 src/lisp/all-wrappers-3.lisp      |  26 +++---
 src/lisp/all-wrappers-4.lisp      |  34 ++++----
 src/lisp/all-wrappers-5.lisp      |  48 +++++------
 src/lisp/all-wrappers-6.lisp      |  25 ++++++
 src/lisp/all-wrappers-7.lisp      |  30 +++----
 src/lisp/all-wrappers-8.lisp      |  48 +++++------
 src/lisp/all-wrappers-9.lisp      |  72 ++++++++--------
 src/lisp/define-all-wrappers.lisp |  14 +--
 15 files changed, 379 insertions(+), 275 deletions(-)

diff --git a/README-1.txt b/README-1.txt
index 27204dc..97fa4a4 100644
--- a/README-1.txt
+++ b/README-1.txt
@@ -91,7 +91,8 @@ Qt4/Qt5 note:
   lib names differ).
 
   If you have both Qt4 and Qt5 installed, you can use the following environment
-  variable to switch between the both (Unix):
+  variable to switch between the both on Unix (which requires the different Qt
+  'bin/' directories to be in PATH):
 
     export QT_SELECT=5
 
diff --git a/src/eql.cpp b/src/eql.cpp
index 77da860..cca239f 100644
--- a/src/eql.cpp
+++ b/src/eql.cpp
@@ -7,7 +7,7 @@
 #include <QTimer>
 #include <QStringList>
 
-const char EQL::version[] = "17.6.1"; // June 2017
+const char EQL::version[] = "17.7.1"; // July 2017
 
 extern "C" void ini_EQL(cl_object);
 
diff --git a/src/lisp/all-wrappers-1.lisp b/src/lisp/all-wrappers-1.lisp
index 1cb66fc..c2d4116 100644
--- a/src/lisp/all-wrappers-1.lisp
+++ b/src/lisp/all-wrappers-1.lisp
@@ -245,6 +245,7 @@
    #:|anchorClicked|
    #:|anchorHref|
    #:|anchorNames|
+   #:|anchorRectangleChanged|
    #:|anchor|
    #:|angleAtPercent|
    #:|angleBetween|
@@ -284,6 +285,7 @@
    #:|applicationCacheQuotaExceeded|
    #:|applicationDirPath.QCoreApplication|
    #:|applicationDisplayName.QGuiApplication|
+   #:|applicationDisplayNameChanged|
    #:|applicationFilePath.QCoreApplication|
    #:|applicationFontFamilies.QFontDatabase|
    #:|applicationName.QCoreApplication|
@@ -656,7 +658,9 @@
    #:|changePosition|
    #:|changeSize|
    #:|changed|
+   #:|channelBytesWritten|
    #:|channelCount|
+   #:|channelReadyRead|
    #:|charFormatIndex|
    #:|charFormat|
    #:|characterAt|
@@ -1146,6 +1150,7 @@
    #:|defaultTextColor|
    #:|defaultTextEncoding|
    #:|defaultTextOption|
+   #:|defaultTransitionChanged|
    #:|defaultValue|
    #:|defaultWidget|
    #:|definitionSize.QPageSize|
@@ -1194,21 +1199,17 @@
    #:|direction|
    #:|directories|
    #:|directoryChanged|
-   #:|directoryEntered|
-   #:|directoryLoaded|
-   #:|directoryUrlEntered|
-   #:|directoryUrl|
-   #:|directory|
-   #:|dirtyRegionOffset|))
+   #:|directoryEntered|))
 
 (in-package :eql)
 
 (pushnew :qt-wrapper-functions *features*)
 
 (defun %auto-cast (object)
-  (when (find (qt-object-id (ensure-qt-object object))
-              '#.(list (qid "QGraphicsSvgItem")
-                       (qid "QGraphicsTextItem")
-                       (qid "QGraphicsVideoItem")
-                       (qid "QGraphicsWidget")))
-    "QGraphicsItem"))
+  ;; we want speed here, not elegance
+  (let ((id (qt-object-id (ensure-qt-object object))))
+    (when (or (= id (qid "QGraphicsSvgItem"))
+              (= id (qid "QGraphicsTextItem"))
+              (= id (qid "QGraphicsVideoItem"))
+              (= id (qid "QGraphicsWidget")))
+      "QGraphicsItem")))
diff --git a/src/lisp/all-wrappers-10.lisp b/src/lisp/all-wrappers-10.lisp
index 523b74a..68498ea 100644
--- a/src/lisp/all-wrappers-10.lisp
+++ b/src/lisp/all-wrappers-10.lisp
@@ -1,5 +1,41 @@
 (in-package :eql)
 
+(defun |releaseKeyboard| (object &rest arguments)
+  (%qinvoke-method object nil "releaseKeyboard" arguments))
+
+(defun |releaseMouse| (object &rest arguments)
+  (%qinvoke-method object nil "releaseMouse" arguments))
+
+(defun |releaseResources| (object &rest arguments)
+  (%qinvoke-method object nil "releaseResources" arguments))
+
+(defun |releaseShortcut| (object &rest arguments)
+  (%qinvoke-method object nil "releaseShortcut" arguments))
+
+(defun |releaseWidget| (object &rest arguments)
+  (%qinvoke-method object nil "releaseWidget" arguments))
+
+(defun |released| (object &rest arguments)
+  (%qinvoke-method object nil "released" arguments))
+
+(defun |release| (object &rest arguments)
+  (%qinvoke-method object nil "release" arguments))
+
+(defun |reload| (object &rest arguments)
+  (%qinvoke-method object nil "reload" arguments))
+
+(defun |remainingTime| (object &rest arguments)
+  (%qinvoke-method object nil "remainingTime" arguments))
+
+(defun |remove.QFile| (&rest arguments)
+  (%qinvoke-method "QFile" nil "remove" arguments))
+
+(defun |remove.QPixmapCache| (&rest arguments)
+  (%qinvoke-method "QPixmapCache" nil "remove" arguments))
+
+(defun |removeAccessWhitelistEntry| (object &rest arguments)
+  (%qinvoke-method object nil "removeAccessWhitelistEntry" arguments))
+
 (defun |removeAction| (object &rest arguments)
   (%qinvoke-method object nil "removeAction" arguments))
 
@@ -342,6 +378,9 @@
 (defun |resetCachedContent| (object &rest arguments)
   (%qinvoke-method object nil "resetCachedContent" arguments))
 
+(defun |resetClean| (object &rest arguments)
+  (%qinvoke-method object nil "resetClean" arguments))
+
 (defun |resetContentsSize| (object &rest arguments)
   (%qinvoke-method object nil "resetContentsSize" arguments))
 
@@ -840,6 +879,9 @@
 (defun |scheduleDelayedItemsLayout| (object &rest arguments)
   (%qinvoke-method object nil "scheduleDelayedItemsLayout" arguments))
 
+(defun |scheduleIndexDocumentation| (object &rest arguments)
+  (%qinvoke-method object nil "scheduleIndexDocumentation" arguments))
+
 (defun |scheduleRenderJob| (object &rest arguments)
   (%qinvoke-method object nil "scheduleRenderJob" arguments))
 
@@ -960,6 +1002,12 @@
 (defun |scroll| (object &rest arguments)
   (%qinvoke-method object (%auto-cast object) "scroll" arguments))
 
+(defun |search(QList<QHelpSearchQuery>)| (object &rest arguments)
+  (%qinvoke-method object nil "search(QList<QHelpSearchQuery>)" arguments))
+
+(defun |search(QString)| (object &rest arguments)
+  (%qinvoke-method object nil "search(QString)" arguments))
+
 (defun |searchAllStations| (object &rest arguments)
   (%qinvoke-method object nil "searchAllStations" arguments))
 
@@ -3551,51 +3599,3 @@
 
 (defun |setMaterial| (object &rest arguments)
   (%qinvoke-method object nil "setMaterial" arguments))
-
-(defun |setMatrix| (object &rest arguments)
-  (%qinvoke-method object nil "setMatrix" arguments))
-
-(defun |setMaxCount| (object &rest arguments)
-  (%qinvoke-method object nil "setMaxCount" arguments))
-
-(defun |setMaxLength| (object &rest arguments)
-  (%qinvoke-method object nil "setMaxLength" arguments))
-
-(defun |setMaxPendingConnections| (object &rest arguments)
-  (%qinvoke-method object nil "setMaxPendingConnections" arguments))
-
-(defun |setMaxVisibleItems| (object &rest arguments)
-  (%qinvoke-method object nil "setMaxVisibleItems" arguments))
-
-(defun |setMaximumAnisotropy| (object &rest arguments)
-  (%qinvoke-method object nil "setMaximumAnisotropy" arguments))
-
-(defun |setMaximumBlockCount| (object &rest arguments)
-  (%qinvoke-method object nil "setMaximumBlockCount" arguments))
-
-(defun |setMaximumCacheSize| (object &rest arguments)
-  (%qinvoke-method object nil "setMaximumCacheSize" arguments))
-
-(defun |setMaximumDateTime| (object &rest arguments)
-  (%qinvoke-method object nil "setMaximumDateTime" arguments))
-
-(defun |setMaximumDate| (object &rest arguments)
-  (%qinvoke-method object nil "setMaximumDate" arguments))
-
-(defun |setMaximumFrameRate| (object &rest arguments)
-  (%qinvoke-method object nil "setMaximumFrameRate" arguments))
-
-(defun |setMaximumHeight| (object &rest arguments)
-  (%qinvoke-method object nil "setMaximumHeight" arguments))
-
-(defun |setMaximumLevelOfDetail| (object &rest arguments)
-  (%qinvoke-method object nil "setMaximumLevelOfDetail" arguments))
-
-(defun |setMaximumPagesInCache.QWebSettings| (&rest arguments)
-  (%qinvoke-method "QWebSettings" nil "setMaximumPagesInCache" arguments))
-
-(defun |setMaximumSectionSize| (object &rest arguments)
-  (%qinvoke-method object nil "setMaximumSectionSize" arguments))
-
-(defun |setMaximumSize| (object &rest arguments)
-  (%qinvoke-method object nil "setMaximumSize" arguments))
diff --git a/src/lisp/all-wrappers-11.lisp b/src/lisp/all-wrappers-11.lisp
index 25f1906..15296f7 100644
--- a/src/lisp/all-wrappers-11.lisp
+++ b/src/lisp/all-wrappers-11.lisp
@@ -1,5 +1,53 @@
 (in-package :eql)
 
+(defun |setMatrix| (object &rest arguments)
+  (%qinvoke-method object nil "setMatrix" arguments))
+
+(defun |setMaxCount| (object &rest arguments)
+  (%qinvoke-method object nil "setMaxCount" arguments))
+
+(defun |setMaxLength| (object &rest arguments)
+  (%qinvoke-method object nil "setMaxLength" arguments))
+
+(defun |setMaxPendingConnections| (object &rest arguments)
+  (%qinvoke-method object nil "setMaxPendingConnections" arguments))
+
+(defun |setMaxVisibleItems| (object &rest arguments)
+  (%qinvoke-method object nil "setMaxVisibleItems" arguments))
+
+(defun |setMaximumAnisotropy| (object &rest arguments)
+  (%qinvoke-method object nil "setMaximumAnisotropy" arguments))
+
+(defun |setMaximumBlockCount| (object &rest arguments)
+  (%qinvoke-method object nil "setMaximumBlockCount" arguments))
+
+(defun |setMaximumCacheSize| (object &rest arguments)
+  (%qinvoke-method object nil "setMaximumCacheSize" arguments))
+
+(defun |setMaximumDateTime| (object &rest arguments)
+  (%qinvoke-method object nil "setMaximumDateTime" arguments))
+
+(defun |setMaximumDate| (object &rest arguments)
+  (%qinvoke-method object nil "setMaximumDate" arguments))
+
+(defun |setMaximumFrameRate| (object &rest arguments)
+  (%qinvoke-method object nil "setMaximumFrameRate" arguments))
+
+(defun |setMaximumHeight| (object &rest arguments)
+  (%qinvoke-method object nil "setMaximumHeight" arguments))
+
+(defun |setMaximumLevelOfDetail| (object &rest arguments)
+  (%qinvoke-method object nil "setMaximumLevelOfDetail" arguments))
+
+(defun |setMaximumPagesInCache.QWebSettings| (&rest arguments)
+  (%qinvoke-method "QWebSettings" nil "setMaximumPagesInCache" arguments))
+
+(defun |setMaximumSectionSize| (object &rest arguments)
+  (%qinvoke-method object nil "setMaximumSectionSize" arguments))
+
+(defun |setMaximumSize| (object &rest arguments)
+  (%qinvoke-method object nil "setMaximumSize" arguments))
+
 (defun |setMaximumTime| (object &rest arguments)
   (%qinvoke-method object nil "setMaximumTime" arguments))
 
@@ -2265,6 +2313,18 @@
 (defun |showMenu| (object &rest arguments)
   (%qinvoke-method object nil "showMenu" arguments))
 
+(defun |showMessage(QString,QString,QIcon)| (object &rest arguments)
+  (%qinvoke-method object nil "showMessage(QString,QString,QIcon)" arguments))
+
+(defun |showMessage(QString,QString,QIcon...)| (object &rest arguments)
+  (%qinvoke-method object nil "showMessage(QString,QString,QIcon...)" arguments))
+
+(defun |showMessage(QString,QString,QSystemTrayIcon::MessageIcon)| (object &rest arguments)
+  (%qinvoke-method object nil "showMessage(QString,QString,QSystemTrayIcon::MessageIcon)" arguments))
+
+(defun |showMessage(QString,QString,QSystemTrayIcon::MessageIcon...)| (object &rest arguments)
+  (%qinvoke-method object nil "showMessage(QString,QString,QSystemTrayIcon::MessageIcon...)" arguments))
+
 (defun |showMessage| (object &rest arguments)
   (%qinvoke-method object nil "showMessage" arguments))
 
@@ -3177,6 +3237,9 @@
 (defun |tabData| (object &rest arguments)
   (%qinvoke-method object nil "tabData" arguments))
 
+(defun |tabFocusBehaviorChanged| (object &rest arguments)
+  (%qinvoke-method object nil "tabFocusBehaviorChanged" arguments))
+
 (defun |tabFocusBehavior| (object &rest arguments)
   (%qinvoke-method object nil "tabFocusBehavior" arguments))
 
@@ -3219,6 +3282,9 @@
 (defun |tabWhatsThis| (object &rest arguments)
   (%qinvoke-method object nil "tabWhatsThis" arguments))
 
+(defun |tabifiedDockWidgetActivated| (object &rest arguments)
+  (%qinvoke-method object nil "tabifiedDockWidgetActivated" arguments))
+
 (defun |tabifiedDockWidgets| (object &rest arguments)
   (%qinvoke-method object nil "tabifiedDockWidgets" arguments))
 
@@ -3468,6 +3534,9 @@
 (defun |textureProvider| (object &rest arguments)
   (%qinvoke-method object nil "textureProvider" arguments))
 
+(defun |textureSizeChanged| (object &rest arguments)
+  (%qinvoke-method object nil "textureSizeChanged" arguments))
+
 (defun |textureSize| (object &rest arguments)
   (%qinvoke-method object nil "textureSize" arguments))
 
@@ -3530,72 +3599,3 @@
 
 (defun |timerType| (object &rest arguments)
   (%qinvoke-method object nil "timerType" arguments))
-
-(defun |timestamp| (object &rest arguments)
-  (%qinvoke-method object nil "timestamp" arguments))
-
-(defun |time| (object &rest arguments)
-  (%qinvoke-method object nil "time" arguments))
-
-(defun |tip| (object &rest arguments)
-  (%qinvoke-method object nil "tip" arguments))
-
-(defun |titleBarWidget| (object &rest arguments)
-  (%qinvoke-method object nil "titleBarWidget" arguments))
-
-(defun |titleChanged| (object &rest arguments)
-  (%qinvoke-method object nil "titleChanged" arguments))
-
-(defun |titleFormat| (object &rest arguments)
-  (%qinvoke-method object nil "titleFormat" arguments))
-
-(defun |title| (object &rest arguments)
-  (%qinvoke-method object nil "title" arguments))
-
-(defun |toAce.QUrl| (&rest arguments)
-  (%qinvoke-method "QUrl" nil "toAce" arguments))
-
-(defun |toAffine| (object &rest arguments)
-  (%qinvoke-method object nil "toAffine" arguments))
-
-(defun |toBitArray| (object &rest arguments)
-  (%qinvoke-method object nil "toBitArray" arguments))
-
-(defun |toBlockFormat| (object &rest arguments)
-  (%qinvoke-method object nil "toBlockFormat" arguments))
-
-(defun |toBool| (object &rest arguments)
-  (%qinvoke-method object nil "toBool" arguments))
-
-(defun |toByteArray| (object &rest arguments)
-  (%qinvoke-method object nil "toByteArray" arguments))
-
-(defun |toCharFormat| (object &rest arguments)
-  (%qinvoke-method object nil "toCharFormat" arguments))
-
-(defun |toChar| (object &rest arguments)
-  (%qinvoke-method object nil "toChar" arguments))
-
-(defun |toCmyk| (object &rest arguments)
-  (%qinvoke-method object nil "toCmyk" arguments))
-
-(defun |toCubicSpline| (object &rest arguments)
-  (%qinvoke-method object nil "toCubicSpline" arguments))
-
-(defun |toCurrencyString(double)| (object &rest arguments)
-  (%qinvoke-method object nil "toCurrencyString(double)" arguments))
-
-(defun |toCurrencyString(double...)| (object &rest arguments)
-  (%qinvoke-method object nil "toCurrencyString(double...)" arguments))
-
-(defun |toCurrencyString(float)| (object &rest arguments)
-  (%qinvoke-method object nil "toCurrencyString(float)" arguments))
-
-(defun |toCurrencyString(float...)| (object &rest arguments)
-  (%qinvoke-method object nil "toCurrencyString(float...)" arguments))
-
-(defun |toCurrencyString(int)| (object &rest arguments)
-  (%qinvoke-method object nil "toCurrencyString(int)" arguments))
-
-(defun |toCurrencyString(int...)| (object &rest arguments)
-  (%qinvoke-method object nil "toCurrencyString(int...)" arguments))
diff --git a/src/lisp/all-wrappers-12.lisp b/src/lisp/all-wrappers-12.lisp
index a6fd74b..eabe275 100644
--- a/src/lisp/all-wrappers-12.lisp
+++ b/src/lisp/all-wrappers-12.lisp
@@ -1,5 +1,74 @@
 (in-package :eql)
 
+(defun |timestamp| (object &rest arguments)
+  (%qinvoke-method object nil "timestamp" arguments))
+
+(defun |time| (object &rest arguments)
+  (%qinvoke-method object nil "time" arguments))
+
+(defun |tip| (object &rest arguments)
+  (%qinvoke-method object nil "tip" arguments))
+
+(defun |titleBarWidget| (object &rest arguments)
+  (%qinvoke-method object nil "titleBarWidget" arguments))
+
+(defun |titleChanged| (object &rest arguments)
+  (%qinvoke-method object nil "titleChanged" arguments))
+
+(defun |titleFormat| (object &rest arguments)
+  (%qinvoke-method object nil "titleFormat" arguments))
+
+(defun |title| (object &rest arguments)
+  (%qinvoke-method object nil "title" arguments))
+
+(defun |toAce.QUrl| (&rest arguments)
+  (%qinvoke-method "QUrl" nil "toAce" arguments))
+
+(defun |toAffine| (object &rest arguments)
+  (%qinvoke-method object nil "toAffine" arguments))
+
+(defun |toBitArray| (object &rest arguments)
+  (%qinvoke-method object nil "toBitArray" arguments))
+
+(defun |toBlockFormat| (object &rest arguments)
+  (%qinvoke-method object nil "toBlockFormat" arguments))
+
+(defun |toBool| (object &rest arguments)
+  (%qinvoke-method object nil "toBool" arguments))
+
+(defun |toByteArray| (object &rest arguments)
+  (%qinvoke-method object nil "toByteArray" arguments))
+
+(defun |toCharFormat| (object &rest arguments)
+  (%qinvoke-method object nil "toCharFormat" arguments))
+
+(defun |toChar| (object &rest arguments)
+  (%qinvoke-method object nil "toChar" arguments))
+
+(defun |toCmyk| (object &rest arguments)
+  (%qinvoke-method object nil "toCmyk" arguments))
+
+(defun |toCubicSpline| (object &rest arguments)
+  (%qinvoke-method object nil "toCubicSpline" arguments))
+
+(defun |toCurrencyString(double)| (object &rest arguments)
+  (%qinvoke-method object nil "toCurrencyString(double)" arguments))
+
+(defun |toCurrencyString(double...)| (object &rest arguments)
+  (%qinvoke-method object nil "toCurrencyString(double...)" arguments))
+
+(defun |toCurrencyString(float)| (object &rest arguments)
+  (%qinvoke-method object nil "toCurrencyString(float)" arguments))
+
+(defun |toCurrencyString(float...)| (object &rest arguments)
+  (%qinvoke-method object nil "toCurrencyString(float...)" arguments))
+
+(defun |toCurrencyString(int)| (object &rest arguments)
+  (%qinvoke-method object nil "toCurrencyString(int)" arguments))
+
+(defun |toCurrencyString(int...)| (object &rest arguments)
+  (%qinvoke-method object nil "toCurrencyString(int...)" arguments))
+
 (defun |toCurrencyString(qlonglong)| (object &rest arguments)
   (%qinvoke-method object nil "toCurrencyString(qlonglong)" arguments))
 
@@ -1050,6 +1119,9 @@
 (defun |useDesignMetrics| (object &rest arguments)
   (%qinvoke-method object nil "useDesignMetrics" arguments))
 
+(defun |useHoverEffectsChanged| (object &rest arguments)
+  (%qinvoke-method object nil "useHoverEffectsChanged" arguments))
+
 (defun |useRtlExtensions| (object &rest arguments)
   (%qinvoke-method object nil "useRtlExtensions" arguments))
 
@@ -1398,6 +1470,9 @@
 (defun |wheelScrollLines.QApplication| (&rest arguments)
   (%qinvoke-method "QApplication" nil "wheelScrollLines" arguments))
 
+(defun |wheelScrollLinesChanged| (object &rest arguments)
+  (%qinvoke-method object nil "wheelScrollLinesChanged" arguments))
+
 (defun |whiteBalanceMode| (object &rest arguments)
   (%qinvoke-method object nil "whiteBalanceMode" arguments))
 
diff --git a/src/lisp/all-wrappers-2.lisp b/src/lisp/all-wrappers-2.lisp
index 8276fca..91aaf0c 100644
--- a/src/lisp/all-wrappers-2.lisp
+++ b/src/lisp/all-wrappers-2.lisp
@@ -1,5 +1,10 @@
 (defpackage :eql
   (:export
+   #:|directoryLoaded|
+   #:|directoryUrlEntered|
+   #:|directoryUrl|
+   #:|directory|
+   #:|dirtyRegionOffset|
    #:|dir|
    #:|disableAttributeArray(const char*)|
    #:|disableAttributeArray(int)|
@@ -281,6 +286,7 @@
    #:|eraseRect(QRect)|
    #:|eraseRect(QRectF)|
    #:|eraseRect|
+   #:|errorOccurred|
    #:|errorStateChanged|
    #:|errorState|
    #:|errorString|
@@ -523,7 +529,6 @@
    #:|font|
    #:|forceActiveFocus|
    #:|forceCompletion|
-   #:|forcePolish|
    #:|forceShow|
    #:|foregroundBrush|
    #:|foregroundColor|
@@ -696,6 +701,7 @@
    #:|groupId|
    #:|groupSeparator|
    #:|group|
+   #:|handleScreenChanged|
    #:|handleWidth|
    #:|handle|
    #:|hardwareAddress|
@@ -950,6 +956,7 @@
    #:|inputChannelMode|
    #:|inputDirectionChanged|
    #:|inputDirection|
+   #:|inputItemClipRectangleChanged|
    #:|inputItemRectangle|
    #:|inputItemTransform|
    #:|inputMask|
@@ -1192,11 +1199,4 @@
    #:|isGenerated(int)|
    #:|isGenerated|
    #:|isGrayscale|
-   #:|isGridVisible|
-   #:|isGroupSeparatorShown|
-   #:|isHeaderHidden|
-   #:|isHidden|
-   #:|isHttpOnly|
-   #:|isIconVisibleInMenu|
-   #:|isIdentifierEscaped|
-   #:|isIdentity|))
+   #:|isGridVisible|))
diff --git a/src/lisp/all-wrappers-3.lisp b/src/lisp/all-wrappers-3.lisp
index 7119229..8ea74e6 100644
--- a/src/lisp/all-wrappers-3.lisp
+++ b/src/lisp/all-wrappers-3.lisp
@@ -1,5 +1,12 @@
 (defpackage :eql
   (:export
+   #:|isGroupSeparatorShown|
+   #:|isHeaderHidden|
+   #:|isHidden|
+   #:|isHttpOnly|
+   #:|isIconVisibleInMenu|
+   #:|isIdentifierEscaped|
+   #:|isIdentity|
    #:|isImageFormat|
    #:|isInSubnet|
    #:|isInteractive|
@@ -632,6 +639,7 @@
    #:|mipMaxLevel|
    #:|mipmapFiltering|
    #:|mipmap|
+   #:|mirrorVerticallyChanged|
    #:|mirrored|
    #:|miterLimit|
    #:|mkdir|
@@ -662,6 +670,7 @@
    #:|mouseGrabber.QWidget|
    #:|mouseGrabberItem|
    #:|mouseMoveEvent|
+   #:|mousePressAndHoldIntervalChanged|
    #:|mousePressAndHoldInterval|
    #:|mousePressEvent|
    #:|mouseReleaseEvent|
@@ -939,6 +948,7 @@
    #:|physicalDotsPerInchX|
    #:|physicalDotsPerInchY|
    #:|physicalDotsPerInch|
+   #:|physicalDpiChanged|
    #:|physicalDpiX|
    #:|physicalDpiY|
    #:|physicalSizeChanged|
@@ -1155,6 +1165,8 @@
    #:|rect|
    #:|redBufferSize|
    #:|redF|
+   #:|redirectAllowed|
+   #:|redirected|
    #:|redoAvailable|
    #:|redoTextChanged|
    #:|redoText|
@@ -1187,16 +1199,4 @@
    #:|relationModel|
    #:|relation|
    #:|relativeFilePath|
-   #:|releaseControl|
-   #:|releaseKeyboard|
-   #:|releaseMouse|
-   #:|releaseResources|
-   #:|releaseShortcut|
-   #:|releaseWidget|
-   #:|released|
-   #:|release|
-   #:|reload|
-   #:|remainingTime|
-   #:|remove.QFile|
-   #:|remove.QPixmapCache|
-   #:|removeAccessWhitelistEntry|))
+   #:|releaseControl|))
diff --git a/src/lisp/all-wrappers-4.lisp b/src/lisp/all-wrappers-4.lisp
index 3db1be0..f3c69f0 100644
--- a/src/lisp/all-wrappers-4.lisp
+++ b/src/lisp/all-wrappers-4.lisp
@@ -1,5 +1,17 @@
 (defpackage :eql
   (:export
+   #:|releaseKeyboard|
+   #:|releaseMouse|
+   #:|releaseResources|
+   #:|releaseShortcut|
+   #:|releaseWidget|
+   #:|released|
+   #:|release|
+   #:|reload|
+   #:|remainingTime|
+   #:|remove.QFile|
+   #:|remove.QPixmapCache|
+   #:|removeAccessWhitelistEntry|
    #:|removeAction|
    #:|removeAllApplicationFonts.QFontDatabase|
    #:|removeAllChildNodes|
@@ -114,6 +126,7 @@
    #:|resetAttribute|
    #:|resetBindCount|
    #:|resetCachedContent|
+   #:|resetClean|
    #:|resetContentsSize|
    #:|resetDefaultSectionSize|
    #:|resetFontFamily|
@@ -280,6 +293,7 @@
    #:|sceneTransform|
    #:|scene|
    #:|scheduleDelayedItemsLayout|
+   #:|scheduleIndexDocumentation|
    #:|scheduleRenderJob|
    #:|scheme|
    #:|scopeId|
@@ -320,6 +334,8 @@
    #:|scrollToTop|
    #:|scrollTo|
    #:|scroll|
+   #:|search(QList<QHelpSearchQuery>)|
+   #:|search(QString)|
    #:|searchAllStations|
    #:|searchAndLock|
    #:|searchBackward|
@@ -1183,20 +1199,4 @@
    #:|setMask(QBitmap)|
    #:|setMask(QRegion)|
    #:|setMask|
-   #:|setMaterial|
-   #:|setMatrix|
-   #:|setMaxCount|
-   #:|setMaxLength|
-   #:|setMaxPendingConnections|
-   #:|setMaxVisibleItems|
-   #:|setMaximumAnisotropy|
-   #:|setMaximumBlockCount|
-   #:|setMaximumCacheSize|
-   #:|setMaximumDateTime|
-   #:|setMaximumDate|
-   #:|setMaximumFrameRate|
-   #:|setMaximumHeight|
-   #:|setMaximumLevelOfDetail|
-   #:|setMaximumPagesInCache.QWebSettings|
-   #:|setMaximumSectionSize|
-   #:|setMaximumSize|))
+   #:|setMaterial|))
diff --git a/src/lisp/all-wrappers-5.lisp b/src/lisp/all-wrappers-5.lisp
index 72e2855..a243c39 100644
--- a/src/lisp/all-wrappers-5.lisp
+++ b/src/lisp/all-wrappers-5.lisp
@@ -1,5 +1,21 @@
 (defpackage :eql
   (:export
+   #:|setMatrix|
+   #:|setMaxCount|
+   #:|setMaxLength|
+   #:|setMaxPendingConnections|
+   #:|setMaxVisibleItems|
+   #:|setMaximumAnisotropy|
+   #:|setMaximumBlockCount|
+   #:|setMaximumCacheSize|
+   #:|setMaximumDateTime|
+   #:|setMaximumDate|
+   #:|setMaximumFrameRate|
+   #:|setMaximumHeight|
+   #:|setMaximumLevelOfDetail|
+   #:|setMaximumPagesInCache.QWebSettings|
+   #:|setMaximumSectionSize|
+   #:|setMaximumSize|
    #:|setMaximumTime|
    #:|setMaximumTouchPoints|
    #:|setMaximumWidth|
@@ -755,6 +771,10 @@
    #:|showLink|
    #:|showMaximized|
    #:|showMenu|
+   #:|showMessage(QString,QString,QIcon)|
+   #:|showMessage(QString,QString,QIcon...)|
+   #:|showMessage(QString,QString,QSystemTrayIcon::MessageIcon)|
+   #:|showMessage(QString,QString,QSystemTrayIcon::MessageIcon...)|
    #:|showMessage|
    #:|showMinimized|
    #:|showNextMonth|
@@ -1059,6 +1079,7 @@
    #:|tabChangesFocus|
    #:|tabCloseRequested|
    #:|tabData|
+   #:|tabFocusBehaviorChanged|
    #:|tabFocusBehavior|
    #:|tabIcon|
    #:|tabKeyNavigation|
@@ -1073,6 +1094,7 @@
    #:|tabText|
    #:|tabToolTip|
    #:|tabWhatsThis|
+   #:|tabifiedDockWidgetActivated|
    #:|tabifiedDockWidgets|
    #:|tabifyDockWidget|
    #:|tableCellFormatIndex|
@@ -1156,6 +1178,7 @@
    #:|textureId|
    #:|textureImage|
    #:|textureProvider|
+   #:|textureSizeChanged|
    #:|textureSize|
    #:|textureTarget|
    #:|texture|
@@ -1176,27 +1199,4 @@
    #:|timeout.QTapAndHoldGesture|
    #:|timeout|
    #:|timerId|
-   #:|timerType|
-   #:|timestamp|
-   #:|time|
-   #:|tip|
-   #:|titleBarWidget|
-   #:|titleChanged|
-   #:|titleFormat|
-   #:|title|
-   #:|toAce.QUrl|
-   #:|toAffine|
-   #:|toBitArray|
-   #:|toBlockFormat|
-   #:|toBool|
-   #:|toByteArray|
-   #:|toCharFormat|
-   #:|toChar|
-   #:|toCmyk|
-   #:|toCubicSpline|
-   #:|toCurrencyString(double)|
-   #:|toCurrencyString(double...)|
-   #:|toCurrencyString(float)|
-   #:|toCurrencyString(float...)|
-   #:|toCurrencyString(int)|
-   #:|toCurrencyString(int...)|))
+   #:|timerType|))
diff --git a/src/lisp/all-wrappers-6.lisp b/src/lisp/all-wrappers-6.lisp
index 572a656..12af7f9 100644
--- a/src/lisp/all-wrappers-6.lisp
+++ b/src/lisp/all-wrappers-6.lisp
@@ -1,5 +1,28 @@
 (defpackage :eql
   (:export
+   #:|timestamp|
+   #:|time|
+   #:|tip|
+   #:|titleBarWidget|
+   #:|titleChanged|
+   #:|titleFormat|
+   #:|title|
+   #:|toAce.QUrl|
+   #:|toAffine|
+   #:|toBitArray|
+   #:|toBlockFormat|
+   #:|toBool|
+   #:|toByteArray|
+   #:|toCharFormat|
+   #:|toChar|
+   #:|toCmyk|
+   #:|toCubicSpline|
+   #:|toCurrencyString(double)|
+   #:|toCurrencyString(double...)|
+   #:|toCurrencyString(float)|
+   #:|toCurrencyString(float...)|
+   #:|toCurrencyString(int)|
+   #:|toCurrencyString(int...)|
    #:|toCurrencyString(qlonglong)|
    #:|toCurrencyString(qlonglong...)|
    #:|toCurrencyString(qulonglong)|
@@ -350,6 +373,7 @@
    #:|urls|
    #:|url|
    #:|useDesignMetrics|
+   #:|useHoverEffectsChanged|
    #:|useRtlExtensions|
    #:|usedBits|
    #:|userData|
@@ -466,6 +490,7 @@
    #:|whatsThis|
    #:|wheelEvent|
    #:|wheelScrollLines.QApplication|
+   #:|wheelScrollLinesChanged|
    #:|whiteBalanceMode|
    #:|widgetAt.QApplication|
    #:|widgetEvent|
diff --git a/src/lisp/all-wrappers-7.lisp b/src/lisp/all-wrappers-7.lisp
index 861cd32..4081faf 100644
--- a/src/lisp/all-wrappers-7.lisp
+++ b/src/lisp/all-wrappers-7.lisp
@@ -735,6 +735,9 @@
 (defun |anchorNames| (object &rest arguments)
   (%qinvoke-method object nil "anchorNames" arguments))
 
+(defun |anchorRectangleChanged| (object &rest arguments)
+  (%qinvoke-method object nil "anchorRectangleChanged" arguments))
+
 (defun |anchor| (object &rest arguments)
   (%qinvoke-method object nil "anchor" arguments))
 
@@ -852,6 +855,9 @@
 (defun |applicationDisplayName.QGuiApplication| (&rest arguments)
   (%qinvoke-method "QGuiApplication" nil "applicationDisplayName" arguments))
 
+(defun |applicationDisplayNameChanged| (object &rest arguments)
+  (%qinvoke-method object nil "applicationDisplayNameChanged" arguments))
+
 (defun |applicationFilePath.QCoreApplication| (&rest arguments)
   (%qinvoke-method "QCoreApplication" nil "applicationFilePath" arguments))
 
@@ -1968,9 +1974,15 @@
 (defun |changed| (object &rest arguments)
   (%qinvoke-method object nil "changed" arguments))
 
+(defun |channelBytesWritten| (object &rest arguments)
+  (%qinvoke-method object nil "channelBytesWritten" arguments))
+
 (defun |channelCount| (object &rest arguments)
   (%qinvoke-method object nil "channelCount" arguments))
 
+(defun |channelReadyRead| (object &rest arguments)
+  (%qinvoke-method object nil "channelReadyRead" arguments))
+
 (defun |charFormatIndex| (object &rest arguments)
   (%qinvoke-method object nil "charFormatIndex" arguments))
 
@@ -3438,6 +3450,9 @@
 (defun |defaultTextOption| (object &rest arguments)
   (%qinvoke-method object nil "defaultTextOption" arguments))
 
+(defun |defaultTransitionChanged| (object &rest arguments)
+  (%qinvoke-method object nil "defaultTransitionChanged" arguments))
+
 (defun |defaultValue| (object &rest arguments)
   (%qinvoke-method object nil "defaultValue" arguments))
 
@@ -3584,18 +3599,3 @@
 
 (defun |directoryEntered| (object &rest arguments)
   (%qinvoke-method object nil "directoryEntered" arguments))
-
-(defun |directoryLoaded| (object &rest arguments)
-  (%qinvoke-method object nil "directoryLoaded" arguments))
-
-(defun |directoryUrlEntered| (object &rest arguments)
-  (%qinvoke-method object nil "directoryUrlEntered" arguments))
-
-(defun |directoryUrl| (object &rest arguments)
-  (%qinvoke-method object nil "directoryUrl" arguments))
-
-(defun |directory| (object &rest arguments)
-  (%qinvoke-method object nil "directory" arguments))
-
-(defun |dirtyRegionOffset| (object &rest arguments)
-  (%qinvoke-method object nil "dirtyRegionOffset" arguments))
diff --git a/src/lisp/all-wrappers-8.lisp b/src/lisp/all-wrappers-8.lisp
index b0fa2bd..a04b939 100644
--- a/src/lisp/all-wrappers-8.lisp
+++ b/src/lisp/all-wrappers-8.lisp
@@ -1,5 +1,20 @@
 (in-package :eql)
 
+(defun |directoryLoaded| (object &rest arguments)
+  (%qinvoke-method object nil "directoryLoaded" arguments))
+
+(defun |directoryUrlEntered| (object &rest arguments)
+  (%qinvoke-method object nil "directoryUrlEntered" arguments))
+
+(defun |directoryUrl| (object &rest arguments)
+  (%qinvoke-method object nil "directoryUrl" arguments))
+
+(defun |directory| (object &rest arguments)
+  (%qinvoke-method object nil "directory" arguments))
+
+(defun |dirtyRegionOffset| (object &rest arguments)
+  (%qinvoke-method object nil "dirtyRegionOffset" arguments))
+
 (defun |dir| (object &rest arguments)
   (%qinvoke-method object nil "dir" arguments))
 
@@ -843,6 +858,9 @@
 (defun |eraseRect| (object &rest arguments)
   (%qinvoke-method object nil "eraseRect" arguments))
 
+(defun |errorOccurred| (object &rest arguments)
+  (%qinvoke-method object nil "errorOccurred" arguments))
+
 (defun |errorStateChanged| (object &rest arguments)
   (%qinvoke-method object nil "errorStateChanged" arguments))
 
@@ -1569,9 +1587,6 @@
 (defun |forceCompletion| (object &rest arguments)
   (%qinvoke-method object nil "forceCompletion" arguments))
 
-(defun |forcePolish| (object &rest arguments)
-  (%qinvoke-method object nil "forcePolish" arguments))
-
 (defun |forceShow| (object &rest arguments)
   (%qinvoke-method object nil "forceShow" arguments))
 
@@ -2088,6 +2103,9 @@
 (defun |group| (object &rest arguments)
   (%qinvoke-method object (%auto-cast object) "group" arguments))
 
+(defun |handleScreenChanged| (object &rest arguments)
+  (%qinvoke-method object nil "handleScreenChanged" arguments))
+
 (defun |handleWidth| (object &rest arguments)
   (%qinvoke-method object nil "handleWidth" arguments))
 
@@ -2850,6 +2868,9 @@
 (defun |inputDirection| (object &rest arguments)
   (%qinvoke-method object nil "inputDirection" arguments))
 
+(defun |inputItemClipRectangleChanged| (object &rest arguments)
+  (%qinvoke-method object nil "inputItemClipRectangleChanged" arguments))
+
 (defun |inputItemRectangle| (object &rest arguments)
   (%qinvoke-method object nil "inputItemRectangle" arguments))
 
@@ -3578,24 +3599,3 @@
 
 (defun |isGridVisible| (object &rest arguments)
   (%qinvoke-method object nil "isGridVisible" arguments))
-
-(defun |isGroupSeparatorShown| (object &rest arguments)
-  (%qinvoke-method object nil "isGroupSeparatorShown" arguments))
-
-(defun |isHeaderHidden| (object &rest arguments)
-  (%qinvoke-method object nil "isHeaderHidden" arguments))
-
-(defun |isHidden| (object &rest arguments)
-  (%qinvoke-method object nil "isHidden" arguments))
-
-(defun |isHttpOnly| (object &rest arguments)
-  (%qinvoke-method object nil "isHttpOnly" arguments))
-
-(defun |isIconVisibleInMenu| (object &rest arguments)
-  (%qinvoke-method object nil "isIconVisibleInMenu" arguments))
-
-(defun |isIdentifierEscaped| (object &rest arguments)
-  (%qinvoke-method object nil "isIdentifierEscaped" arguments))
-
-(defun |isIdentity| (object &rest arguments)
-  (%qinvoke-method object nil "isIdentity" arguments))
diff --git a/src/lisp/all-wrappers-9.lisp b/src/lisp/all-wrappers-9.lisp
index edb95b4..1392ce4 100644
--- a/src/lisp/all-wrappers-9.lisp
+++ b/src/lisp/all-wrappers-9.lisp
@@ -1,5 +1,26 @@
 (in-package :eql)
 
+(defun |isGroupSeparatorShown| (object &rest arguments)
+  (%qinvoke-method object nil "isGroupSeparatorShown" arguments))
+
+(defun |isHeaderHidden| (object &rest arguments)
+  (%qinvoke-method object nil "isHeaderHidden" arguments))
+
+(defun |isHidden| (object &rest arguments)
+  (%qinvoke-method object nil "isHidden" arguments))
+
+(defun |isHttpOnly| (object &rest arguments)
+  (%qinvoke-method object nil "isHttpOnly" arguments))
+
+(defun |isIconVisibleInMenu| (object &rest arguments)
+  (%qinvoke-method object nil "isIconVisibleInMenu" arguments))
+
+(defun |isIdentifierEscaped| (object &rest arguments)
+  (%qinvoke-method object nil "isIdentifierEscaped" arguments))
+
+(defun |isIdentity| (object &rest arguments)
+  (%qinvoke-method object nil "isIdentity" arguments))
+
 (defun |isImageFormat| (object &rest arguments)
   (%qinvoke-method object nil "isImageFormat" arguments))
 
@@ -1896,6 +1917,9 @@
 (defun |mipmap| (object &rest arguments)
   (%qinvoke-method object nil "mipmap" arguments))
 
+(defun |mirrorVerticallyChanged| (object &rest arguments)
+  (%qinvoke-method object nil "mirrorVerticallyChanged" arguments))
+
 (defun |mirrored| (object &rest arguments)
   (%qinvoke-method object nil "mirrored" arguments))
 
@@ -1986,6 +2010,9 @@
 (defun |mouseMoveEvent| (object &rest arguments)
   (%qinvoke-method object nil "mouseMoveEvent" arguments))
 
+(defun |mousePressAndHoldIntervalChanged| (object &rest arguments)
+  (%qinvoke-method object nil "mousePressAndHoldIntervalChanged" arguments))
+
 (defun |mousePressAndHoldInterval| (object &rest arguments)
   (%qinvoke-method object nil "mousePressAndHoldInterval" arguments))
 
@@ -2817,6 +2844,9 @@
 (defun |physicalDotsPerInch| (object &rest arguments)
   (%qinvoke-method object nil "physicalDotsPerInch" arguments))
 
+(defun |physicalDpiChanged| (object &rest arguments)
+  (%qinvoke-method object nil "physicalDpiChanged" arguments))
+
 (defun |physicalDpiX| (object &rest arguments)
   (%qinvoke-method object nil "physicalDpiX" arguments))
 
@@ -3465,6 +3495,12 @@
 (defun |redF| (object &rest arguments)
   (%qinvoke-method object nil "redF" arguments))
 
+(defun |redirectAllowed| (object &rest arguments)
+  (%qinvoke-method object nil "redirectAllowed" arguments))
+
+(defun |redirected| (object &rest arguments)
+  (%qinvoke-method object nil "redirected" arguments))
+
 (defun |redoAvailable| (object &rest arguments)
   (%qinvoke-method object nil "redoAvailable" arguments))
 
@@ -3563,39 +3599,3 @@
 
 (defun |releaseControl| (object &rest arguments)
   (%qinvoke-method object nil "releaseControl" arguments))
-
-(defun |releaseKeyboard| (object &rest arguments)
-  (%qinvoke-method object nil "releaseKeyboard" arguments))
-
-(defun |releaseMouse| (object &rest arguments)
-  (%qinvoke-method object nil "releaseMouse" arguments))
-
-(defun |releaseResources| (object &rest arguments)
-  (%qinvoke-method object nil "releaseResources" arguments))
-
-(defun |releaseShortcut| (object &rest arguments)
-  (%qinvoke-method object nil "releaseShortcut" arguments))
-
-(defun |releaseWidget| (object &rest arguments)
-  (%qinvoke-method object nil "releaseWidget" arguments))
-
-(defun |released| (object &rest arguments)
-  (%qinvoke-method object nil "released" arguments))
-
-(defun |release| (object &rest arguments)
-  (%qinvoke-method object nil "release" arguments))
-
-(defun |reload| (object &rest arguments)
-  (%qinvoke-method object nil "reload" arguments))
-
-(defun |remainingTime| (object &rest arguments)
-  (%qinvoke-method object nil "remainingTime" arguments))
-
-(defun |remove.QFile| (&rest arguments)
-  (%qinvoke-method "QFile" nil "remove" arguments))
-
-(defun |remove.QPixmapCache| (&rest arguments)
-  (%qinvoke-method "QPixmapCache" nil "remove" arguments))
-
-(defun |removeAccessWhitelistEntry| (object &rest arguments)
-  (%qinvoke-method object nil "removeAccessWhitelistEntry" arguments))
diff --git a/src/lisp/define-all-wrappers.lisp b/src/lisp/define-all-wrappers.lisp
index 276ed15..634304b 100644
--- a/src/lisp/define-all-wrappers.lisp
+++ b/src/lisp/define-all-wrappers.lisp
@@ -146,12 +146,14 @@
                        ~%(pushnew :qt-wrapper-functions *features*)~
                        ~%~
                        ~%(defun %auto-cast (object)~
-                       ~%  (when (find (qt-object-id (ensure-qt-object object))~
-                       ~%              '#.(list (qid \"QGraphicsSvgItem\")~
-                       ~%                       (qid \"QGraphicsTextItem\")~
-                       ~%                       (qid \"QGraphicsVideoItem\")~
-                       ~%                       (qid \"QGraphicsWidget\")))~
-                       ~%    \"QGraphicsItem\"))~%")))))
+                       ~%  ;; we want speed here, not elegance, and we can't use reader macros~
+                       ~%  ;; (because of cross-compiling for Android)~
+                       ~%  (let ((id (qt-object-id (ensure-qt-object object))))~
+                       ~%    (when (or (= id (qid \"QGraphicsSvgItem\"))~
+                       ~%              (= id (qid \"QGraphicsTextItem\"))~
+                       ~%              (= id (qid \"QGraphicsVideoItem\"))~
+                       ~%              (= id (qid \"QGraphicsWidget\")))~
+                       ~%      \"QGraphicsItem\")))~%")))))
     (setf definitions (sort (delete-duplicates definitions :test 'string=) 'string<))
     (print (length definitions))
     (x:while definitions