This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
const https = require('https') | |
const options = { | |
hostname: 'example.com', | |
port: 443, | |
method: 'PUT', | |
headers: { | |
'Content-Type': '<whatever>', | |
Authorization: | |
'Bearer <token>', |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
[@bs.val] [@bs.scope "performance"] external now : unit => float = ""; | |
... | |
| TouchStart(clientX) => | |
if (state.nav.isOpen) { | |
state.nav.isSwiping := true; | |
}; | |
ReasonReact.Update({ | |
...state, |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
[@bs.val] [@bs.scope "performance"] external now : unit => float = ""; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
let x = List.hd(List.rev(self.state.nav.position)); | |
let x' = List.hd(self.state.nav.position); | |
... | |
<nav | |
className=(self.state.nav.isOpen ? "active" : "") | |
onClick=(event => ReactEventRe.Mouse.stopPropagation(event)) | |
style=( | |
self.state.nav.isSwiping^ ? |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| TouchStart(clientX) => | |
if (state.nav.isOpen) { | |
state.nav.isSwiping := true; | |
}; | |
ReasonReact.Update({ | |
...state, | |
nav: { | |
...state.nav, | |
position: [clientX] | |
} |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
let component = ReasonReact.statelessComponent("Page1"); | |
let make = _children => { | |
...component, | |
render: _self => | |
<div className="Page1"> | |
<h1> (ReasonReact.stringToElement("Page1")) </h1> | |
</div> | |
}; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
[@bs.val] [@bs.scope "document"] external documentElement : Dom.element = ""; | |
... | |
reducer: (action, state) => | |
switch action { | |
| Navigate(_routeWithTitle) => ReasonReact.NoUpdate | |
| ToggleMenu(isOpen) => | |
ReasonReact.UpdateWithSideEffects( | |
{ |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
reducer: (action, state) => | |
switch action { | |
| Navigate(_routeWithTitle) => ReasonReact.NoUpdate | |
| ToggleMenu(isOpen) => | |
ReasonReact.UpdateWithSideEffects( | |
{ | |
...state, | |
nav: { | |
isOpen: isOpen | |
} |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
.App:after { | |
content: ''; | |
transition: opacity 450ms cubic-bezier(0.23, 1, 0.32, 1), | |
transform 0ms cubic-bezier(0.23, 1, 0.32, 1) 450ms; | |
position: fixed; top: 0; right: 0; bottom: 0; left: 0; | |
background-color: rgba(0, 0, 0, 0.33); | |
transform: translateX(-100%); | |
opacity: 0; | |
z-index: 1; | |
} |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
render: self => { | |
let (route, title) = self.state.routeWithTitle; | |
<div | |
className=("App" ++ (self.state.nav.isOpen ? " overlay" : "")) | |
onClick=(_event => self.send(ToggleMenu(false)))> | |
<header> | |
<a | |
onClick=( | |
event => { | |
ReactEventRe.Mouse.stopPropagation(event); |
NewerOlder