8d04ac171d
Implements RFC #2963.
Leftover tasks:
- [x] Provide companion PR to vscode-lean4 (leanprover/vscode-lean4#376)
- [x] Companion PR to std4 (leanprover/std4#467)
- [x] Companion PR to ProofWidgets4
(leanprover-community/ProofWidgets4#36)
- [X] Companion commit to mathlib4
(0f4660f655)
- [ ] ~~Update the manual chapter~~ (will do in a follow-up)
38 lines
856 B
Text
38 lines
856 B
Text
import Lean
|
|
open Lean
|
|
|
|
@[widget_module]
|
|
def helloWidget : Widget.Module where
|
|
javascript := "
|
|
import * as React from 'react';
|
|
export default function(props) {
|
|
const name = props.name || 'world'
|
|
return React.createElement('p', {}, name + '!')
|
|
}"
|
|
|
|
#widget helloWidget
|
|
--^ widgets
|
|
|
|
structure HelloWidgetProps where
|
|
name? : Option String := none
|
|
deriving Server.RpcEncodable
|
|
|
|
#widget helloWidget with { name? := "lean" : HelloWidgetProps }
|
|
--^ widgets
|
|
|
|
show_panel_widgets [helloWidget with { name? := "global" : HelloWidgetProps }]
|
|
|
|
section
|
|
show_panel_widgets [local helloWidget with { name? := "local" : HelloWidgetProps }]
|
|
--^ widgets
|
|
end
|
|
|
|
namespace Foo
|
|
show_panel_widgets [scoped helloWidget with { name? := "scoped" : HelloWidgetProps }]
|
|
end Foo
|
|
|
|
open scoped Foo
|
|
--^ widgets
|
|
|
|
show_panel_widgets [-helloWidget]
|
|
--^ widgets
|