# HG changeset patch # User Sergey Kandaurov # Date 1432031156 -10800 # Node ID dc97097100a5b7789f2d85b5fe18fa1adbdce9e3 # Parent 8593f34a12e5a5c0a86c7bcbb09b5c4bb0922663 Tests: upstream_hash_memcached.t TODOs on big-endian. diff --git a/upstream_hash_memcached.t b/upstream_hash_memcached.t --- a/upstream_hash_memcached.t +++ b/upstream_hash_memcached.t @@ -13,6 +13,8 @@ use strict; use Test::More; +use Config; + BEGIN { use FindBin; chdir($FindBin::Bin); } use lib 'lib'; @@ -135,8 +137,14 @@ is_deeply(ngx('/'), mem($memd), 'cache:: $memd = new Cache::Memcached::Fast({ ketama_points => 160, servers => [ '127.0.0.1:8081', '127.0.0.1:8082', '127.0.0.1:8083'] }); +TODO: { +local $TODO = 'not yet' unless $Config{byteorder} eq '12345678' + or $t->has_version('1.9.1'); + is_deeply(ngx('/c'), mem($memd), 'cache::memcached::fast'); +} + $memd = new Cache::Memcached(servers => [ [ '127.0.0.1:8081', 2 ], [ '127.0.0.1:8082', 3 ], @@ -149,8 +157,14 @@ is_deeply(ngx('/w'), mem($memd), 'cache: { address => '127.0.0.1:8082', weight => 3 }, { address => '127.0.0.1:8083', weight => 1 }] }); +TODO: { +local $TODO = 'not yet' unless $Config{byteorder} eq '12345678' + or $t->has_version('1.9.1'); + is_deeply(ngx('/cw'), mem($memd), 'cache::memcached::fast weight'); +} + ############################################################################### sub ngx {