package lablqml
OCamlfind package and PPX extension to interface OCaml and QtQuick
Install
Dune Dependency
Authors
Maintainers
Sources
0.7.tar.gz
sha256=20d8186990d189613f328d974b5216186783de24cd763d8f3e77939b048a57b5
sha512=30204036ac6f10dcae457b92a8bfee745338ad264f42158bf4b587ad84db6e4c601b6e2367baa3d990cb6ea63219bc764c577f026bfce57375a61c7f91abf011
doc/src/lablqml.myparser/testdemo2.ml.html
Source file testdemo2.ml
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39
open Ppxlib let loc = Location.none let wrap_qml _ x = x let%test _ = wrap_qml [%expr qml singleton ~name:"asdf" ] true let%test _ = wrap_qml [%expr qml singleton] true let%test _ = wrap_qml [%expr qml singleton ((author: string) Read getAuthor Write setAuthor Notify authorChanged) ((author: string) Read getAuthor Write setAuthor Notify authorChanged) ] true let%test _ = wrap_qml [%expr qml singleton ((author: string) Read getAuthor Write setAuthor Notify authorChanged) ((author: string) Read getAuthor Write setAuthor Notify authorChanged) ] true let%test _ = wrap_qml [%expr qml singleton ~name:"MyApi" ( (someProperty:int) Read somePropery Write setSomeProperty Notify somePropertyChanged) ] true
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>