update serialization

hpi-swa-lab · Nov 25, 2023 · f543db6 · f543db6
1 parent efce7ed
commit f543db6
Show file tree

Hide file tree

Showing 8 changed files with 25 additions and 9 deletions.
diff --git a/SmalltalkSources/SBE-Book.package/SBEBook.class/instance/index..st b/SmalltalkSources/SBE-Book.package/SBEBook.class/instance/index..st
@@ -1,4 +1,4 @@
 accessing
 index: anInteger
 
-	self shouldNotImplement
+	self assert: anInteger isNil.
diff --git a/SmalltalkSources/SBE-Book.package/SBEBook.class/instance/index.st b/SmalltalkSources/SBE-Book.package/SBEBook.class/instance/index.st
@@ -1,4 +1,4 @@
 accessing
 index
 
-	^ self shouldNotImplement
+	^ nil
diff --git a/SmalltalkSources/SBE-Book.package/SBEBook.class/instance/storeOn..st b/SmalltalkSources/SBE-Book.package/SBEBook.class/instance/storeOn..st
@@ -0,0 +1,9 @@
+converting
+storeOn: aStream
+
+	aStream nextPutAll:
+('({1}
+	pdfUrl: {2};
+	yourself)' format:
+		{String streamContents: [:stream | super storeOn: stream].
+		self pdfUrl storeString})
diff --git a/SmalltalkSources/SBE-Book.package/SBEBook.class/methodProperties.json b/SmalltalkSources/SBE-Book.package/SBEBook.class/methodProperties.json
@@ -3,10 +3,11 @@
 		 },
 	"instance" : {
 		"canonicalHierarchyOrder" : "ct 11/8/2023 22:38",
-		"index" : "ct 11/24/2023 18:43",
-		"index:" : "ct 11/24/2023 18:43",
+		"index" : "ct 11/25/2023 23:09",
+		"index:" : "ct 11/25/2023 23:09",
 		"pdfUrl" : "ct 11/24/2023 18:38",
 		"pdfUrl:" : "ct 11/24/2023 18:38",
 		"pdfUrlFragment" : "ct 11/24/2023 18:30",
+		"storeOn:" : "ct 11/25/2023 23:01",
 		"textForHelp" : "ct 11/15/2023 18:02",
 		"type" : "ct 11/25/2023 19:50" } }
diff --git a/SmalltalkSources/SBE-Book.package/SBEBookNode.class/instance/storeOn..st b/SmalltalkSources/SBE-Book.package/SBEBookNode.class/instance/storeOn..st
@@ -6,10 +6,16 @@ storeOn: aStream
 	title: {2};
 	addChildren: {3};
 	text: {4};
-	extraLabels: {5};
+	index: {5};
+	hasStarIndex: {6};
+	extraLabels: {7};
+	typeName: {8};
 	yourself)' format:
 		{self class name.
 		self title sbeStoreHtmlString.
 		self children storeString.
 		self text sbeStoreHtmlString.
-		self extraLabels storeString})
+		self index storeString.
+		self hasStarIndex storeString.
+		self extraLabels storeString.
+		self typeName storeString})
diff --git a/SmalltalkSources/SBE-Book.package/SBEBookNode.class/methodProperties.json b/SmalltalkSources/SBE-Book.package/SBEBookNode.class/methodProperties.json
@@ -38,7 +38,7 @@
 		"pdfUrl" : "ct 11/25/2023 19:11",
 		"pdfUrlFragment" : "ct 11/24/2023 18:30",
 		"printOn:" : "ct 11/8/2023 22:46",
-		"storeOn:" : "ct 11/15/2023 20:16",
+		"storeOn:" : "ct 11/25/2023 23:00",
 		"text" : "ct 11/9/2023 22:47",
 		"text:" : "ct 11/9/2023 22:47",
 		"textForHelp" : "ct 11/9/2023 23:05",

diff --git a/SmalltalkSources/SBE-Book.package/SBEBookSubsection.class/instance/storeOn..st b/SmalltalkSources/SBE-Book.package/SBEBookSubsection.class/instance/storeOn..st
@@ -6,4 +6,4 @@ storeOn: aStream
 	level: {2};
 	yourself)' format:
 		{String streamContents: [:stream | super storeOn: stream].
-		self level})
+		self level storeString})
diff --git a/SmalltalkSources/SBE-Book.package/SBEBookSubsection.class/methodProperties.json b/SmalltalkSources/SBE-Book.package/SBEBookSubsection.class/methodProperties.json
@@ -8,7 +8,7 @@
 		"level" : "ct 11/9/2023 21:11",
 		"level:" : "ct 11/9/2023 21:12",
 		"pdfUrlFragment" : "ct 11/25/2023 19:52",
-		"storeOn:" : "ct 11/15/2023 19:57",
+		"storeOn:" : "ct 11/25/2023 23:01",
 		"titleSeparatorForHelp" : "ct 11/9/2023 23:07",
 		"type" : "ct 11/25/2023 19:51",
 		"wantsOwnHelpTopic" : "ct 11/9/2023 23:01" } }