--- a/Object.st	Fri Oct 25 12:44:56 2019 +0200
+++ b/Object.st	Fri Oct 25 17:17:55 2019 +0200
@@ -3314,6 +3314,23 @@
     "Modified (format): / 06-06-2019 / 23:21:03 / Claus Gittinger"
 !
 
+notReached
+    "mark code pieces that should not be reached
+     e.g. after a non-proceedable error or AbortRequest has been raised. "
+
+    self error:'code that should not be reached has been reached!!'.
+
+    "
+     example:
+
+        ...
+        self notReached.
+        ...
+    "
+
+    "Created: / 25-10-2019 / 16:58:27 / Stefan Vogel"
+!
+
 obsoleteFeatureWarning
     "{ Pragma: +optSpace }"