Class {
	#name : 'PPCMParagraph',
	#superclass : 'PPCMDelegateNode',
	#category : 'PetitMarkdown-AST'
}

{ #category : 'visiting' }
PPCMParagraph >> accept: visitor [
	^ visitor visitParagraph: self
]

{ #category : 'accessing' }
PPCMParagraph >> isBlockLevel [
	^ true
]

{ #category : 'testing' }
PPCMParagraph >> isParagraph [
	^ true
]

{ #category : 'accessing' }
PPCMParagraph >> text [
	"hackity hack, this should not be used except for tests..."
	^ String cr join: (self children collect: [ :e | e text ])
]