diff --git a/examples/.android-ssl-test/lisp/main.lisp b/examples/.android-ssl-test/lisp/main.lisp index f78bd5d..1db38cd 100644 --- a/examples/.android-ssl-test/lisp/main.lisp +++ b/examples/.android-ssl-test/lisp/main.lisp @@ -1,10 +1,5 @@ (in-package :app) -#+android -(when (probe-file "libssl.so") - (ffi:load-foreign-library "libcrypto.so") - (ffi:load-foreign-library "libssl.so")) - (defun ini () (q> |text| ui:*label* (first (last (multiple-value-list (drakma:http-request "https://duckduckgo.com")))))) diff --git a/examples/.android-ssl-test/qml/main.qml b/examples/.android-ssl-test/qml/main.qml index 0389dae..756d465 100644 --- a/examples/.android-ssl-test/qml/main.qml +++ b/examples/.android-ssl-test/qml/main.qml @@ -2,13 +2,22 @@ import QtQuick 2.15 import QtQuick.Controls 2.15 Item { + id: main width: 300 height: 500 + Image { + anchors.centerIn: parent + anchors.horizontalCenterOffset: 5 + source: "https://common-lisp.net/static/imgs/lisplogo_flag2_128.png" + } + Label { objectName: "label" + anchors.bottom: main.bottom + anchors.bottomMargin: 20 + anchors.horizontalCenter: main.horizontalCenter text: "downloading..." - anchors.centerIn: parent font.pixelSize: 24 font.bold: true } diff --git a/examples/.android-ssl-test/readme.md b/examples/.android-ssl-test/readme.md index 070c061..81894ff 100644 --- a/examples/.android-ssl-test/readme.md +++ b/examples/.android-ssl-test/readme.md @@ -1,4 +1,4 @@ -This is here for testing SSL on android. +This is here for testing SSL on android, both on **Lisp** and on **Qt** side. After doing `make apk`, please ensure files ``` @@ -16,4 +16,5 @@ before installing this one. When running the app, it should first display "downloading...", and after a few seconds (if the android device is connected to the internet), it should display -"OK". +"OK" (Lisp side of SSL); it should also display a Lisp logo, downloaded through +https (Qt side of SSL).