~drizzle-trunk/drizzle/development

« back to all changes in this revision

Viewing changes to lib/GenTest.pm

Adjustments after merge

Show diffs side-by-side

added added

removed removed

Lines of Context:
18
18
package GenTest;
19
19
use base 'Exporter';
20
20
 
21
 
@EXPORT = ('say', 'sayFile', 'tmpdir', 'safe_exit', 'windows', 'linux',
22
 
           'solaris', 'isoTimestamp', 'isoUTCTimestamp', 'rqg_debug');
 
21
@EXPORT = ('say', 'sayFile', 'tmpdir', 'safe_exit', 'osWindows', 'osLinux',
 
22
           'osSolaris', 'isoTimestamp', 'isoUTCTimestamp', 'rqg_debug');
23
23
 
24
24
use strict;
25
25
 
112
112
        POSIX::_exit($exit_status);
113
113
}
114
114
 
115
 
sub windows {
 
115
sub osWindows {
116
116
        if (
117
117
                ($^O eq 'MSWin32') ||
118
118
                ($^O eq 'MSWin64')
123
123
        }       
124
124
}
125
125
 
126
 
sub linux {
 
126
sub osLinux {
127
127
        if ($^O eq 'linux') {
128
128
                return 1;
129
129
        } else {
131
131
        }
132
132
}
133
133
 
134
 
sub solaris {
 
134
sub osSolaris {
135
135
        if ($^O eq 'solaris') {
136
136
                return 1;
137
137
        } else {