10
  /   ˆl–Ü4ý(TÊ:”Ê‚fàq—ÔÅ£ÂƒO³_‹uÐb&=LV[(ÀÅ Õ    use strict;
use warnings;

package Test::Deep::RegexpRef 1.204;

use Test::Deep::Ref;
use Test::Deep::RegexpVersion;

sub init
{
  my $self = shift;

  my $val = shift;

  $self->{val} = $val;
}

sub descend
{
  my $self = shift;

  my $got = shift;

  my $exp = $self->{val};

  if ($Test::Deep::RegexpVersion::OldStyle) {
    return 0 unless $self->test_class($got, "Regexp");
    return 0 unless $self->test_reftype($got, "SCALAR");
  } else {
    return 0 unless $self->test_reftype($got, "REGEXP");
  }

  return Test::Deep::descend($got, Test::Deep::regexprefonly($exp));
}

sub renderGot
{
  my $self = shift;

  return shift()."";
}

1;

__END__

=pod

=encoding UTF-8

=head1 NAME

Test::Deep::RegexpRef

=head1 VERSION

version 1.204

=head1 PERL VERSION

This library should run on perls released even a long time ago.  It should work
on any version of perl released in the last five years.

Although it may work on older versions of perl, no guarantee is made that the
minimum required version will not be increased.  The version may be increased
for any reason, and there is no promise that patches will be accepted to lower
the minimum required perl.

=head1 AUTHORS

=over 4

=item *

Fergal Daly

=item *

Ricardo SIGNES <cpan@semiotic.systems>

=back

=head1 COPYRIGHT AND LICENSE

This software is copyright (c) 2003 by Fergal Daly.

This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.

=cut
     	ˆ0ÇÀÅ  .   ˆl–ßi~”d*hŠq@‚àž¸&ÔÅ£Äƒoƒ_ŠI|¥+õJi¿ÂÇ 
    #
# Configuration for the VIA8237 chip with 4/6 multi-channel support
#

<confdir:pcm/front.conf>

VIA8237.pcm.front.!0 {
	@args [ CARD ]
	@args.CARD {
		type string
	}
	type hw
	card $CARD
}

# default with softvol/dsnoop
# VIA8237 supports multi-playback
VIA8237.pcm.!default {
	@args [ CARD ]
	@args.CARD {
		type string
	}
	type asym
	playback.pcm {
		type plug
		slave.pcm {
			type softvol
			slave.pcm {
				type hw
				card $CARD
			}
			control {
				name "PCM Playback Volume"
				card $CARD
			}
		}
	}
	capture.pcm {
		type plug
		slave.pcm {
			@func concat
			strings [ "dsnoop:" $CARD ]
		}
	}
}

<confdir:pcm/surround40.conf>

VIA8237.pcm.surround40.!0 {
	@args [ CARD ]
	@args.CARD {
		type string
	}
	type hooks
	slave.pcm {
		type hw
		card $CARD
		device 1
		channels 4
	}
	hooks.0 {
		type ctl_elems
		hook_args [
			{
				name "Channel Mode"
				preserve true
				value "4ch"
				lock true
				optional true
			}
			{
				name "Surround Down Mix"
				preserve true
				value off
				lock true
				optional true
			}
		]
	}
}

<confdir:pcm/surround21.conf>
<confdir:pcm/surround41.conf>
<confdir:pcm/surround50.conf>
<confdir:pcm/surround51.conf>

VIA8237.pcm.surround51.!0 {
	@args [ CARD ]
	@args.CARD {
		type string
	}
	type route
	ttable.0.0 1
	ttable.1.1 1
	ttable.2.4 1
	ttable.3.5 1
	ttable.4.2 1
	ttable.5.3 1
	slave.pcm {
		type hooks
		slave.pcm {
			type hw
			card $CARD
			device 1
			channels 6
		}
		hooks.0 {
			type ctl_elems
			hook_args [
				{
					name "Channel Mode"
					preserve true
					value "6ch"
					lock true
					optional true
				}
				{
					name "Surround Down Mix"
					preserve true
					value off
					lock true
					optional true
				}
				{
					name "Center/LFE Down Mix"
					preserve true
					value off
					lock true
					optional true
				}
			]
		}
	}
	slave.channels 6
}

<confdir:pcm/iec958.conf>

VIA8237.pcm.iec958.!0 {
	@args [ CARD AES0 AES1 AES2 AES3 ]
	@args.CARD {
		type string
	}
	@args.AES0 {
		type integer
	}
	@args.AES1 {
		type integer
	}
	@args.AES2 {
		type integer
	}
	@args.AES3 {
		type integer
	}
	type hooks
	slave.pcm {
		type hw
		card $CARD
		subdevice 3
	}
	hooks.0 {
		type ctl_elems
		hook_args [
			{
				name "IEC958 Playback AC97-SPSA"
				lock true
				preserve true
				value 3
			}
			{
				name "IEC958 Playback Default"
				lock true
				preserve true
				value [ $AES0 $AES1 $AES2 $AES3 ]
			}
			{
				name "IEC958 Playback Switch"
				lock true