editor: add simple carp editor

Pond.package/CarpEditor.class/README.md

@@ -0,0 +1 @@
+I’m a simple editor with Carp code in it.

Pond.package/CarpEditor.class/instance/gtCheck.st

@@ -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'

Pond.package/CarpEditor.class/instance/gtContent..st

@@ -0,0 +1,6 @@
+initialization
+gtContent: aView
+	<gtInspectorPresentationOrder: 0>
+	(aView custom: editor)
+		title: 'Editor';
+		display: text

Pond.package/CarpEditor.class/instance/initialize.st

@@ -0,0 +1,5 @@
+initialization
+initialize
+	text := ''.
+	"TODO: find out how to override the mode properly"
+	editor := GLMRubricHighlightedTextPresentation new withLineNumbers: true; editingMode: RubPlainTextMode new

Pond.package/CarpEditor.class/instance/text.st

@@ -0,0 +1,3 @@
+initialization
+text
+	^ text

Pond.package/CarpEditor.class/properties.json

@@ -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"
+}