Class { #name : 'PPCMHrule', #superclass : 'PPCMNode', #instVars : [ 'rule' ], #category : 'PetitMarkdown-AST' } { #category : 'visiting' } PPCMHrule >> accept: visitor [ ^ visitor visitHRule: self ] { #category : 'accessing' } PPCMHrule >> rule [ ^ rule ] { #category : 'accessing' } PPCMHrule >> rule: anObject [ rule := anObject ]