🔧 add regex assertion tests to LogRecordTest suite

ba-st · Jun 26, 2024 · e0366d7 · e0366d7
1 parent 24c7d68
commit e0366d7
Showing 1 changed file with 30 additions and 0 deletions.
diff --git a/source/Bell-Logging-Tests/LogRecordTest.class.st b/source/Bell-Logging-Tests/LogRecordTest.class.st
@@ -18,6 +18,14 @@ LogRecordTest >> runMemoryLoggerDuring: aBlock assertingLogRecordsMatch: expecte
 		assertLogRecordsMatch: expectedLogEntries
 ]
 
+{ #category : #private }
+LogRecordTest >> runMemoryLoggerDuring: aBlock assertingLogRecordsMatchRegexes: expectedLogEntries [
+
+  loggingAsserter
+    runMemoryLoggerDuring: aBlock;
+    assertLogRecordsMatchRegexes: expectedLogEntries
+]
+
 { #category : #running }
 LogRecordTest >> setUp [
 
@@ -47,6 +55,28 @@ LogRecordTest >> testEmitCombinedEvents [
 			   '[ERROR] Starting app... [FAILED]' )
 ]
 
+{ #category : #tests }
+LogRecordTest >> testEmitCombinedEventsWithRegex [
+
+	self
+		runMemoryLoggerDuring: [ 
+			self
+				should: [ 
+					LogRecord emitInfo: 'Starting app' during: [ 
+						LogRecord emitInfo: 'Setting up data'.
+						LogRecord emitWarning: 'Missing data, using default.'.
+						Error signal
+						]
+					]
+				raise: Error
+			]
+		assertingLogRecordsMatchRegexes:
+			#( '.+ \[INFO].+\.{0,3}'
+				'.+ \[INFO].+\.{0,1}'
+				'.+ \[WARNING].+\.{0,1}'
+			   '.+ \[ERROR].+( \[FAILED\])?\.{0,1}' )
+]
+
 { #category : #tests }
 LogRecordTest >> testEmitDebug [