unsupported
lm_J*j"T~jbѿ
0
w [
Index of /anon_sym/anon/sys/dev/char/5:2/subsystem/tty0
Index of /anon_sym/anon/sys/dev/char/5:2/subsystem/tty0
File not found.
!
Mam_J*j"T~ӊbѿ
Index of /FSS-OZR/root/sys/dev/char/4:12/subsystem/tty55
Index of /FSS-OZR/root/sys/dev/char/4:12/subsystem/tty55
1 lze67yLZ7
_ ub
&=LV[( ?b package Opcode;
use 5.006_001;
use strict;
our($VERSION, @ISA, @EXPORT_OK);
$VERSION = "1.48";
use Carp;
use Exporter ();
use XSLoader;
BEGIN {
@ISA = qw(Exporter);
@EXPORT_OK = qw(
opset ops_to_opset
opset_to_ops opset_to_hex invert_opset
empty_opset full_opset
opdesc opcodes opmask define_optag
opmask_add verify_opset opdump
);
}
sub opset (;@);
sub opset_to_hex ($);
sub opdump (;$);
use subs @EXPORT_OK;
XSLoader::load();
_init_optags();
sub ops_to_opset { opset @_ } # alias for old name
sub opset_to_hex ($) {
return "(invalid opset)" unless verify_opset($_[0]);
unpack("h*",$_[0]);
}
sub opdump (;$) {
my $pat = shift;
# handy utility: perl -MOpcode=opdump -e 'opdump File'
foreach(opset_to_ops(full_opset)) {
my $