git.iko.soy/rowtype-yoga/psfp
on master help sign in
Integrate editor
6828f8eMark Eibes
package-lock.json+5
compare with master
unifiedsplit
@@ -1202,6 +1202,11 @@
1202 "react-is": "^16.8.6"
1202 "react-is": "^16.8.6"
1203 }
1203 }
1204 },
1204 },
1205+ "@monaco-editor/react": {
1206+ "version": "1.2.2",
1207+ "resolved": "https://registry.npmjs.org/@monaco-editor/react/-/react-1.2.2.tgz",
1208+ "integrity": "sha512-0hPYw/Ek9CE1QZWg/StSPa3Nfismf55uLlQPCGDwGhsGwIVO2n+SViIbed05hO4o9+NyQBR0+rVQVj+4ONHVKg=="
1209+ },
1205 "@mrmlnc/readdir-enhanced": {
1210 "@mrmlnc/readdir-enhanced": {
1206 "version": "2.2.1",
1211 "version": "2.2.1",
1207 "resolved": "https://registry.npmjs.org/@mrmlnc/readdir-enhanced/-/readdir-enhanced-2.2.1.tgz",
1212 "resolved": "https://registry.npmjs.org/@mrmlnc/readdir-enhanced/-/readdir-enhanced-2.2.1.tgz",
package.json+1
@@ -31,6 +31,7 @@
31 "homepage": "https://github.com/i-am-the-slime/psfp#readme",
31 "homepage": "https://github.com/i-am-the-slime/psfp#readme",
32 "dependencies": {
32 "dependencies": {
33 "@material-ui/styles": "^4.4.3",
33 "@material-ui/styles": "^4.4.3",
34+ "@monaco-editor/react": "^1.2.2",
34 "purty": "^4.5.1",
35 "purty": "^4.5.1",
35 "react": "^16.9.0",
36 "react": "^16.9.0",
36 "react-dom": "^16.9.0",
37 "react-dom": "^16.9.0",
src/Monaco/Editor.jsnew file+710
@@ -0,0 +1,710 @@
1+'use strict'
2+var monacoEditor = require('@monaco-editor/react');
3+
4+exports.editorImpl = monacoEditor.default;
5+
6+exports.initMonacoImpl = function() {
7+ return monacoEditor.monaco.init();
8+}
9+
10+exports.getValue = function(editor) {
11+ return function() {
12+ return editor.getValue();
13+ }
14+}
15+
16+exports.defineThemeImpl = function(monacoInstance) {
17+ return function(name) {
18+ return function(theme) {
19+ return function() {
20+ return monacoInstance.editor.defineTheme(name, theme);
21+ }
22+ }
23+ }
24+}
25+
26+exports.setThemeImpl = function(monacoInstance) {
27+ return function(theme) {
28+ return function() {
29+ return monacoInstance.editor.setTheme(theme);
30+ }
31+ }
32+}
33+
34+exports.nightOwlTheme = {
35+ "base": "vs-dark",
36+ "inherit": true,
37+ "rules": [
38+ {
39+ "foreground": "637777",
40+ "token": "comment"
41+ },
42+ {
43+ "foreground": "addb67",
44+ "token": "string"
45+ },
46+ {
47+ "foreground": "ecc48d",
48+ "token": "vstring.quoted"
49+ },
50+ {
51+ "foreground": "ecc48d",
52+ "token": "variable.other.readwrite.js"
53+ },
54+ {
55+ "foreground": "5ca7e4",
56+ "token": "string.regexp"
57+ },
58+ {
59+ "foreground": "5ca7e4",
60+ "token": "string.regexp keyword.other"
61+ },
62+ {
63+ "foreground": "5f7e97",
64+ "token": "meta.function punctuation.separator.comma"
65+ },
66+ {
67+ "foreground": "f78c6c",
68+ "token": "constant.numeric"
69+ },
70+ {
71+ "foreground": "f78c6c",
72+ "token": "constant.character.numeric"
73+ },
74+ {
75+ "foreground": "addb67",
76+ "token": "variable"
77+ },
78+ {
79+ "foreground": "c792ea",
80+ "token": "keyword"
81+ },
82+ {
83+ "foreground": "c792ea",
84+ "token": "punctuation.accessor"
85+ },
86+ {
87+ "foreground": "c792ea",
88+ "token": "storage"
89+ },
90+ {
91+ "foreground": "c792ea",
92+ "token": "meta.var.expr"
93+ },
94+ {
95+ "foreground": "c792ea",
96+ "token": "meta.class meta.method.declaration meta.var.expr storage.type.jsm"
97+ },
98+ {
99+ "foreground": "c792ea",
100+ "token": "storage.type.property.js"
101+ },
102+ {
103+ "foreground": "c792ea",
104+ "token": "storage.type.property.ts"
105+ },
106+ {
107+ "foreground": "c792ea",
108+ "token": "storage.type.property.tsx"
109+ },
110+ {
111+ "foreground": "82aaff",
112+ "token": "storage.type"
113+ },
114+ {
115+ "foreground": "ffcb8b",
116+ "token": "entity.name.class"
117+ },
118+ {
119+ "foreground": "ffcb8b",
120+ "token": "meta.class entity.name.type.class"
121+ },
122+ {
123+ "foreground": "addb67",
124+ "token": "entity.other.inherited-class"
125+ },
126+ {
127+ "foreground": "82aaff",
128+ "token": "entity.name.function"
129+ },
130+ {
131+ "foreground": "addb67",
132+ "token": "punctuation.definition.variable"
133+ },
134+ {
135+ "foreground": "d3423e",
136+ "token": "punctuation.section.embedded"
137+ },
138+ {
139+ "foreground": "d6deeb",
140+ "token": "punctuation.terminator.expression"
141+ },
142+ {
143+ "foreground": "d6deeb",
144+ "token": "punctuation.definition.arguments"
145+ },
146+ {
147+ "foreground": "d6deeb",
148+ "token": "punctuation.definition.array"
149+ },
150+ {
151+ "foreground": "d6deeb",
152+ "token": "punctuation.section.array"
153+ },
154+ {
155+ "foreground": "d6deeb",
156+ "token": "meta.array"
157+ },
158+ {
159+ "foreground": "d9f5dd",
160+ "token": "punctuation.definition.list.begin"
161+ },
162+ {
163+ "foreground": "d9f5dd",
164+ "token": "punctuation.definition.list.end"
165+ },
166+ {
167+ "foreground": "d9f5dd",
168+ "token": "punctuation.separator.arguments"
169+ },
170+ {
171+ "foreground": "d9f5dd",
172+ "token": "punctuation.definition.list"
173+ },
174+ {
175+ "foreground": "d3423e",
176+ "token": "string.template meta.template.expression"
177+ },
178+ {
179+ "foreground": "d6deeb",
180+ "token": "string.template punctuation.definition.string"
181+ },
182+ {
183+ "foreground": "c792ea",
184+ "fontStyle": "italic",
185+ "token": "italic"
186+ },
187+ {
188+ "foreground": "addb67",
189+ "fontStyle": "bold",
190+ "token": "bold"
191+ },
192+ {
193+ "foreground": "82aaff",
194+ "token": "constant.language"
195+ },
196+ {
197+ "foreground": "82aaff",
198+ "token": "punctuation.definition.constant"
199+ },
200+ {
201+ "foreground": "82aaff",
202+ "token": "variable.other.constant"
203+ },
204+ {
205+ "foreground": "7fdbca",
206+ "token": "support.function.construct"
207+ },
208+ {
209+ "foreground": "7fdbca",
210+ "token": "keyword.other.new"
211+ },
212+ {
213+ "foreground": "82aaff",
214+ "token": "constant.character"
215+ },
216+ {
217+ "foreground": "82aaff",
218+ "token": "constant.other"
219+ },
220+ {
221+ "foreground": "f78c6c",
222+ "token": "constant.character.escape"
223+ },
224+ {
225+ "foreground": "addb67",
226+ "token": "entity.other.inherited-class"
227+ },
228+ {
229+ "foreground": "d7dbe0",
230+ "token": "variable.parameter"
231+ },
232+ {
233+ "foreground": "7fdbca",
234+ "token": "entity.name.tag"
235+ },
236+ {
237+ "foreground": "cc2996",
238+ "token": "punctuation.definition.tag.html"
239+ },
240+ {
241+ "foreground": "cc2996",
242+ "token": "punctuation.definition.tag.begin"
243+ },
244+ {
245+ "foreground": "cc2996",
246+ "token": "punctuation.definition.tag.end"
247+ },
248+ {
249+ "foreground": "addb67",
250+ "token": "entity.other.attribute-name"
251+ },
252+ {
253+ "foreground": "addb67",
254+ "token": "entity.name.tag.custom"
255+ },
256+ {
257+ "foreground": "82aaff",
258+ "token": "support.function"
259+ },
260+ {
261+ "foreground": "82aaff",
262+ "token": "support.constant"
263+ },
264+ {
265+ "foreground": "7fdbca",
266+ "token": "upport.constant.meta.property-value"
267+ },
268+ {
269+ "foreground": "addb67",
270+ "token": "support.type"
271+ },
272+ {
273+ "foreground": "addb67",
274+ "token": "support.class"
275+ },
276+ {
277+ "foreground": "addb67",
278+ "token": "support.variable.dom"
279+ },
280+ {
281+ "foreground": "7fdbca",
282+ "token": "support.constant"
283+ },
284+ {
285+ "foreground": "7fdbca",
286+ "token": "keyword.other.special-method"
287+ },
288+ {
289+ "foreground": "7fdbca",
290+ "token": "keyword.other.new"
291+ },
292+ {
293+ "foreground": "7fdbca",
294+ "token": "keyword.other.debugger"
295+ },
296+ {
297+ "foreground": "7fdbca",
298+ "token": "keyword.control"
299+ },
300+ {
301+ "foreground": "c792ea",
302+ "token": "keyword.operator.comparison"
303+ },
304+ {
305+ "foreground": "c792ea",
306+ "token": "keyword.control.flow.js"
307+ },
308+ {
309+ "foreground": "c792ea",
310+ "token": "keyword.control.flow.ts"
311+ },
312+ {
313+ "foreground": "c792ea",
314+ "token": "keyword.control.flow.tsx"
315+ },
316+ {
317+ "foreground": "c792ea",
318+ "token": "keyword.control.ruby"
319+ },
320+ {
321+ "foreground": "c792ea",
322+ "token": "keyword.control.module.ruby"
323+ },
324+ {
325+ "foreground": "c792ea",
326+ "token": "keyword.control.class.ruby"
327+ },
328+ {
329+ "foreground": "c792ea",
330+ "token": "keyword.control.def.ruby"
331+ },
332+ {
333+ "foreground": "c792ea",
334+ "token": "keyword.control.loop.js"
335+ },
336+ {
337+ "foreground": "c792ea",
338+ "token": "keyword.control.loop.ts"
339+ },
340+ {
341+ "foreground": "c792ea",
342+ "token": "keyword.control.import.js"
343+ },
344+ {
345+ "foreground": "c792ea",
346+ "token": "keyword.control.import.ts"
347+ },
348+ {
349+ "foreground": "c792ea",
350+ "token": "keyword.control.import.tsx"
351+ },
352+ {
353+ "foreground": "c792ea",
354+ "token": "keyword.control.from.js"
355+ },
356+ {
357+ "foreground": "c792ea",
358+ "token": "keyword.control.from.ts"
359+ },
360+ {
361+ "foreground": "c792ea",
362+ "token": "keyword.control.from.tsx"
363+ },
364+ {
365+ "foreground": "ffffff",
366+ "background": "ff2c83",
367+ "token": "invalid"
368+ },
369+ {
370+ "foreground": "ffffff",
371+ "background": "d3423e",
372+ "token": "invalid.deprecated"
373+ },
374+ {
375+ "foreground": "7fdbca",
376+ "token": "keyword.operator"
377+ },
378+ {
379+ "foreground": "c792ea",
380+ "token": "keyword.operator.relational"
381+ },
382+ {
383+ "foreground": "c792ea",
384+ "token": "keyword.operator.assignement"
385+ },
386+ {
387+ "foreground": "c792ea",
388+ "token": "keyword.operator.arithmetic"
389+ },
390+ {
391+ "foreground": "c792ea",
392+ "token": "keyword.operator.bitwise"
393+ },
394+ {
395+ "foreground": "c792ea",
396+ "token": "keyword.operator.increment"
397+ },
398+ {
399+ "foreground": "c792ea",
400+ "token": "keyword.operator.ternary"
401+ },
402+ {
403+ "foreground": "637777",
404+ "token": "comment.line.double-slash"
405+ },
406+ {
407+ "foreground": "cdebf7",
408+ "token": "object"
409+ },
410+ {
411+ "foreground": "ff5874",
412+ "token": "constant.language.null"
413+ },
414+ {
415+ "foreground": "d6deeb",
416+ "token": "meta.brace"
417+ },
418+ {
419+ "foreground": "c792ea",
420+ "token": "meta.delimiter.period"
421+ },
422+ {
423+ "foreground": "d9f5dd",
424+ "token": "punctuation.definition.string"
425+ },
426+ {
427+ "foreground": "ff5874",
428+ "token": "constant.language.boolean"
429+ },
430+ {
431+ "foreground": "ffffff",
432+ "token": "object.comma"
433+ },
434+ {
435+ "foreground": "7fdbca",
436+ "token": "variable.parameter.function"
437+ },
438+ {
439+ "foreground": "80cbc4",
440+ "token": "support.type.vendor.property-name"
441+ },
442+ {
443+ "foreground": "80cbc4",
444+ "token": "support.constant.vendor.property-value"
445+ },
446+ {
447+ "foreground": "80cbc4",
448+ "token": "support.type.property-name"
449+ },
450+ {
451+ "foreground": "80cbc4",
452+ "token": "meta.property-list entity.name.tag"
453+ },
454+ {
455+ "foreground": "57eaf1",
456+ "token": "meta.property-list entity.name.tag.reference"
457+ },
458+ {
459+ "foreground": "f78c6c",
460+ "token": "constant.other.color.rgb-value punctuation.definition.constant"
461+ },
462+ {
463+ "foreground": "ffeb95",
464+ "token": "constant.other.color"
465+ },
466+ {
467+ "foreground": "ffeb95",
468+ "token": "keyword.other.unit"
469+ },
470+ {
471+ "foreground": "c792ea",
472+ "token": "meta.selector"
473+ },
474+ {
475+ "foreground": "fad430",
476+ "token": "entity.other.attribute-name.id"
477+ },
478+ {
479+ "foreground": "80cbc4",
480+ "token": "meta.property-name"
481+ },
482+ {
483+ "foreground": "c792ea",
484+ "token": "entity.name.tag.doctype"
485+ },
486+ {
487+ "foreground": "c792ea",
488+ "token": "meta.tag.sgml.doctype"
489+ },
490+ {
491+ "foreground": "d9f5dd",
492+ "token": "punctuation.definition.parameters"
493+ },
494+ {
495+ "foreground": "ecc48d",
496+ "token": "string.quoted"
497+ },
498+ {
499+ "foreground": "ecc48d",
500+ "token": "string.quoted.double"
501+ },
502+ {
503+ "foreground": "ecc48d",
504+ "token": "string.quoted.single"
505+ },
506+ {
507+ "foreground": "addb67",
508+ "token": "support.constant.math"
509+ },
510+ {
511+ "foreground": "addb67",
512+ "token": "support.type.property-name.json"
513+ },
514+ {
515+ "foreground": "addb67",
516+ "token": "support.constant.json"
517+ },
518+ {
519+ "foreground": "c789d6",
520+ "token": "meta.structure.dictionary.value.json string.quoted.double"
521+ },
522+ {
523+ "foreground": "80cbc4",
524+ "token": "string.quoted.double.json punctuation.definition.string.json"
525+ },
526+ {
527+ "foreground": "ff5874",
528+ "token": "meta.structure.dictionary.json meta.structure.dictionary.value constant.language"
529+ },
530+ {
531+ "foreground": "d6deeb",
532+ "token": "variable.other.ruby"
533+ },
534+ {
535+ "foreground": "ecc48d",
536+ "token": "entity.name.type.class.ruby"
537+ },
538+ {
539+ "foreground": "ecc48d",
540+ "token": "keyword.control.class.ruby"
541+ },
542+ {
543+ "foreground": "ecc48d",
544+ "token": "meta.class.ruby"
545+ },
546+ {
547+ "foreground": "7fdbca",
548+ "token": "constant.language.symbol.hashkey.ruby"
549+ },
550+ {
551+ "foreground": "e0eddd",
552+ "background": "a57706",
553+ "fontStyle": "italic",
554+ "token": "meta.diff"
555+ },
556+ {
557+ "foreground": "e0eddd",
558+ "background": "a57706",
559+ "fontStyle": "italic",
560+ "token": "meta.diff.header"
561+ },
562+ {
563+ "foreground": "ef535090",
564+ "fontStyle": "italic",
565+ "token": "markup.deleted"
566+ },
567+ {
568+ "foreground": "a2bffc",
569+ "fontStyle": "italic",
570+ "token": "markup.changed"
571+ },
572+ {
573+ "foreground": "a2bffc",
574+ "fontStyle": "italic",
575+ "token": "meta.diff.header.git"
576+ },
577+ {
578+ "foreground": "a2bffc",
579+ "fontStyle": "italic",
580+ "token": "meta.diff.header.from-file"
581+ },
582+ {
583+ "foreground": "a2bffc",
584+ "fontStyle": "italic",
585+ "token": "meta.diff.header.to-file"
586+ },
587+ {
588+ "foreground": "219186",
589+ "background": "eae3ca",
590+ "token": "markup.inserted"
591+ },
592+ {
593+ "foreground": "d3201f",
594+ "token": "other.package.exclude"
595+ },
596+ {
597+ "foreground": "d3201f",
598+ "token": "other.remove"
599+ },
600+ {
601+ "foreground": "269186",
602+ "token": "other.add"
603+ },
604+ {
605+ "foreground": "ff5874",
606+ "token": "constant.language.python"
607+ },
608+ {
609+ "foreground": "82aaff",
610+ "token": "variable.parameter.function.python"
611+ },
612+ {
613+ "foreground": "82aaff",
614+ "token": "meta.function-call.arguments.python"
615+ },
616+ {
617+ "foreground": "b2ccd6",
618+ "token": "meta.function-call.python"
619+ },
620+ {
621+ "foreground": "b2ccd6",
622+ "token": "meta.function-call.generic.python"
623+ },
624+ {
625+ "foreground": "d6deeb",
626+ "token": "punctuation.python"
627+ },
628+ {
629+ "foreground": "addb67",
630+ "token": "entity.name.function.decorator.python"
631+ },
632+ {
633+ "foreground": "8eace3",
634+ "token": "source.python variable.language.special"
635+ },
636+ {
637+ "foreground": "82b1ff",
638+ "token": "markup.heading.markdown"
639+ },
640+ {
641+ "foreground": "c792ea",
642+ "fontStyle": "italic",
643+ "token": "markup.italic.markdown"
644+ },
645+ {
646+ "foreground": "addb67",
647+ "fontStyle": "bold",
648+ "token": "markup.bold.markdown"
649+ },
650+ {
651+ "foreground": "697098",
652+ "token": "markup.quote.markdown"
653+ },
654+ {
655+ "foreground": "80cbc4",
656+ "token": "markup.inline.raw.markdown"
657+ },
658+ {
659+ "foreground": "ff869a",
660+ "token": "markup.underline.link.markdown"
661+ },
662+ {
663+ "foreground": "ff869a",
664+ "token": "markup.underline.link.image.markdown"
665+ },
666+ {
667+ "foreground": "d6deeb",
668+ "token": "string.other.link.title.markdown"
669+ },
670+ {
671+ "foreground": "d6deeb",
672+ "token": "string.other.link.description.markdown"
673+ },
674+ {
675+ "foreground": "82b1ff",
676+ "token": "punctuation.definition.string.markdown"
677+ },
678+ {
679+ "foreground": "82b1ff",
680+ "token": "punctuation.definition.string.begin.markdown"
681+ },
682+ {
683+ "foreground": "82b1ff",
684+ "token": "punctuation.definition.string.end.markdown"
685+ },
686+ {
687+ "foreground": "82b1ff",
688+ "token": "meta.link.inline.markdown punctuation.definition.string"
689+ },
690+ {
691+ "foreground": "7fdbca",
692+ "token": "punctuation.definition.metadata.markdown"
693+ },
694+ {
695+ "foreground": "82b1ff",
696+ "token": "beginning.punctuation.definition.list.markdown"
697+ }
698+ ],
699+ "colors": {
700+ "editor.foreground": "#d6deeb",
701+ "editor.background": "#011627",
702+ "editor.selectionBackground": "#5f7e9779",
703+ "editor.lineHighlightBackground": "#010E17",
704+ "editorCursor.foreground": "#80a4c2",
705+ "editorWhitespace.foreground": "#2e2040",
706+ "editorIndentGuide.background": "#5e81ce52",
707+ "editor.selectionHighlightBorder": "#122d42"
708+ }
709+}
710+
src/Monaco/Editor.pursnew file+107
@@ -0,0 +1,107 @@
1+module Editor where
2+
3+import Prelude
4+
5+import Control.Promise (Promise)
6+import Control.Promise as Promise
7+import Data.Foldable (for_)
8+import Data.Maybe (Maybe(..))
9+import Data.Nullable (notNull, null)
10+import Data.Tuple.Nested ((/\))
11+import Debug.Trace (spy)
12+import Effect (Effect)
13+import Effect.Aff (Aff)
14+import Effect.Class (liftEffect)
15+import Effect.Class.Console (warn)
16+import Effect.Uncurried (EffectFn1, EffectFn2, mkEffectFn1, mkEffectFn2, runEffectFn1)
17+import Foreign (Foreign)
18+import Prim.Row (class Union)
19+import React.Basic (JSX, ReactComponent, element, fragment)
20+import React.Basic.DOM as R
21+import React.Basic.Events (handler_)
22+import React.Basic.Hooks (component, readRefMaybe, useRef, useState, writeRef)
23+import React.Basic.Hooks as React
24+import React.Basic.Hooks.Aff (useAff)
25+import Simple.JSON as Foreign
26+import Web.DOM (Node)
27+
28+type EditorProps
29+ = ( value ∷ String
30+ , language ∷ String
31+ , editorDidMount ∷ EffectFn2 Node Editor Unit
32+ , theme ∷ String
33+ , line ∷ Number
34+ , width ∷ String
35+ , height ∷ String
36+ , loading ∷ JSX
37+ , options ∷ Foreign
38+ )
39+
40+foreign import editorImpl ∷ ∀ attrs. ReactComponent { | attrs }
41+
42+foreign import initMonacoImpl ∷ Effect (Promise Monaco)
43+
44+foreign import defineThemeImpl ∷ Monaco -> String -> MonacoTheme -> Effect Unit
45+
46+foreign import setThemeImpl ∷ Monaco -> String -> Effect Unit
47+
48+foreign import nightOwlTheme ∷ MonacoTheme
49+
50+foreign import getValue ∷ Editor -> Effect String
51+
52+foreign import data Monaco ∷ Type
53+
54+foreign import data Editor ∷ Type
55+
56+foreign import data MonacoTheme ∷ Type
57+
58+editor ∷
59+ ∀ attrs attrs_. Union attrs attrs_ EditorProps => ReactComponent { | attrs }
60+editor = editorImpl
61+
62+initMonaco ∷ Aff Monaco
63+initMonaco = liftEffect initMonacoImpl >>= Promise.toAff
64+
65+themeName = "NightOwl"
66+
67+mkEditor ∷ Effect (ReactComponent {})
68+mkEditor = do
69+ component "Editor" \{} -> React.do
70+ ref <- useRef null
71+ useAff unit
72+ $ do
73+ monaco <- initMonaco
74+ defineThemeImpl monaco themeName nightOwlTheme # liftEffect
75+ setThemeImpl monaco themeName # liftEffect
76+ pure
77+ $ fragment
78+ [ R.button { onClick: handler_ do
79+ maybeEditor <- readRefMaybe ref
80+ case maybeEditor of
81+ Nothing -> pure unit
82+ Just ed -> do
83+ v <- getValue ed
84+ warn $ "Value: " <> v
85+ }
86+ , element editor
87+ { theme: themeName
88+ , options:
89+ Foreign.write
90+ { fontFamily: "PragmataPro"
91+ , fontLigatures: true
92+ , fontSize: "16pt"
93+ , lineNumbers: "off"
94+ , glyphMargin: false
95+ , folding: false
96+ , lineDecorationsWidth: 0
97+ , lineNumbersMinChars: 0
98+ , minimap: { enabled: false }
99+ }
100+ , language: "haskell"
101+ -- [TODO] :(
102+ -- https://microsoft.github.io/monaco-editor/playground.html#extending-language-services-custom-languages
103+ , editorDidMount:
104+ mkEffectFn2 \node editor ->
105+ (editor # notNull # writeRef ref)
106+ }
107+ ]
stories/EditorStories.pursnew file+16
@@ -0,0 +1,16 @@
1+module EditorStories where
2+
3+import Prelude hiding (add)
4+
5+import Decorator.FullScreen (fullScreenDecorator)
6+import Editor (mkEditor)
7+import Effect (Effect)
8+import Storybook.React (Storybook, add, addDecorator, storiesOf)
9+
10+stories ∷ Effect Storybook
11+stories =
12+ storiesOf "Editor" do
13+ addDecorator fullScreenDecorator
14+ add "The Editor" mkEditor
15+ [ {}
16+ ]