changing attributeNamed: for parser state

j-brant · Oct 25, 2024 · f4664bc · f4664bc
1 parent 6ba4551
commit f4664bc
Showing 1 changed file with 8 additions and 1 deletion.
diff --git a/src/SmaCC_GLR_Runtime/SmaCCParserState.class.st b/src/SmaCC_GLR_Runtime/SmaCCParserState.class.st
@@ -50,7 +50,14 @@ SmaCCParserState >> = anObject [
 
 { #category : #accessing }
 SmaCCParserState >> attributeNamed: aSymbol [
-	^attributes ifNil: [ nil ] ifNotNil: [ attributes at: aSymbol ]
+	^ attributes ifNil: [ nil ] ifNotNil: [ attributes at: aSymbol ifAbsent: [  ] ]
+]
+
+{ #category : #accessing }
+SmaCCParserState >> attributeNamed: aSymbol ifAbsent: aBlock [
+	^ attributes
+		ifNil: aBlock
+		ifNotNil: [ attributes at: aSymbol ifAbsent: aBlock ]
 ]
 
 { #category : #accessing }