Home
last modified time | relevance | path

Searched refs:fh1 (Results 1 – 25 of 790) sorted by relevance

12345678910>>...32

/dports/sysutils/testdisk/testdisk-7.1/src/
H A Dfatn.c54 wprintw(stdscr,"cluster_size %u\n", fh1->sectors_per_cluster); in dump_fat_info_ncurses()
55 wprintw(stdscr,"reserved %u\n", le16(fh1->reserved)); in dump_fat_info_ncurses()
56 if(fat_sectors(fh1)!=0) in dump_fat_info_ncurses()
57 wprintw(stdscr,"sectors %u\n", fat_sectors(fh1)); in dump_fat_info_ncurses()
58 if(le32(fh1->total_sect)!=0) in dump_fat_info_ncurses()
64 wprintw(stdscr,"flags %04X\n", le16(fh1->flags)); in dump_fat_info_ncurses()
65 wprintw(stdscr,"version %u.%u\n", fh1->version[0], fh1->version[1]); in dump_fat_info_ncurses()
78 wprintw(stdscr,"fat_length %u\n", le16(fh1->fat_length)); in dump_fat_info_ncurses()
79 wprintw(stdscr,"dir_entries %u\n", get_dir_entries(fh1)); in dump_fat_info_ncurses()
103 if(fat_sectors(fh1)!=0 || fat_sectors(fh2)!=0) in dump_2fat_info_ncurses()
[all …]
H A Dfat.c63 log_info("sector_size %u\n", fat_sector_size(fh1)); in log_fat_info()
65 log_info("reserved %u\n", le16(fh1->reserved)); in log_fat_info()
66 log_info("fats %u\n", fh1->fats); in log_fat_info()
67 log_info("dir_entries %u\n", get_dir_entries(fh1)); in log_fat_info()
68 log_info("sectors %u\n", fat_sectors(fh1)); in log_fat_info()
69 log_info("media %02X\n", fh1->media); in log_fat_info()
70 log_info("fat_length %u\n", le16(fh1->fat_length)); in log_fat_info()
71 log_info("secs_track %u\n", le16(fh1->secs_track)); in log_fat_info()
72 log_info("heads %u\n", le16(fh1->heads)); in log_fat_info()
79 log_info("version %u.%u\n", fh1->version[0], fh1->version[1]); in log_fat_info()
[all …]
/dports/devel/p5-FileHandle-Unget/FileHandle-Unget-0.1634/t/
H A Dgensym.t16 my $fh1 = gensym;
17 open $fh1, ">" . $tmp->filename;
24 $fh = new FileHandle::Unget($fh1);
39 my $fh1 = gensym;
40 open $fh1, "<" . $tmp->filename;
63 my $fh1 = gensym;
64 open $fh1, "<" . $tmp->filename;
87 my $fh1 = gensym;
88 open $fh1, "<" . $tmp->filename;
108 my $fh1 = gensym;
[all …]
H A Dinput_record_separator.t21 my $line1 = <$fh1>;
27 my $line2 = <$fh1>;
32 $fh1->close;
40 my $line1 = <$fh1>;
45 $fh1->input_record_separator("\n");
48 my $line2 = <$fh1>;
53 $fh1->ungets($line2);
55 my $line3 = <$fh1>;
60 $fh1->close;
74 my $line1 = <$fh1>;
[all …]
H A Dnew.t14 my $fh = new FileHandle::Unget($fh1);
18 $fh1 = new FileHandle(">>" . $tmp->filename);
19 $fh = new FileHandle::Unget($fh1);
31 my $fh1 = new FileHandle($tmp->filename);
32 my $fh = new FileHandle::Unget($fh1);
50 my $fh1 = new FileHandle($tmp->filename);
51 my $fh = new FileHandle::Unget($fh1);
69 my $fh1 = new FileHandle($tmp->filename);
70 my $fh = new FileHandle::Unget($fh1);
85 my $fh1 = new FileHandle($tmp->filename);
[all …]
H A Dmultiple_handles.t17 my $fh1 = new FileHandle::Unget($tmp->filename);
20 my $line = <$fh1>;
23 $fh1->ungets("inserted 1\n");
26 $line = <$fh1>;
34 $line = <$fh1>;
42 $fh1->close;
/dports/textproc/p5-Perl-Critic/Perl-Critic-1.140/t/InputOutput/
H A DRequireBriefOpen.run6 close $fh1;
24 $fh1->close;
45 while (<$fh1>) {
48 close $fh1;
91 close $fh1;
140 local (*fh1);
189 close $fh1;
207 close $fh1;
218 close $fh1;
233 close $fh1;
[all …]
/dports/sysutils/hfsutils/hfsutils-3.2.6/test/
H A Dtest1.tcl68 set fh1 [$curvol open $file1]
71 $fh1 fork data
75 set data [$fh1 read [string length $block]]
77 error "$fh1 ($file1) fork data block $i differs"
86 if {[string length [$fh1 read 1]]} {
87 error "$fh1 ($file1) bad data fork length"
95 $fh1 fork rsrc
99 set data [$fh1 read [string length $block]]
110 if {[string length [$fh1 read 1]]} {
111 error "$fh1 ($file1) bad resource fork length"
[all …]
/dports/textproc/p5-Perl-Lint/Perl-Lint-0.25/t/Policy/InputOutput/
H A Drequire_brief_open.t28 close $fh1;
45 $fh1->close;
64 while (<$fh1>) {
67 close $fh1;
107 close $fh1;
151 local (*fh1);
196 close $fh1;
213 close $fh1;
222 close $fh1;
236 close $fh1;
[all …]
/dports/lang/perl5-devel/perl5-5.35.4-102-ge43d289c7c/ext/PerlIO-via/t/
H A Dvia.t85 ok(open(my $fh1, ">", $tmp), "open $tmp");
86 ok(binmode($fh1, ":via(XXX)"), "binmode :via(XXX) onto it");
87 ok(open(my $fh2, ">&", $fh1), "dup it");
88 close $fh1;
92 ok(open($fh1, ">", $tmp), "open $tmp");
93 ok(binmode($fh1, ":via(YYY)"), "binmode :via(YYY) onto it");
94 ok(open($fh2, ">&", $fh1), "dup it");
96 close $fh1;
99 ok(open($fh1, "<", $tmp), "open $tmp for check");
100 { local $/; $b = <$fh1> }
[all …]
/dports/lang/perl5.34/perl-5.34.0/ext/PerlIO-via/t/
H A Dvia.t89 ok(open(my $fh1, ">", $tmp), "open $tmp");
90 ok(binmode($fh1, ":via(XXX)"), "binmode :via(XXX) onto it");
91 ok(open(my $fh2, ">&", $fh1), "dup it");
92 close $fh1;
96 ok(open($fh1, ">", $tmp), "open $tmp");
97 ok(binmode($fh1, ":via(YYY)"), "binmode :via(YYY) onto it");
98 ok(open($fh2, ">&", $fh1), "dup it");
100 close $fh1;
103 ok(open($fh1, "<", $tmp), "open $tmp for check");
104 { local $/; $b = <$fh1> }
[all …]
/dports/lang/perl5.30/perl-5.30.3/ext/PerlIO-via/t/
H A Dvia.t89 ok(open(my $fh1, ">", $tmp), "open $tmp");
90 ok(binmode($fh1, ":via(XXX)"), "binmode :via(XXX) onto it");
91 ok(open(my $fh2, ">&", $fh1), "dup it");
92 close $fh1;
96 ok(open($fh1, ">", $tmp), "open $tmp");
97 ok(binmode($fh1, ":via(YYY)"), "binmode :via(YYY) onto it");
98 ok(open($fh2, ">&", $fh1), "dup it");
100 close $fh1;
103 ok(open($fh1, "<", $tmp), "open $tmp for check");
104 { local $/; $b = <$fh1> }
[all …]
/dports/lang/perl5.32/perl-5.32.1/ext/PerlIO-via/t/
H A Dvia.t89 ok(open(my $fh1, ">", $tmp), "open $tmp");
90 ok(binmode($fh1, ":via(XXX)"), "binmode :via(XXX) onto it");
91 ok(open(my $fh2, ">&", $fh1), "dup it");
92 close $fh1;
96 ok(open($fh1, ">", $tmp), "open $tmp");
97 ok(binmode($fh1, ":via(YYY)"), "binmode :via(YYY) onto it");
98 ok(open($fh2, ">&", $fh1), "dup it");
100 close $fh1;
103 ok(open($fh1, "<", $tmp), "open $tmp for check");
104 { local $/; $b = <$fh1> }
[all …]
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/nwpw/pspw/water_pseudopotential/
H A DBLCJ_Inter.F212 fh1(1) = fh1(1) - ((rh1(1)-rph1(1))/r11) * tmp
213 fh1(2) = fh1(2) - ((rh1(2)-rph1(2))/r11) * tmp
214 fh1(3) = fh1(3) - ((rh1(3)-rph1(3))/r11) * tmp
221 fh1(1) = fh1(1) - ((rh1(1)-rph2(1))/r12) * tmp
222 fh1(2) = fh1(2) - ((rh1(2)-rph2(2))/r12) * tmp
223 fh1(3) = fh1(3) - ((rh1(3)-rph2(3))/r12) * tmp
299 fh1(1) = fh1(1) - ((rh1(1)-rph1(1))/r11) * tmp
300 fh1(2) = fh1(2) - ((rh1(2)-rph1(2))/r11) * tmp
368 fh1(1) = fh1(1) - ((rh1(1)-rpo(1))/r1o) * tmp
369 fh1(2) = fh1(2) - ((rh1(2)-rpo(2))/r1o) * tmp
[all …]
/dports/science/nwchem-data/nwchem-7.0.2-release/src/nwpw/pspw/water_pseudopotential/
H A DBLCJ_Inter.F212 fh1(1) = fh1(1) - ((rh1(1)-rph1(1))/r11) * tmp
213 fh1(2) = fh1(2) - ((rh1(2)-rph1(2))/r11) * tmp
214 fh1(3) = fh1(3) - ((rh1(3)-rph1(3))/r11) * tmp
221 fh1(1) = fh1(1) - ((rh1(1)-rph2(1))/r12) * tmp
222 fh1(2) = fh1(2) - ((rh1(2)-rph2(2))/r12) * tmp
223 fh1(3) = fh1(3) - ((rh1(3)-rph2(3))/r12) * tmp
299 fh1(1) = fh1(1) - ((rh1(1)-rph1(1))/r11) * tmp
300 fh1(2) = fh1(2) - ((rh1(2)-rph1(2))/r11) * tmp
368 fh1(1) = fh1(1) - ((rh1(1)-rpo(1))/r1o) * tmp
369 fh1(2) = fh1(2) - ((rh1(2)-rpo(2))/r1o) * tmp
[all …]
/dports/www/p5-HTML-GenToc/HTML-GenToc-3.20/t/
H A Dcompare.pl9 my $fh1 = undef;
11 open($fh1, $file1) || return 0;
16 while (<$fh1>)
30 close($fh1);
41 close($fh1);
46 close($fh1);
/dports/devel/py-llfuse/llfuse-1.3.8/rst/
H A Dgotchas.rst16 with open('mnt/file_one', 'w+') as fh1:
17 fh1.write('foo')
18 fh1.flush()
23 os.close(os.dup(fh1.fileno()))
24 fh1.seek(0)
25 assert fh1.read() == 'foobar'
/dports/math/octave/octave-6.4.0/test/nest/
H A Dnest.tst93 %! fh1 = nst1 (13);
97 %! assert (fh1 (), 13);
101 %! assert (fh1 (42), 42);
106 %! assert (fh1 (), 42);
114 %! fh1 = nst2 (13);
118 %! assert (fh1 (), 13);
122 %! assert (fh1 (42), 42);
127 %! assert (fh1 (), pi);
133 %! fh1 = nst3 (13);
137 %! assert (fh1 (), 13);
[all …]
/dports/net/mpich/mpich-3.4.3/src/mpi/errhan/
H A Dfile_call_errhandler.c102 void *fh1 = (void *) &fh; in MPI_File_call_errhandler() local
103 (*MPIR_Process.cxx_call_errfn) (1, fh1, &errorcode, in MPI_File_call_errhandler()
116 void *fh1 = (void *) &fh; in MPI_File_call_errhandler() local
119 (*e->errfn.F77_Handler_function) (fh1, &ferr); in MPI_File_call_errhandler()
150 void *fh1 = (void *) fh; in MPIR_File_call_cxx_errhandler() local
151 (*MPIR_Process.cxx_call_errfn) (1, fh1, errorcode, (void (*)(void)) c_errhandler); in MPIR_File_call_cxx_errhandler()
/dports/net/mpich2/mpich2-1.5/src/mpi/errhan/
H A Dfile_call_errhandler.c108 { void *fh1 = (void *)&fh; in MPI_File_call_errhandler() local
109 (*MPIR_Process.cxx_call_errfn)( 1, fh1, &errorcode, in MPI_File_call_errhandler()
121 { void *fh1 = (void *)&fh; in MPI_File_call_errhandler() local
124 (*e->errfn.F77_Handler_function)( fh1, &ferr ); in MPI_File_call_errhandler()
159 void *fh1 = (void *)fh; in MPIR_File_call_cxx_errhandler() local
160 (*MPIR_Process.cxx_call_errfn)( 1, fh1, errorcode, (void(*)(void))c_errhandler ); in MPIR_File_call_cxx_errhandler()
/dports/lang/perl5.34/perl-5.34.0/cpan/Pod-Usage/t/pod/
H A Dtestcmp.pl51 my ($fh1, $fh2) = ($file1, $file2);
52 unless (ref $fh1) {
53 $fh1 = FileHandle->new($file1, "r") or die "Can't open $file1: $!";
64 defined($f1text = <$fh1>) and chomp($f1text);
75 close($fh1) unless (ref $file1);
/dports/lang/perl5.34/perl-5.34.0/cpan/Pod-Checker/t/pod/
H A Dtestcmp.pl51 my ($fh1, $fh2) = ($file1, $file2);
52 unless (ref $fh1) {
53 $fh1 = FileHandle->new($file1, "r") or die "Can't open $file1: $!";
64 defined($f1text = <$fh1>) and chomp($f1text);
75 close($fh1) unless (ref $file1);
/dports/lang/perl5.30/perl-5.30.3/cpan/Pod-Parser/t/pod/
H A Dtestcmp.pl51 my ($fh1, $fh2) = ($file1, $file2);
52 unless (ref $fh1) {
53 $fh1 = FileHandle->new($file1, "r") or die "Can't open $file1: $!";
64 defined($f1text = <$fh1>) and chomp($f1text);
75 close($fh1) unless (ref $file1);
/dports/lang/perl5.30/perl-5.30.3/cpan/Pod-Checker/t/pod/
H A Dtestcmp.pl51 my ($fh1, $fh2) = ($file1, $file2);
52 unless (ref $fh1) {
53 $fh1 = FileHandle->new($file1, "r") or die "Can't open $file1: $!";
64 defined($f1text = <$fh1>) and chomp($f1text);
75 close($fh1) unless (ref $file1);
/dports/lang/perl5.30/perl-5.30.3/cpan/Pod-Usage/t/pod/
H A Dtestcmp.pl51 my ($fh1, $fh2) = ($file1, $file2);
52 unless (ref $fh1) {
53 $fh1 = FileHandle->new($file1, "r") or die "Can't open $file1: $!";
64 defined($f1text = <$fh1>) and chomp($f1text);
75 close($fh1) unless (ref $file1);

12345678910>>...32