hg/jv-libgdbs: tests/GDBInternalPipeStreamTests.st@472a4841a8b6 (annotated)

91 472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	1	"
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	2	jv:libgdbs - GNU Debugger Interface Library
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	3	Copyright (C) 2015-now Jan Vrany
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	4
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	5	This library is free software; you can redistribute it and/or
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	6	modify it under the terms of the GNU Lesser General Public
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	7	License as published by the Free Software Foundation; either
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	8	version 2.1 of the License.
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	9
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	10	This library is distributed in the hope that it will be useful,
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	11	but WITHOUT ANY WARRANTY; without even the implied warranty of
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	12	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	13	Lesser General Public License for more details.
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	14
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	15	You should have received a copy of the GNU Lesser General Public
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	16	License along with this library; if not, write to the Free Software
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	17	Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	18	"
14 535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	19	"{ Package: 'jv:libgdbs/tests' }"
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	20
53 63669c2c0f9e Test fixes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 36 diff changeset	21	"{ NameSpace: Smalltalk }"
63669c2c0f9e Test fixes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 36 diff changeset	22
14 535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	23	TestCase subclass:#GDBInternalPipeStreamTests
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	24	instanceVariableNames:''
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	25	classVariableNames:''
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	26	poolDictionaries:''
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	27	category:'GDB-Support-Tests'
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	28	!
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	29
91 472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	30	!GDBInternalPipeStreamTests class methodsFor:'documentation'!
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	31
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	32	copyright
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	33	"
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	34	jv:libgdbs - GNU Debugger Interface Library
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	35	Copyright (C) 2015-now Jan Vrany
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	36
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	37	This library is free software; you can redistribute it and/or
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	38	modify it under the terms of the GNU Lesser General Public
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	39	License as published by the Free Software Foundation; either
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	40	version 2.1 of the License.
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	41
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	42	This library is distributed in the hope that it will be useful,
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	43	but WITHOUT ANY WARRANTY; without even the implied warranty of
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	44	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	45	Lesser General Public License for more details.
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	46
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	47	You should have received a copy of the GNU Lesser General Public
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	48	License along with this library; if not, write to the Free Software
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	49	Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	50	"
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 53 diff changeset	51	! !
14 535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	52
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	53	!GDBInternalPipeStreamTests methodsFor:'tests'!
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	54
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	55	test_01
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	56	\| pipe \|
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	57
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	58	pipe := GDBInternalPipeStream newWithBufferSize:3.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	59	pipe nextPut:$x.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	60	pipe nextPut:$y.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	61	self assert:pipe next == $x.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	62	self assert:pipe next == $y.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	63
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	64	"Created: / 07-06-2014 / 00:52:23 / Jan Vrany <jan.vrany@fit.cvut.cz>"
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	65	!
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	66
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	67	test_01a
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	68	\| pipe \|
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	69
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	70	pipe := GDBInternalPipeStream newWithBufferSize:3.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	71	pipe nextPutAll:'xy'.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	72	self assert:(pipe next:2) = 'xy'.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	73
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	74	"Created: / 09-06-2014 / 21:45:24 / Jan Vrany <jan.vrany@fit.cvut.cz>"
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	75	!
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	76
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	77	test_01c
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	78	\| pipe \|
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	79
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	80	pipe := GDBInternalPipeStream newWithBufferSize:3.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	81	pipe nextPut:$x.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	82	pipe nextPut:$y.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	83	self assert:(pipe next:2) = 'xy'.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	84
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	85	"Created: / 09-06-2014 / 21:46:05 / Jan Vrany <jan.vrany@fit.cvut.cz>"
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	86	!
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	87
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	88	test_02
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	89	\| pipe \|
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	90
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	91	pipe := GDBInternalPipeStream newWithBufferSize:3.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	92	pipe nextPut:$x.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	93	pipe nextPut:$y.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	94	pipe nextPut:$z.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	95	self assert:pipe next == $x.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	96	self assert:pipe next == $y.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	97	pipe nextPut:$a.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	98	pipe nextPut:$b.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	99	self assert:pipe next == $z.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	100	self assert:pipe next == $a.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	101	self assert:pipe next == $b.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	102
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	103	"Created: / 07-06-2014 / 00:53:38 / Jan Vrany <jan.vrany@fit.cvut.cz>"
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	104	!
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	105
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	106	test_02b
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	107	\| pipe \|
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	108
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	109	pipe := GDBInternalPipeStream newWithBufferSize:3.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	110	pipe nextPutAll:'xyz'.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	111	self assert:pipe next == $x.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	112	self assert:pipe next == $y.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	113	pipe nextPutAll:'ab'.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	114	self assert:pipe next == $z.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	115	self assert:pipe next == $a.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	116	self assert:pipe next == $b.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	117
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	118	"Created: / 09-06-2014 / 22:42:11 / Jan Vrany <jan.vrany@fit.cvut.cz>"
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	119	!
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	120
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	121	test_02c
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	122	\| pipe \|
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	123
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	124	pipe := GDBInternalPipeStream newWithBufferSize:3.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	125	pipe nextPutAll:'xy'.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	126	self assert:pipe next == $x.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	127	pipe nextPutAll:'ab'.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	128	self assert:pipe next == $y.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	129	self assert:pipe next == $a.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	130	self assert:pipe next == $b.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	131
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	132	"Created: / 09-06-2014 / 22:46:59 / Jan Vrany <jan.vrany@fit.cvut.cz>"
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	133	!
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	134
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	135	test_03
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	136	\| pipe \|
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	137
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	138	pipe := GDBInternalPipeStream newWithBufferSize:3.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	139	pipe nextPut:$x.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	140	pipe nextPut:$y.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	141	pipe nextPut:$z.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	142	self assert:pipe next == $x.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	143	self assert:pipe next == $y.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	144	pipe nextPut:$a.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	145	pipe nextPut:$b.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	146	self assert:pipe next == $z.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	147	self assert:pipe next == $a.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	148	pipe nextPut:$1.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	149	pipe nextPut:$2.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	150	self assert:pipe next == $b.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	151	self assert:pipe next == $1.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	152	self assert:pipe next == $2.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	153
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	154	"Created: / 07-06-2014 / 00:56:58 / Jan Vrany <jan.vrany@fit.cvut.cz>"
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	155	!
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	156
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	157	test_04
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	158	\| pipe \|
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	159
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	160	pipe := GDBInternalPipeStream newWithBufferSize:3.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	161	pipe nextPut:$x.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	162	pipe nextPut:$y.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	163	pipe close.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	164	self should:[ pipe nextPut:$X ] raise:Stream writeErrorSignal.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	165	self assert:pipe atEnd not.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	166	self assert:pipe next == $x.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	167	self assert:pipe next == $y.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	168	self assert:pipe next isNil.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	169	self assert:pipe atEnd.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	170
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	171	"Created: / 07-06-2014 / 01:06:04 / Jan Vrany <jan.vrany@fit.cvut.cz>"
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	172	!
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	173
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	174	test_05a
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	175	\| pipe buffer \|
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	176
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	177	pipe := GDBInternalPipeStream newWithBufferSize:3.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	178	buffer := String new:10.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	179	pipe nextPutAll:'xy'.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	180	pipe nextPut:$z.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	181	self
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	182	assert:(pipe
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	183	nextAvailableBytes:3
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	184	into:buffer
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	185	startingAt:1) == 3.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	186	self assert:(buffer at:1) == $x.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	187	self assert:(buffer at:2) == $y.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	188	self assert:(buffer at:3) == $z.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	189
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	190	"Created: / 10-06-2014 / 00:01:02 / Jan Vrany <jan.vrany@fit.cvut.cz>"
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	191	!
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	192
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	193	test_05b
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	194	\| pipe buffer \|
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	195
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	196	pipe := GDBInternalPipeStream newWithBufferSize:3.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	197	buffer := String new:10.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	198	pipe nextPutAll:'xy'.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	199	pipe nextPut:$z.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	200	self
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	201	assert:(pipe
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	202	nextAvailableBytes:30
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	203	into:buffer
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	204	startingAt:1) == 3.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	205	self assert:(buffer at:1) == $x.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	206	self assert:(buffer at:2) == $y.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	207	self assert:(buffer at:3) == $z.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	208
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	209	"Created: / 10-06-2014 / 00:01:14 / Jan Vrany <jan.vrany@fit.cvut.cz>"
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	210	!
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	211
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	212	test_05c
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	213	\| pipe buffer \|
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	214
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	215	pipe := GDBInternalPipeStream newWithBufferSize:3.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	216	buffer := String new:10.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	217	pipe nextPutAll:'xy'.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	218	pipe nextPut:$z.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	219	self
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	220	assert:(pipe
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	221	nextAvailableBytes:2
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	222	into:buffer
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	223	startingAt:1) == 2.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	224	self assert:(buffer at:1) == $x.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	225	self assert:(buffer at:2) == $y.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	226	self
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	227	assert:(pipe
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	228	nextAvailableBytes:2
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	229	into:buffer
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	230	startingAt:3) == 1.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	231	self assert:(buffer at:3) == $z.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	232
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	233	"Created: / 10-06-2014 / 00:01:29 / Jan Vrany <jan.vrany@fit.cvut.cz>"
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	234	!
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	235
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	236	test_05d
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	237	\| pipe buffer \|
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	238
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	239	pipe := GDBInternalPipeStream newWithBufferSize:3.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	240	buffer := String new:10.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	241	pipe nextPutAll:'xy'.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	242	pipe next.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	243	pipe nextPutAll:'ab'.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	244	self
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	245	assert:(pipe
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	246	nextAvailableBytes:3
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	247	into:buffer
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	248	startingAt:1) == 2.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	249	self assert:(buffer at:1) == $y.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	250	self assert:(buffer at:2) == $a.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	251	self assert:(buffer at:3) == $b.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	252
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	253	"Created: / 10-06-2014 / 00:21:56 / Jan Vrany <jan.vrany@fit.cvut.cz>"
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	254	!
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	255
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	256	test_05e
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	257	\| pipe buffer \|
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	258
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	259	pipe := GDBInternalPipeStream newWithBufferSize:3.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	260	buffer := String new:10.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	261	pipe nextPutAll:'xy'.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	262	pipe next.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	263	pipe nextPutAll:'ab'.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	264	self
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	265	assert:(pipe
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	266	nextAvailableBytes:3
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	267	into:buffer
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	268	startingAt:1) == 2.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	269	self assert:(buffer at:1) == $y.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	270	self assert:(buffer at:2) == $a.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	271	self assert:(buffer at:3) == $b.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	272
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	273	"Created: / 10-06-2014 / 00:28:27 / Jan Vrany <jan.vrany@fit.cvut.cz>"
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	274	!
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	275
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	276	test_06a
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	277	\| pipe buffer \|
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	278
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	279	pipe := GDBInternalPipeStream newWithBufferSize:15.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	280	buffer := String new:10.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	281	pipe nextPutAll:'xy'.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	282	pipe nextPut:Character nl.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	283	self assert:pipe nextLine = 'xy'.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	284	pipe nextPutAll:'ayz z'.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	285	pipe nextPut:Character nl.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	286	self assert:pipe nextLine = 'ayz z'.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	287
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	288	"Created: / 11-06-2014 / 13:06:04 / Jan Vrany <jan.vrany@fit.cvut.cz>"
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	289	!
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	290
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	291	test_06b
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	292	\| pipe \|
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	293
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	294	pipe := GDBInternalPipeStream new.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	295	pipe nextPutAll:'show inferior-tty'.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	296	pipe nextPut:Character cr.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	297	self assert:pipe nextLine = 'show inferior-tty'.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	298	pipe nextPutAll:'ayz z'.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	299	pipe nextPut:Character nl.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	300	self assert:pipe nextLine = 'ayz z'.
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	301
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	302	"Created: / 11-06-2014 / 13:19:02 / Jan Vrany <jan.vrany@fit.cvut.cz>"
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	303	"Modified: / 11-06-2014 / 21:39:06 / Jan Vrany <jan.vrany@fit.cvut.cz>"
34 4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	304	!
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	305
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	306	test_07a
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	307	\| pipe t1 t1stepper t1blocker t2 t2stepper t2blocker c \|
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	308
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	309	pipe := GDBInternalPipeStream newWithBufferSize:5.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	310	t1stepper := Semaphore new.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	311	t1blocker := Semaphore new.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	312	t2stepper := Semaphore new.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	313	t2blocker := Semaphore new.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	314
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	315
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	316	t1 := [
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	317	t1stepper wait.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	318	pipe nextPutAll: '123456'.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	319	] newProcess.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	320	t1 addExitAction:[t1blocker signal].
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	321
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	322	t2 := [
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	323	t2stepper wait.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	324	c := pipe next.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	325	] newProcess.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	326	t2 addExitAction:[t2blocker signal].
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	327
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	328	t1 resume.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	329	t2 resume.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	330
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	331	t1stepper signal.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	332	Delay waitForMilliseconds:100.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	333	t2stepper signal.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	334
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	335	t1blocker wait.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	336	t2blocker wait.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	337
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	338	self assert: c = $1.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	339	self assert: t1 isDead.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	340	self assert: t2 isDead.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	341
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	342	"Created: / 07-09-2014 / 07:45:09 / Jan Vrany <jan.vrany@fit.cvut.cz>"
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	343	!
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	344
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	345	test_07b
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	346	\| pipe t1 t1stepper t1blocker t2 t2stepper t2blocker c \|
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	347
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	348	pipe := GDBInternalPipeStream newWithBufferSize:5.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	349	t1stepper := Semaphore new.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	350	t1blocker := Semaphore new.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	351	t2stepper := Semaphore new.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	352	t2blocker := Semaphore new.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	353
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	354
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	355	t1 := [
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	356	t1stepper wait.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	357	pipe nextPutAll: '123456'.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	358	t1blocker signal.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	359	] newProcess.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	360
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	361	t2 := [
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	362	t2stepper wait.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	363	c := pipe next.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	364	t2blocker signal.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	365	] newProcess.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	366
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	367	t1 resume.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	368	t2 resume.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	369
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	370	t2stepper signal.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	371	Delay waitForMilliseconds:100.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	372	t1stepper signal.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	373
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	374
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	375	t1blocker wait.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	376	t2blocker wait.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	377
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	378	self assert: c = $1.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	379	self assert: t1 isDead.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	380	self assert: t2 isDead.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	381
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	382	"Created: / 07-09-2014 / 07:46:09 / Jan Vrany <jan.vrany@fit.cvut.cz>"
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	383	!
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	384
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	385	test_08a
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	386	\| pipe t1 t1stepper t1blocker t2 t2stepper t2blocker c \|
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	387
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	388	pipe := GDBInternalPipeStream newWithBufferSize:5.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	389	t1stepper := Semaphore new.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	390	t1blocker := Semaphore new.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	391	t2stepper := Semaphore new.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	392	t2blocker := Semaphore new.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	393
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	394
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	395	t1 := [
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	396	t1stepper wait.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	397	pipe nextPutAll: '123456'.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	398	t1blocker signal.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	399	] newProcess.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	400	t1 addExitAction:[t1blocker signal].
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	401
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	402	t2 := [
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	403	t2stepper wait.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	404	c := pipe next:6.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	405	] newProcess.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	406	t2 addExitAction:[t2blocker signal].
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	407
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	408	t1 resume.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	409	t2 resume.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	410
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	411	t1stepper signal.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	412	Delay waitForMilliseconds:100.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	413	t2stepper signal.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	414
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	415
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	416	t1blocker wait.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	417	t2blocker wait.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	418
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	419	self assert: c = '123456'.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	420	self assert: t1 isDead.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	421	self assert: t2 isDead.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	422
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	423	"Created: / 07-09-2014 / 07:48:52 / Jan Vrany <jan.vrany@fit.cvut.cz>"
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	424	!
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	425
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	426	test_08b
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	427	\| pipe t1 t1stepper t1blocker t2 t2stepper t2blocker c \|
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	428
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	429	pipe := GDBInternalPipeStream newWithBufferSize:5.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	430	t1stepper := Semaphore new.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	431	t1blocker := Semaphore new.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	432	t2stepper := Semaphore new.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	433	t2blocker := Semaphore new.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	434
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	435
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	436	t1 := [
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	437	t1stepper wait.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	438	pipe nextPutAll: '123456'.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	439	] newProcess.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	440	t1 addExitAction:[t1blocker signal].
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	441
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	442	t2 := [
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	443	t2stepper wait.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	444	c := pipe next:6.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	445	] newProcess.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	446	t2 addExitAction:[t2blocker signal].
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	447
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	448	t1 resume.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	449	t2 resume.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	450
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	451	t2stepper signal.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	452	Delay waitForMilliseconds:100.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	453	t1stepper signal.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	454
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	455
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	456	t1blocker wait.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	457	t2blocker wait.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	458
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	459	self assert: c = '123456'.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	460	self assert: t1 isDead.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	461	self assert: t2 isDead.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	462
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	463	"Created: / 07-09-2014 / 07:48:40 / Jan Vrany <jan.vrany@fit.cvut.cz>"
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	464	!
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	465
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	466	test_09a
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	467	\| pipe t1 t1stepper t1blocker t2 t2stepper t2blocker c \|
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	468
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	469	pipe := GDBInternalPipeStream newWithBufferSize:5.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	470	t1stepper := Semaphore new.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	471	t1blocker := Semaphore new.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	472	t2stepper := Semaphore new.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	473	t2blocker := Semaphore new.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	474
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	475
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	476	t1 := [
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	477	t1stepper wait.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	478	pipe nextPutAll: '1234567'.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	479	] newProcess.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	480	t1 addExitAction:[t1blocker signal].
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	481
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	482	t2 := [
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	483	t2stepper wait.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	484	c := pipe next:7.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	485	] newProcess.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	486	t2 addExitAction:[t2blocker signal].
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	487
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	488	t1 resume.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	489	t2 resume.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	490
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	491	t1stepper signal.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	492	Delay waitForMilliseconds:100.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	493	t2stepper signal.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	494
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	495
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	496	t1blocker wait.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	497	t2blocker wait.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	498
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	499	self assert: c = '1234567'.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	500	self assert: t1 isDead.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	501	self assert: t2 isDead.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	502
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	503	"Created: / 07-09-2014 / 07:50:52 / Jan Vrany <jan.vrany@fit.cvut.cz>"
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	504	!
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	505
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	506	test_09b
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	507	\| pipe t1 t1stepper t1blocker t2 t2stepper t2blocker c \|
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	508
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	509	pipe := GDBInternalPipeStream newWithBufferSize:5.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	510	t1stepper := Semaphore new.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	511	t1blocker := Semaphore new.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	512	t2stepper := Semaphore new.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	513	t2blocker := Semaphore new.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	514
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	515
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	516	t1 := [
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	517	t1stepper wait.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	518	pipe nextPutAll: '1234567'.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	519	] newProcess.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	520	t1 addExitAction:[t1blocker signal].
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	521
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	522	t2 := [
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	523	t2stepper wait.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	524	c := pipe next:7.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	525	] newProcess.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	526	t2 addExitAction:[t2blocker signal].
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	527
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	528	t1 resume.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	529	t2 resume.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	530
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	531	t2stepper signal.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	532	Delay waitForMilliseconds:100.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	533	t1stepper signal.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	534
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	535
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	536	t1blocker wait.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	537	t2blocker wait.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	538
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	539	self assert: c = '1234567'.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	540	self assert: t1 isDead.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	541	self assert: t2 isDead.
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	542
4662b462b28e Fixes for GDBInternalPipeStream w.r.t multiple threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 14 diff changeset	543	"Created: / 07-09-2014 / 07:51:13 / Jan Vrany <jan.vrany@fit.cvut.cz>"
36 095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 34 diff changeset	544	!
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 34 diff changeset	545
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 34 diff changeset	546	test_10
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 34 diff changeset	547	\| pipe \|
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 34 diff changeset	548
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 34 diff changeset	549	pipe := GDBInternalPipeStream new.
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 34 diff changeset	550	pipe nextPutAll:'12345'.
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 34 diff changeset	551	pipe close.
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 34 diff changeset	552	self assert: pipe atEnd not.
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 34 diff changeset	553	self assert: pipe next == $1.
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 34 diff changeset	554	self assert: (pipe next:4) = '2345'.
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 34 diff changeset	555	self assert: pipe atEnd.
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 34 diff changeset	556
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 34 diff changeset	557	"Created: / 07-09-2014 / 21:59:04 / Jan Vrany <jan.vrany@fit.cvut.cz>"
14 535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	558	! !
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	559
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	560	!GDBInternalPipeStreamTests class methodsFor:'documentation'!
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	561
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	562	version_HG
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	563
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	564	^ '$Changeset: <not expanded> $'
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	565	! !
535e7f16c05a Moved VDBInternalPipeStream from jv:vdb to jv:libgdbs and renamed to GDBInternalPipeStream Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	566

author	Jan Vrany <jan.vrany@fit.cvut.cz>
	Thu, 23 Nov 2017 22:51:20 +0000
changeset 91	472a4841a8b6
parent 53	63669c2c0f9e
child 272	cdd1c9ad00de
permissions	-rw-r--r--