qse/ase/test/stx/test1.st

print: a1 and: a2
	| t1 |
	<primitive: 3>
	t1 := #abcdefg.
	"a1 := 2341 arguments are not assignable"
	t1 prim2: a2.
	^9999.
* empty log message * 2005-09-13 12:13:57 +00:00			`print: a1 and: a2`
			`\| t1 \|`
			`<primitive: 3>`
			`t1 := #abcdefg.`
			`"a1 := 2341 arguments are not assignable"`
			`t1 prim2: a2.`
* empty log message * 2005-09-13 15:56:23 +00:00			`^9999.`