Class { #name : 'PPCMInlinedCode', #superclass : 'PPCMNode', #instVars : [ 'code' ], #category : 'PetitMarkdown-AST' } { #category : 'visiting' } PPCMInlinedCode >> accept: visitor [ ^ visitor visitInlinedCode: self ] { #category : 'accessing' } PPCMInlinedCode >> code [ ^ code ] { #category : 'accessing' } PPCMInlinedCode >> code: anObject [ code := anObject ] { #category : 'accessing' } PPCMInlinedCode >> text [ ^ code ]