equal
deleted
inserted
replaced
418 "setup for writing to stderr" |
418 "setup for writing to stderr" |
419 |
419 |
420 mode := #readwrite. |
420 mode := #readwrite. |
421 buffered := false. |
421 buffered := false. |
422 handle := self handleForStderr. |
422 handle := self handleForStderr. |
|
423 handleType := #filePointer. |
423 OperatingSystem isMSWINDOWSlike ifTrue:[ |
424 OperatingSystem isMSWINDOWSlike ifTrue:[ |
424 eolMode := #crlf |
425 eolMode := #crlf |
425 ] |
426 ] |
426 ! |
427 ! |
427 |
428 |
428 initializeForStdin |
429 initializeForStdin |
429 "{ Pragma: +optSpace }" |
430 "{ Pragma: +optSpace }" |
431 "setup for reading stdin" |
432 "setup for reading stdin" |
432 |
433 |
433 mode := #readonly. |
434 mode := #readonly. |
434 "/ buffered := true. |
435 "/ buffered := true. |
435 buffered := false. |
436 buffered := false. |
|
437 handleType := #filePointer. |
436 handle := self handleForStdin. |
438 handle := self handleForStdin. |
437 ! |
439 ! |
438 |
440 |
439 initializeForStdout |
441 initializeForStdout |
440 "{ Pragma: +optSpace }" |
442 "{ Pragma: +optSpace }" |
442 "setup for writing to stdout" |
444 "setup for writing to stdout" |
443 |
445 |
444 mode := #readwrite. |
446 mode := #readwrite. |
445 buffered := false. |
447 buffered := false. |
446 handle := self handleForStdout. |
448 handle := self handleForStdout. |
|
449 handleType := #filePointer. |
447 OperatingSystem isMSWINDOWSlike ifTrue:[ |
450 OperatingSystem isMSWINDOWSlike ifTrue:[ |
448 eolMode := #crlf |
451 eolMode := #crlf |
449 ] |
452 ] |
450 ! |
453 ! |
451 |
454 |
452 reOpen |
455 reOpen |
453 "{ Pragma: +optSpace }" |
456 "{ Pragma: +optSpace }" |
555 ! ! |
558 ! ! |
556 |
559 |
557 !NonPositionableExternalStream class methodsFor:'documentation'! |
560 !NonPositionableExternalStream class methodsFor:'documentation'! |
558 |
561 |
559 version |
562 version |
560 ^ '$Header: /cvs/stx/stx/libbasic/NonPositionableExternalStream.st,v 1.60 2010-02-09 13:43:39 stefan Exp $' |
563 ^ '$Header: /cvs/stx/stx/libbasic/NonPositionableExternalStream.st,v 1.61 2010-03-04 15:11:43 stefan Exp $' |
561 ! |
564 ! |
562 |
565 |
563 version_CVS |
566 version_CVS |
564 ^ '$Header: /cvs/stx/stx/libbasic/NonPositionableExternalStream.st,v 1.60 2010-02-09 13:43:39 stefan Exp $' |
567 ^ '$Header: /cvs/stx/stx/libbasic/NonPositionableExternalStream.st,v 1.61 2010-03-04 15:11:43 stefan Exp $' |
565 ! ! |
568 ! ! |