ryanerwin

unit class SMTPd;
use IO::Socket::Async::SSL;
has $.port;
has $.debug;
has $.raw;
has $.socket;
has $.tls;
has $.ssl;
has $.plain;

ryanerwin

unit class SMTPd;
use IO::Socket::Async::SSL;
has $.port;
has $.debug;
has $.raw;
has $.socket;
has $.tls;
has $.ssl;
has $.plain;

ryanerwin

use Perl6::Grammar;
use Perl6::Actions;
use Perl6::Compiler;

class Perl6::DebugHooks {
    has %!hooks;
    has $!suspended;
    
    method set_hook($name, $callback) {
        $*W.add_object($callback);