revisions for SailfishOS (SFOS)

This commit is contained in:
pls.153 2023-10-15 21:33:39 +02:00
parent e5eb3dd731
commit b3c4c08387
12 changed files with 41 additions and 16 deletions

View file

@ -636,7 +636,6 @@ cl_object mobile_p() {
STATIC_SYMBOL_PKG (s_android, "ANDROID", "KEYWORD")
STATIC_SYMBOL_PKG (s_ios, "IOS", "KEYWORD")
STATIC_SYMBOL_PKG (s_sfos, "SFOS", "KEYWORD")
ecl_process_env()->nvalues = 1;
cl_object l_ret = ECL_NIL;
QString platform = qGuiApp->platformName();
if (platform == QStringLiteral("android")) {
@ -646,7 +645,7 @@ cl_object mobile_p() {
} else if (QFile::exists("/etc/sailfish-release")) {
l_ret = s_sfos;
}
return l_ret;
ecl_return1(ecl_process_env(), l_ret);
}
cl_object pixel_ratio() {