Commit | Line | Data |
495c5fdc |
1 | /* +++begin copyright+++ ******************************************* */ |
2 | /* */ |
3 | /* COPYRIGHT (c) 1997, 1998 Stratus Computer, Inc. */ |
4 | /* */ |
5 | /* This program is free software; you can redistribute it and/or */ |
6 | /* modify it under the terms of either: */ |
7 | /* */ |
8 | /* a) the GNU General Public License as published by the Free */ |
9 | /* Software Foundation; either version 1, or (at your option) any */ |
10 | /* later version, or */ |
11 | /* */ |
12 | /* b) the "Artistic License" which comes with this Kit. */ |
13 | /* */ |
14 | /* This program is distributed in the hope that it will be useful, */ |
15 | /* but WITHOUT ANY WARRANTY; without even the implied warranty of */ |
16 | /* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See either */ |
17 | /* the GNU General Public License or the Artistic License for more */ |
18 | /* details. */ |
19 | /* */ |
20 | /* You should have received a copy of the Artistic License with this */ |
21 | /* Kit, in the file named "Artistic". If not, you can get one from */ |
22 | /* the Perl distribution. */ |
23 | /* */ |
24 | /* You should also have received a copy of the GNU General Public */ |
25 | /* License along with this program; if not, you can get one from */ |
26 | /* the Perl distribution or else write to the Free Software */ |
27 | /* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA */ |
28 | /* 02111-1307, USA. */ |
29 | /* */ |
30 | /* +++end copyright+++ ********************************************* */ |
31 | |
32 | /* This program tests the code in vos_dummies.c to make sure it |
33 | works as expected. */ |
34 | |
35 | extern int dup (int _fildes); |
36 | |
37 | int t_dummies () |
38 | { |
39 | int fildes; |
40 | |
41 | fildes=3; |
42 | dup (fildes); |
43 | } |