'From Squeak3.1alpha of 28 February 2001 [latest update: #4337] on 13 September 2001 at 10:11:51 pm'! "Change Set: tempsFix Date: 13 September 2001 Author: Bob Arning, as told to Scott Wallace Reestablishes the fix of update 4135, which got lost when update 4322 came in"! !Parser methodsFor: 'expression types' stamp: 'sw 9/6/2001 15:30'! temporaries " [ '|' (variable)* '|' ]" | vars theActualText | (self match: #verticalBar) ifFalse: ["no temps" doitFlag ifTrue: [requestor ifNil: [tempsMark _ 1] ifNotNil: [tempsMark _ requestor selectionInterval first]. ^ #()]. tempsMark _ (prevEnd ifNil: [0]) + 1. tempsMark _ hereMark "formerly --> prevMark + prevToken". tempsMark > 0 ifTrue: [theActualText _ source contents. [tempsMark < theActualText size and: [(theActualText at: tempsMark) isSeparator]] whileTrue: [tempsMark _ tempsMark + 1]]. ^ #()]. vars _ OrderedCollection new. [hereType == #word] whileTrue: [vars addLast: (encoder bindTemp: self advance)]. (self match: #verticalBar) ifTrue: [tempsMark _ prevMark. ^ vars]. ^ self expected: 'Vertical bar'! !