Compare commits
2 Commits
40c60f36ab
...
1243ed9c06
Author | SHA1 | Date | |
---|---|---|---|
1243ed9c06 | |||
dd28135d14 |
1
Pond.package/CarpEditor.class/README.md
Normal file
1
Pond.package/CarpEditor.class/README.md
Normal file
@@ -0,0 +1 @@
|
|||||||
|
I’m a simple editor with Carp code in it.
|
8
Pond.package/CarpEditor.class/instance/gtCheck.st
Normal file
8
Pond.package/CarpEditor.class/instance/gtCheck.st
Normal file
@@ -0,0 +1,8 @@
|
|||||||
|
initialization
|
||||||
|
gtCheck
|
||||||
|
<gtInspectorAction>
|
||||||
|
"TODO: make carp checker configurable"
|
||||||
|
^ GLMGenericAction new
|
||||||
|
action: [ GTInspector openOn: (CarpCheckExample new succeedingCarpChecker file: editor text asString; check) ];
|
||||||
|
icon: GLMUIThemeExtraIcons glamorousRefresh;
|
||||||
|
title: 'Check'
|
6
Pond.package/CarpEditor.class/instance/gtContent..st
Normal file
6
Pond.package/CarpEditor.class/instance/gtContent..st
Normal file
@@ -0,0 +1,6 @@
|
|||||||
|
initialization
|
||||||
|
gtContent: aView
|
||||||
|
<gtInspectorPresentationOrder: 0>
|
||||||
|
(aView custom: editor)
|
||||||
|
title: 'Editor';
|
||||||
|
display: text
|
5
Pond.package/CarpEditor.class/instance/initialize.st
Normal file
5
Pond.package/CarpEditor.class/instance/initialize.st
Normal file
@@ -0,0 +1,5 @@
|
|||||||
|
initialization
|
||||||
|
initialize
|
||||||
|
text := ''.
|
||||||
|
"TODO: find out how to override the mode properly"
|
||||||
|
editor := GLMRubricHighlightedTextPresentation new withLineNumbers: true; editingMode: RubPlainTextMode new
|
3
Pond.package/CarpEditor.class/instance/text.st
Normal file
3
Pond.package/CarpEditor.class/instance/text.st
Normal file
@@ -0,0 +1,3 @@
|
|||||||
|
initialization
|
||||||
|
text
|
||||||
|
^ text
|
14
Pond.package/CarpEditor.class/properties.json
Normal file
14
Pond.package/CarpEditor.class/properties.json
Normal file
@@ -0,0 +1,14 @@
|
|||||||
|
{
|
||||||
|
"commentStamp" : "VeitHeller 12/18/2019 21:39",
|
||||||
|
"super" : "Object",
|
||||||
|
"category" : "Pond",
|
||||||
|
"classinstvars" : [ ],
|
||||||
|
"pools" : [ ],
|
||||||
|
"classvars" : [ ],
|
||||||
|
"instvars" : [
|
||||||
|
"text",
|
||||||
|
"editor"
|
||||||
|
],
|
||||||
|
"name" : "CarpEditor",
|
||||||
|
"type" : "normal"
|
||||||
|
}
|
@@ -15,4 +15,10 @@ at all, but I really want to.
|
|||||||
|
|
||||||
## Review
|
## Review
|
||||||
|
|
||||||
Time worked:
|
Time worked: 1:00
|
||||||
|
|
||||||
|
I was able to make it kinda sorta work. I can open an unhighlighted Carp
|
||||||
|
editor, play around in it, and try to check the results using a button that
|
||||||
|
spits out the error in a new inspector for me. This isn’t quite what I
|
||||||
|
envisioned, but all the pieces are there. I just need to connect the dots
|
||||||
|
somehow now.
|
||||||
|
Reference in New Issue
Block a user