Searched refs:inchan (Results 1 - 3 of 3) sorted by relevance
/macosx-10.10.1/tcl-105/tcl_ext/tkimg/tkimg/tiff/ |
H A D | tiff.c | 712 Tcl_Channel inchan; local 714 inchan = tkimg_OpenFileChannel(interp, tempFileName, 0644); 715 if (!inchan) { 720 result = Tcl_Read(inchan, buffer, 1024); 721 while ((result == TCL_OK) && !Tcl_Eof(inchan)) { 723 result = Tcl_Read(inchan, buffer, 1024); 727 result = Tcl_Close(interp, inchan);
|
/macosx-10.10.1/tcl-105/tcl_ext/tcllib/tcllib/modules/amazon-s3/ |
H A D | S3.tcl | 456 if {[catch {set inchan [open [dict get $thunk infile] r]} caught]} { 460 fconfigure $inchan -translation binary -encoding binary 463 if {[catch {fcopy $inchan $s3 ; flush $s3 ; close $inchan} caught]} { 472 if {[catch {set inchan [open [dict get $thunk infile] r]} caught]} { 476 fconfigure $inchan -buffering none -translation binary -encoding binary 479 dict set thunk inchan $inchan ; # So we can close it. 480 fcopy $inchan $s3 -command \ 545 if {[dict exists $thunk inchan]} { [all...] |
/macosx-10.10.1/tcl-105/tcl_ext/tkimg/tkimg/sgi/ |
H A D | sgi.c | 1483 Tcl_Channel inchan; local 1510 inchan = tkimg_OpenFileChannel (interp, tempFileName, 0); 1511 if (!inchan) { 1515 handle.data = (char *) inchan; 1520 if (Tcl_Close (interp, inchan) == TCL_ERROR) { 1662 Tcl_Channel inchan; local 1689 inchan = tkimg_OpenFileChannel(interp, tempFileName, 0); 1690 if (!inchan) { 1694 count = Tcl_Read(inchan, buffer, BUFLEN); 1697 count = Tcl_Read(inchan, buffe [all...] |
Completed in 63 milliseconds