summaryrefslogtreecommitdiffstats
path: root/t/10-inlining.t
diff options
context:
space:
mode:
authorJesse Luehrs <doy@tozt.net>2011-02-21 00:26:12 -0600
committerJesse Luehrs <doy@tozt.net>2011-02-21 00:26:12 -0600
commiteb9a0d361b37c5b3a7d750385f6b3a3300301fbc (patch)
tree7dbfc3fbc168feec1f3d9137a2a5fb767738e5fc /t/10-inlining.t
parent53013e0c04d124444c015e657c4c8c6dcbd94d45 (diff)
downloadbread-board-declare-eb9a0d361b37c5b3a7d750385f6b3a3300301fbc.tar.gz
bread-board-declare-eb9a0d361b37c5b3a7d750385f6b3a3300301fbc.zip
test all inlining
Diffstat (limited to 't/10-inlining.t')
-rw-r--r--t/10-inlining.t143
1 files changed, 143 insertions, 0 deletions
diff --git a/t/10-inlining.t b/t/10-inlining.t
new file mode 100644
index 0000000..658d42d
--- /dev/null
+++ b/t/10-inlining.t
@@ -0,0 +1,143 @@
+#!/usr/bin/env perl
+use strict;
+use warnings;
+use Test::More;
+
+{
+ package Foo;
+ use Moose;
+ use MooseX::Bread::Board;
+
+ has foo => (
+ reader => 'get_foo',
+ writer => 'set_foo',
+ accessor => 'foo',
+ predicate => 'has_foo',
+ clearer => 'clear_foo',
+ value => 'foo',
+ );
+
+ has bool => (
+ traits => ['Bool'],
+ isa => 'Bool',
+ default => 0,
+ handles => {
+ bool_unset => 'unset',
+ bool_set => 'set',
+ bool_not => 'not',
+ bool_toggle => 'toggle',
+ },
+ );
+
+ has string => (
+ traits => ['String'],
+ isa => 'Str',
+ default => '',
+ 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',
+ default => 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',
+ default => 1,
+ handles => {
+ counter_set => 'set',
+ counter_reset => 'reset',
+ counter_inc => 'inc',
+ counter_dec => 'dec',
+ },
+ );
+
+ has code => (
+ traits => ['Code'],
+ isa => 'CodeRef',
+ default => 1,
+ handles => {
+ code_execute => 'execute',
+ code_execute_method => 'execute_method',
+ },
+ );
+
+ has array => (
+ traits => ['Array'],
+ isa => 'ArrayRef',
+ default => 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',
+ default => 1,
+ handles => {
+ number_add => 'add',
+ number_set => 'set',
+ number_sub => 'sub',
+ number_mul => 'mul',
+ number_mod => 'mod',
+ number_abs => 'abs',
+ number_div => 'div',
+ },
+ );
+}
+
+pass("everything compiled successfully");
+
+done_testing;