Class { #name : 'PPCMLinkRef', #superclass : 'PPCMNode', #instVars : [ 'label' ], #category : 'PetitMarkdown-AST' } { #category : 'as yet unclassified' } PPCMLinkRef >> accept: visitor [ ^ visitor visitLinkRef: self ] { #category : 'accessing' } PPCMLinkRef >> label [ ^ label ] { #category : 'accessing' } PPCMLinkRef >> label: anObject [ label := anObject ]