Fixed class generation on Exercise generator.

exercism · Feb 16, 2024 · bea29cb · bea29cb
1 parent 85a6003
commit bea29cb
Showing 1 changed file with 11 additions and 8 deletions.
diff --git a/dev/src/ExercismDev/ExercismExerciseGenerator.class.st b/dev/src/ExercismDev/ExercismExerciseGenerator.class.st
@@ -211,14 +211,17 @@ ExercismExerciseGenerator >> generateSetupFor: testClass [
 
 { #category : #generation }
 ExercismExerciseGenerator >> generateTestClass [
-
-	^ExercismTest
-		subclass: self testClassName asSymbol
-		instanceVariableNames: self testVariableName
-		classVariableNames: ''
-		poolDictionaries: ''
-		package: 'ExercismWIP-', (self testNameCamelCased)
-
+
+	^ ExercismTest classInstaller make: [ :builder |
+		  builder
+			  superclass: ExercismTest;
+			  name: self testClassName asSymbol;
+			  slots: self testVariableName asSlotCollection;
+			  sharedVariablesFromString: '';
+			  sharedPools: '';
+			  tag: self testNameCamelCased;
+			  package: 'ExercismWIP';
+			  environment: ExercismTest environment ]
 ]
 
 { #category : #generation }