diff options
| author | polwex <polwex@sortug.com> | 2025-06-14 23:30:34 +0700 |
|---|---|---|
| committer | polwex <polwex@sortug.com> | 2025-06-14 23:30:34 +0700 |
| commit | d8b3e15bec60f58defad13e961f80354d250235d (patch) | |
| tree | 6a6f9158141bf40ea452a5913d72160362e0c472 /bs5/server/pages | |
aaaaaa
Diffstat (limited to 'bs5/server/pages')
| -rw-r--r-- | bs5/server/pages/Index.re | 18 | ||||
| -rw-r--r-- | bs5/server/pages/dune | 12 |
2 files changed, 30 insertions, 0 deletions
diff --git a/bs5/server/pages/Index.re b/bs5/server/pages/Index.re new file mode 100644 index 0000000..20dfbff --- /dev/null +++ b/bs5/server/pages/Index.re @@ -0,0 +1,18 @@ +module Page = { + [@react.async.component] + let make = () => { + // let promiseIn2 = + // Lwt.bind(Lwt_unix.sleep(2.0), _ => + // Lwt.return("Solusionao in 2 seconds!") + // ); + // let promiseIn4 = + // Lwt.bind(Lwt_unix.sleep(4.0), _ => + // Lwt.return("Solusionao in 4 seconds!") + // ); + Lwt.return( + <div> {React.string("Well hi")} </div>, + ); + }; +}; + +// let handler = request => DreamRSC.create; diff --git a/bs5/server/pages/dune b/bs5/server/pages/dune new file mode 100644 index 0000000..4d54676 --- /dev/null +++ b/bs5/server/pages/dune @@ -0,0 +1,12 @@ +(library + (name pages) + (libraries + dream + lwt.unix + server-reason-react.belt + server-reason-react.js + server-reason-react.react + server-reason-react.reactDom + server-reason-react.html) + (preprocess + (pps melange.ppx lwt_ppx server-reason-react.ppx melange-json-native.ppx))) |