diff --git a/modules/Examples/PrintClasses/PrintClassesModule.st b/modules/Examples/PrintClasses/PrintClassesModule.st
new file mode 100644
index 00000000..fd65586a
--- /dev/null
+++ b/modules/Examples/PrintClasses/PrintClassesModule.st
@@ -0,0 +1,27 @@
+Class {
+	#name : #PrintClassesModule,
+	#superclass : #Module,
+	#category : #'Examples-PrintClasses'
+}
+
+{ #category : #spec }
+PrintClassesModule >> imports [
+	^{}
+]
+
+{ #category: #private }
+PrintClassesModule >> printAClass: aClass indent: indentCount [
+	| aString |
+	indentCount timesRepeat: [
+		Kernel log: '    '.
+	].
+	Kernel log: aClass printString, String cr.
+	aClass subclassesDo: [ :sub | self printAClass: sub indent: indentCount + 1 ].
+]
+
+{ #category : #services }
+PrintClassesModule >> main: arguments [
+	Kernel log: 'Current Local Classes', String cr.
+	self printAClass: Object class indent: 0.
+	^0
+]
diff --git a/runtime/cpp/GCedRef.h b/runtime/cpp/GCedRef.h
index aef4e11b..c68e5227 100644
--- a/runtime/cpp/GCedRef.h
+++ b/runtime/cpp/GCedRef.h
@@ -3,6 +3,9 @@
 #define _GCEDREF_H_
 
 #include "Egg.h"
+#ifdef __aarch64__
+#include <tuple>
+#endif
 
 namespace Egg {