Fixed failing tests by using OpalCompiler instead of compiler

Author: olekscode

.project

@@ -0,0 +1,3 @@
+{
+	'srcDirectory' : 'src'
+}

src/DataFrame-Core/DataFrame.class.st

@@ -769,22 +769,24 @@ DataFrame >> select: colNames where: aBlock groupBy: aColName aggregate: selecto
 
 { #category : #enumerating }
 DataFrame >> select: aBlock with: testedColumnNames [
-	
 	| blockStr |
 	blockStr := aBlock asString.
-	
+
 	"Remove parameters: '[ :x | x > 3 ]' to '[ x > 3 ]'"
-	blockStr := (blockStr
+	blockStr := blockStr
 		copyFrom: (blockStr findString: '|')
-		to: blockStr size).
-		
-	testedColumnNames do: [ :eachColName |
-		blockStr := blockStr
-			copyReplaceAll: eachColName
-			with: ('(row atKey: #', eachColName, ')') ].
-		
-	blockStr := '[ :row ', blockStr.
-	^ self select: (Compiler evaluate: blockStr)
+		to: blockStr size.
+	testedColumnNames
+		do: [ :eachColName | 
+			blockStr := blockStr
+				copyReplaceAll: eachColName
+				with: '(row atKey: #' , eachColName , ')' ].
+	blockStr := '[ :row ' , blockStr.
+	^ self
+		select:
+			(OpalCompiler new
+				source: blockStr;
+				evaluate)
 ]
 
 { #category : #queries }