ridv/australis
1
0
Fork 0
Code Issues Pull requests Projects Releases 16 Packages Wiki Activity Actions

Upgrading dependencies to gorealis v2 and thrift 0.12.0

Browse source
This commit is contained in:
Renan DelValle 2018-12-26 17:25:59 -08:00
parent 7cbbea498b
commit 54b8d7942a
No known key found for this signature in database
GPG key ID: C240AD6D6F443EC9
1327 changed files with 137391 additions and 61476 deletions
Download patch file Download diff file Expand all files Collapse all files

12
vendor/git.apache.org/thrift.git/tutorial/perl/PerlClient.pl generated vendored
View file

@ -37,10 +37,10 @@ use tutorial::Types;
use Data::Dumper;
my $socket = new Thrift::Socket('localhost',9090);
my $transport = new Thrift::BufferedTransport($socket,1024,1024);
my $protocol = new Thrift::BinaryProtocol($transport);
my $client = new tutorial::CalculatorClient($protocol);
my $socket = Thrift::Socket->new('localhost',9090);
my $transport = Thrift::BufferedTransport->new($socket,1024,1024);
my $protocol = Thrift::BinaryProtocol->new($transport);
my $client = tutorial::CalculatorClient->new($protocol);
eval{
@ -53,7 +53,7 @@ eval{
my $sum = $client->add(1,1);
print "1+1=$sum\n";
my $work = new tutorial::Work();
my $work = tutorial::Work->new();
$work->op(tutorial::Operation::DIVIDE);
$work->num1(1);
@ -63,7 +63,7 @@ eval{
$client->calculate(1, $work);
print "Whoa! We can divide by zero?\n";
}; if($@) {
warn "InvalidOperation: ".Dumper($@);
warn 'InvalidOperation: '.Dumper($@);
}
$work->op(tutorial::Operation::SUBTRACT);