mirror of
https://github.com/logos-messaging/negentropy.git
synced 2026-01-02 22:13:10 +00:00
22 lines
382 B
Perl
22 lines
382 B
Perl
package Utils;
|
|
|
|
use strict;
|
|
|
|
|
|
sub harnessTypeToCmd {
|
|
my $harnessType = shift;
|
|
|
|
if ($harnessType eq 'cpp') {
|
|
return './cpp/harness';
|
|
} elsif ($harnessType eq 'js') {
|
|
return 'node js/harness.js';
|
|
} elsif ($harnessType eq 'rust') {
|
|
return '../../rust-negentropy/target/debug/harness';
|
|
}
|
|
|
|
die "unknown harness type: $harnessType";
|
|
}
|
|
|
|
|
|
1;
|