package Runops::Switch;

use strict;
use warnings;

our $VERSION = '0.04';

use DynaLoader ();
our @ISA = qw(DynaLoader);

bootstrap Runops::Switch $VERSION;



=head1 NAME

Runops::Switch - Alternate runloop for the perl interpreter


    perl -MRunops::Switch


This module provides an alternate runops loop. It's based on a large switch
statement, instead of function pointer calls like the regular perl one (in
F<run.c> in the perl source code.) I wrote it for benchmarking purposes.

=head1 AUTHOR

Written by Rafael Garcia-Suarez, based on an idea that Nicholas Clark had while
watching a talk by Leopold Toetsch. The thread is here :

This program is free software; you may redistribute it and/or modify it under
the same terms as Perl itself.