From 36ea288cc78dedaadd1d3b38331489646be26626 Mon Sep 17 00:00:00 2001 From: Jesse Luehrs Date: Tue, 14 Jun 2011 16:04:36 -0500 Subject: remove test numbers --- t/10-inlining.t | 147 -------------------------------------------------------- 1 file changed, 147 deletions(-) delete mode 100644 t/10-inlining.t (limited to 't/10-inlining.t') diff --git a/t/10-inlining.t b/t/10-inlining.t deleted file mode 100644 index cb1b8d8..0000000 --- a/t/10-inlining.t +++ /dev/null @@ -1,147 +0,0 @@ -#!/usr/bin/env perl -use strict; -use warnings; -use Test::More; - -{ - package Foo; - use Moose; - use Bread::Board::Declare; - - has foo => ( - reader => 'get_foo', - writer => 'set_foo', - accessor => 'foo', - predicate => 'has_foo', - clearer => 'clear_foo', - value => 'foo', - ); - - has bool => ( - traits => ['Bool'], - isa => 'Bool', - value => 0, - handles => { - bool_unset => 'unset', - bool_set => 'set', - bool_not => 'not', - bool_toggle => 'toggle', - }, - ); - - has string => ( - traits => ['String'], - isa => 'Str', - value => '', - default => '', # XXX: ugh, needed because of the default_default stuff - handles => { - string_prepend => 'prepend', - string_chop => 'chop', - string_substr => 'substr', - string_match => 'match', - string_length => 'length', - string_inc => 'inc', - string_append => 'append', - string_clear => 'clear', - string_chomp => 'chomp', - string_replace => 'replace', - }, - ); - - has hash => ( - traits => ['Hash'], - isa => 'HashRef', - block => sub { {} }, - handles => { - hash_delete => 'delete', - hash_exists => 'exists', - hash_values => 'values', - hash_get => 'get', - hash_set => 'set', - hash_is_empty => 'is_empty', - hash_keys => 'keys', - hash_elements => 'elements', - hash_kv => 'kv', - hash_defined => 'defined', - hash_accessor => 'accessor', - hash_count => 'count', - hash_clear => 'clear', - }, - ); - - has counter => ( - traits => ['Counter'], - isa => 'Int', - value => 0, - default => 0, # XXX: ugh, needed because of the default_default stuff - handles => { - counter_set => 'set', - counter_reset => 'reset', - counter_inc => 'inc', - counter_dec => 'dec', - }, - ); - - has code => ( - traits => ['Code'], - isa => 'CodeRef', - block => sub { sub { } }, - handles => { - code_execute => 'execute', - code_execute_method => 'execute_method', - }, - ); - - has array => ( - traits => ['Array'], - isa => 'ArrayRef', - block => sub { [] }, - handles => { - array_unshift => 'unshift', - array_shuffle => 'shuffle', - array_delete => 'delete', - array_get => 'get', - array_set => 'set', - array_uniq => 'uniq', - array_is_empty => 'is_empty', - array_shift => 'shift', - array_grep => 'grep', - array_sort_in_place => 'sort_in_place', - array_sort => 'sort', - array_elements => 'elements', - array_pop => 'pop', - array_reduce => 'reduce', - array_insert => 'insert', - array_join => 'join', - array_first => 'first', - array_natatime => 'natatime', - array_accessor => 'accessor', - array_count => 'count', - array_map => 'map', - array_push => 'push', - array_clear => 'clear', - array_splice => 'splice', - }, - ); - - has number => ( - traits => ['Number'], - isa => 'Num', - value => 1, - handles => { - number_add => 'add', - number_set => 'set', - number_sub => 'sub', - number_mul => 'mul', - number_mod => 'mod', - number_abs => 'abs', - number_div => 'div', - }, - ); - - __PACKAGE__->meta->make_immutable; -} - -pass("everything compiled successfully"); - -done_testing; -- cgit v1.2.3-54-g00ecf