playground := GTPlayground new.
playground openOn: GTPlayPage new.
playground 
	onChangeOfPort: #text 
	act: [ :x | self inform: x entity value content ]