# $Id: Darwin.pm~,v 1.1 2007/10/02 09:48:54 drhyde Exp $

package Devel::AssertOS::Darwin;

use Devel::CheckOS qw(die_unsupported);

$VERSION = '1.0';

sub os_is { $^O eq 'darwin' ? 1 : 0; }

die_unsupported() unless(os_is());

1;