diff --git a/repository/Grease-GemStone-Core.package/GRGemStonePlatform.class/instance/doTransaction..st b/repository/Grease-GemStone-Core.package/GRGemStonePlatform.class/instance/doTransaction..st
index bef36fcb..1ca22e12 100644
--- a/repository/Grease-GemStone-Core.package/GRGemStonePlatform.class/instance/doTransaction..st
+++ b/repository/Grease-GemStone-Core.package/GRGemStonePlatform.class/instance/doTransaction..st
@@ -1,4 +1,4 @@
-*grease-gemstone-core
+transactions
 doTransaction: aBlock
   "Evaluate aBlock in a transaction. 
 	 Return true if the transaction succeeds and false if the transaction fails.
diff --git a/repository/Grease-GemStone-Core.package/GRGemStonePlatform.class/instance/thisContext.st b/repository/Grease-GemStone-Core.package/GRGemStonePlatform.class/instance/thisContext.st
index 50e2a5b0..4de9489b 100644
--- a/repository/Grease-GemStone-Core.package/GRGemStonePlatform.class/instance/thisContext.st
+++ b/repository/Grease-GemStone-Core.package/GRGemStonePlatform.class/instance/thisContext.st
@@ -1,3 +1,3 @@
-*grease-gemstone-core
+processes
 thisContext
   ^ GsContext fromLevel: 3
\ No newline at end of file
diff --git a/repository/Grease-GemStone-Core.package/TestAsserter.extension/instance/assert.identicalTo..st b/repository/Grease-GemStone-Core.package/TestAsserter.extension/instance/assert.identicalTo..st
new file mode 100644
index 00000000..c35dccec
--- /dev/null
+++ b/repository/Grease-GemStone-Core.package/TestAsserter.extension/instance/assert.identicalTo..st
@@ -0,0 +1,4 @@
+*grease-gemstone-core
+assert: anObject identicalTo: otherObj
+
+        self assert: anObject identical: otherObj
\ No newline at end of file
diff --git a/repository/Grease-GemStone-Core.package/TestAsserter.extension/instance/deny.identicalTo..st b/repository/Grease-GemStone-Core.package/TestAsserter.extension/instance/deny.identicalTo..st
new file mode 100644
index 00000000..e516bae0
--- /dev/null
+++ b/repository/Grease-GemStone-Core.package/TestAsserter.extension/instance/deny.identicalTo..st
@@ -0,0 +1,5 @@
+*grease-gemstone-core
+deny: anObject identicalTo: anotherObject
+	self
+		deny: anObject == anotherObject
+		description: anObject printString, ' is *not* identical to ', anotherObject printString.
\ No newline at end of file
diff --git a/repository/Grease-GemStone-Core.package/TestAsserter.extension/properties.json b/repository/Grease-GemStone-Core.package/TestAsserter.extension/properties.json
new file mode 100644
index 00000000..10c0c4d0
--- /dev/null
+++ b/repository/Grease-GemStone-Core.package/TestAsserter.extension/properties.json
@@ -0,0 +1,2 @@
+{
+	"name" : "TestAsserter" }
diff --git a/repository/Grease-Tests-GemStone-Core.package/GRGemStonePlatformTest.class/instance/testIsGemStone.st b/repository/Grease-Tests-GemStone-Core.package/GRGemStonePlatformTest.class/instance/testIsGemStone.st
index c3aa2463..e9fce035 100644
--- a/repository/Grease-Tests-GemStone-Core.package/GRGemStonePlatformTest.class/instance/testIsGemStone.st
+++ b/repository/Grease-Tests-GemStone-Core.package/GRGemStonePlatformTest.class/instance/testIsGemStone.st
@@ -1,4 +1,4 @@
-*Grease-Tests-Pharo-Core
+tests
 testIsGemStone
 	self assert: GRPlatform current isGemStone.
 	self deny: GRPlatform current isPharo.
diff --git a/repository/Grease-Tests-GemStone32-Core.package/GRGemStonePlatformTest.class/instance/testIsGemStone.st b/repository/Grease-Tests-GemStone32-Core.package/GRGemStonePlatformTest.class/instance/testIsGemStone.st
index c3aa2463..e9fce035 100644
--- a/repository/Grease-Tests-GemStone32-Core.package/GRGemStonePlatformTest.class/instance/testIsGemStone.st
+++ b/repository/Grease-Tests-GemStone32-Core.package/GRGemStonePlatformTest.class/instance/testIsGemStone.st
@@ -1,4 +1,4 @@
-*Grease-Tests-Pharo-Core
+tests
 testIsGemStone
 	self assert: GRPlatform current isGemStone.
 	self deny: GRPlatform current isPharo.