/usr/local/CPAN/perl-lisp/Lisp/Special.pm

• package Lisp::Special
  • make_special
  • specialp
• EOF

package Lisp::Special;

# special forms are perl code references that are blessed into
# this package.

use strict;
use vars qw(@EXPORT_OK);

require Exporter;
*import = \&Exporter::import;
@EXPORT_OK = qw(make_special specialp);

sub make_special
{
    bless $_[0], "Lisp::Special";
}

sub specialp
{
    UNIVERSAL::isa($_[0], "Lisp::Special");
}


1;