diff --git a/.gitmodules b/.gitmodules new file mode 100644 index 0000000..f1af1a1 --- /dev/null +++ b/.gitmodules @@ -0,0 +1,3 @@ +[submodule "dotherside"] + path = dotherside + url = https://github.com/filcuc/dotherside.git diff --git a/dotherside b/dotherside new file mode 160000 index 0000000..984f30e --- /dev/null +++ b/dotherside @@ -0,0 +1 @@ +Subproject commit 984f30e0a9967d3c6cc60a01b51a2bdff4553fc2 diff --git a/qml.egg b/qml.egg new file mode 100644 index 0000000..39f7c9f --- /dev/null +++ b/qml.egg @@ -0,0 +1,9 @@ +((author "Daniel Ziltener") + (synopsis "A Chicken wrapper for DOtherSide") + (category ui) + (license "LGPLv3") + (dependencies r7rs foreigners) + (foreign-dependencies dotherside) + (components (extension qml + (c-include DOtherSide "DOtherSide/DOtherSide.h") + (csc-options "-Idotherside/lib/include")))) diff --git a/qml.scm b/qml.scm new file mode 100644 index 0000000..5379df8 --- /dev/null +++ b/qml.scm @@ -0,0 +1,10 @@ +(import (r7rs)) +(define-library (qml) + (import (scheme base)) + (import (chicken foreign)) + (import foreigners) + (export dos_qcoreapplication_application_dir_path) + (begin + (define dos_qcoreapplication_application_dir_path + (foreign-lambda* c-string () + "C_return(dos_qcoreapplication_application_dir_path());"))))