Add Raw React example

Author: mirko-plowtech

examples/BasicUsage.res

@@ -78,3 +78,23 @@ module ReactRestate = {
     </div>
   }
 }
+
+module ReactRaw = {
+  @react.component
+  let make = () => {
+    let (elapsed, setElapsed) = React.useState(_ => 0)
+    React.useEffect1(() => {
+      let timeoutId = Js.Global.setTimeout(() => setElapsed(e => e + 1), 1_000)
+      Js.Console.log2("schedule next tick: ", timeoutId)
+      Some(() => {
+        Js.Console.log2("cleanup: ", timeoutId)
+        Js.Global.clearTimeout(timeoutId)
+      })
+    }, [elapsed])
+    let reset = () => setElapsed(_ => 0)
+    <div>
+      {elapsed->Js.String.make->React.string}
+      <button onClick={_ => reset()}> {"Reset"->React.string} </button>
+    </div>
+  }
+}

examples/Index.res

@@ -4,6 +4,7 @@ module App = {
   let make = () => {
     let url = RescriptReactRouter.useUrl()
     switch url.path {
+      | list{"react-raw", "basic"} => <BasicUsage.ReactRaw />
       | list{"react-update", "basic"} => <BasicUsage.ReactUpdate />
       | list{"react-update", "counter"} => <Counter.ReactUpdate />
       | list{"react-update", "counter-effects"} => <Counter_SideEffects.ReactUpdate />
@@ -14,6 +15,9 @@ module App = {
         <div>
           <div> 
             <h3> {"Basic Usage"->React.string} </h3>
+            <button onClick={_ => RescriptReactRouter.push("/react-raw/basic")}>
+              {"React Raw"->React.string}
+            </button>
             <button onClick={_ => RescriptReactRouter.push("/react-update/basic")}>
               {"React Update"->React.string}
             </button>