parseMethod: text ^ (Class parser text: text instanceVars: self instanceVariables classVars: self class variables) parse: self