Menu
▾
▴
openwebwork-cvs
|
From: dpvc v. a. <we...@ma...> - 2008-06-14 12:31:19
|
Log Message:
-----------
Added
no strict "refs"
to try to avoid new error checking in Perl 5.10.
Modified Files:
--------------
pg/lib:
Value.pm
Parser.pm
pg/lib/Value:
Complex.pm
Formula.pm
Infinity.pm
Interval.pm
List.pm
Matrix.pm
Point.pm
Real.pm
Set.pm
String.pm
Union.pm
Vector.pm
pg/lib/Parser:
BOP.pm
Complex.pm
Constant.pm
Context.pm
Function.pm
Item.pm
List.pm
Number.pm
String.pm
UOP.pm
Value.pm
Variable.pm
Revision Data
-------------
Index: Value.pm
===================================================================
RCS file: /webwork/cvs/system/pg/lib/Value.pm,v
retrieving revision 1.92
retrieving revision 1.93
diff -Llib/Value.pm -Llib/Value.pm -u -r1.92 -r1.93
--- lib/Value.pm
+++ lib/Value.pm
@@ -2,7 +2,7 @@
my $pkg = 'Value';
use vars qw($context $defaultContext %Type);
use Scalar::Util;
-use strict;
+use strict; no strict "refs";
=head1 DESCRIPTION
Index: Parser.pm
===================================================================
RCS file: /webwork/cvs/system/pg/lib/Parser.pm,v
retrieving revision 1.48
retrieving revision 1.49
diff -Llib/Parser.pm -Llib/Parser.pm -u -r1.48 -r1.49
--- lib/Parser.pm
+++ lib/Parser.pm
@@ -1,6 +1,6 @@
package Parser;
my $pkg = "Parser";
-use strict;
+use strict; no strict "refs";
BEGIN {
#
Index: Real.pm
===================================================================
RCS file: /webwork/cvs/system/pg/lib/Value/Real.pm,v
retrieving revision 1.41
retrieving revision 1.42
diff -Llib/Value/Real.pm -Llib/Value/Real.pm -u -r1.41 -r1.42
--- lib/Value/Real.pm
+++ lib/Value/Real.pm
@@ -6,7 +6,7 @@
package Value::Real;
my $pkg = 'Value::Real';
-use strict;
+use strict; no strict "refs";
our @ISA = qw(Value);
#
Index: Complex.pm
===================================================================
RCS file: /webwork/cvs/system/pg/lib/Value/Complex.pm,v
retrieving revision 1.36
retrieving revision 1.37
diff -Llib/Value/Complex.pm -Llib/Value/Complex.pm -u -r1.36 -r1.37
--- lib/Value/Complex.pm
+++ lib/Value/Complex.pm
@@ -3,7 +3,7 @@
package Value::Complex;
my $pkg = 'Value::Complex';
-use strict;
+use strict; no strict "refs";
our @ISA = qw(Value);
our $i; our $pi;
Index: List.pm
===================================================================
RCS file: /webwork/cvs/system/pg/lib/Value/List.pm,v
retrieving revision 1.27
retrieving revision 1.28
diff -Llib/Value/List.pm -Llib/Value/List.pm -u -r1.27 -r1.28
--- lib/Value/List.pm
+++ lib/Value/List.pm
@@ -5,7 +5,7 @@
package Value::List;
my $pkg = 'Value::List';
-use strict;
+use strict; no strict "refs";
our @ISA = qw(Value);
#
Index: String.pm
===================================================================
RCS file: /webwork/cvs/system/pg/lib/Value/String.pm,v
retrieving revision 1.16
retrieving revision 1.17
diff -Llib/Value/String.pm -Llib/Value/String.pm -u -r1.16 -r1.17
--- lib/Value/String.pm
+++ lib/Value/String.pm
@@ -3,7 +3,7 @@
package Value::String;
my $pkg = 'Value::String';
-use strict;
+use strict; no strict "refs";
our @ISA = qw(Value);
#
Index: Union.pm
===================================================================
RCS file: /webwork/cvs/system/pg/lib/Value/Union.pm,v
retrieving revision 1.42
retrieving revision 1.43
diff -Llib/Value/Union.pm -Llib/Value/Union.pm -u -r1.42 -r1.43
--- lib/Value/Union.pm
+++ lib/Value/Union.pm
@@ -3,7 +3,7 @@
package Value::Union;
my $pkg = 'Value::Union';
-use strict;
+use strict; no strict "refs";
our @ISA = qw(Value);
#
Index: Infinity.pm
===================================================================
RCS file: /webwork/cvs/system/pg/lib/Value/Infinity.pm,v
retrieving revision 1.17
retrieving revision 1.18
diff -Llib/Value/Infinity.pm -Llib/Value/Infinity.pm -u -r1.17 -r1.18
--- lib/Value/Infinity.pm
+++ lib/Value/Infinity.pm
@@ -3,7 +3,7 @@
package Value::Infinity;
my $pkg = 'Value::Infinity';
-use strict;
+use strict; no strict "refs";
our @ISA = qw(Value);
#
Index: Vector.pm
===================================================================
RCS file: /webwork/cvs/system/pg/lib/Value/Vector.pm,v
retrieving revision 1.38
retrieving revision 1.39
diff -Llib/Value/Vector.pm -Llib/Value/Vector.pm -u -r1.38 -r1.39
--- lib/Value/Vector.pm
+++ lib/Value/Vector.pm
@@ -5,7 +5,7 @@
package Value::Vector;
my $pkg = 'Value::Vector';
-use strict;
+use strict; no strict "refs";
our @ISA = qw(Value);
#
Index: Set.pm
===================================================================
RCS file: /webwork/cvs/system/pg/lib/Value/Set.pm,v
retrieving revision 1.21
retrieving revision 1.22
diff -Llib/Value/Set.pm -Llib/Value/Set.pm -u -r1.21 -r1.22
--- lib/Value/Set.pm
+++ lib/Value/Set.pm
@@ -3,7 +3,7 @@
package Value::Set;
my $pkg = 'Value::Set';
-use strict;
+use strict; no strict "refs";
our @ISA = qw(Value);
# Convert a value to a Set. The value can be
Index: Formula.pm
===================================================================
RCS file: /webwork/cvs/system/pg/lib/Value/Formula.pm,v
retrieving revision 1.60
retrieving revision 1.61
diff -Llib/Value/Formula.pm -Llib/Value/Formula.pm -u -r1.60 -r1.61
--- lib/Value/Formula.pm
+++ lib/Value/Formula.pm
@@ -5,7 +5,7 @@
package Value::Formula;
my $pkg = 'Value::Formula';
-use strict;
+use strict; no strict "refs";
our @ISA = qw(Parser Value);
my $UNDEF = bless {}, "UNDEF"; # used for undefined points
Index: Interval.pm
===================================================================
RCS file: /webwork/cvs/system/pg/lib/Value/Interval.pm,v
retrieving revision 1.43
retrieving revision 1.44
diff -Llib/Value/Interval.pm -Llib/Value/Interval.pm -u -r1.43 -r1.44
--- lib/Value/Interval.pm
+++ lib/Value/Interval.pm
@@ -5,7 +5,7 @@
package Value::Interval;
my $pkg = 'Value::Interval';
-use strict;
+use strict; no strict "refs";
our @ISA = qw(Value);
#
Index: Matrix.pm
===================================================================
RCS file: /webwork/cvs/system/pg/lib/Value/Matrix.pm,v
retrieving revision 1.34
retrieving revision 1.35
diff -Llib/Value/Matrix.pm -Llib/Value/Matrix.pm -u -r1.34 -r1.35
--- lib/Value/Matrix.pm
+++ lib/Value/Matrix.pm
@@ -7,7 +7,7 @@
package Value::Matrix;
my $pkg = 'Value::Matrix';
-use strict;
+use strict; no strict "refs";
our @ISA = qw(Value);
#
Index: Point.pm
===================================================================
RCS file: /webwork/cvs/system/pg/lib/Value/Point.pm,v
retrieving revision 1.29
retrieving revision 1.30
diff -Llib/Value/Point.pm -Llib/Value/Point.pm -u -r1.29 -r1.30
--- lib/Value/Point.pm
+++ lib/Value/Point.pm
@@ -5,7 +5,7 @@
package Value::Point;
my $pkg = 'Value::Point';
-use strict;
+use strict; no strict "refs";
our @ISA = qw(Value);
#
Index: Number.pm
===================================================================
RCS file: /webwork/cvs/system/pg/lib/Parser/Number.pm,v
retrieving revision 1.18
retrieving revision 1.19
diff -Llib/Parser/Number.pm -Llib/Parser/Number.pm -u -r1.18 -r1.19
--- lib/Parser/Number.pm
+++ lib/Parser/Number.pm
@@ -3,7 +3,7 @@
# Implements the Number class
#
package Parser::Number;
-use strict;
+use strict; no strict "refs";
our @ISA = qw(Parser::Item);
$Parser::class->{Number} = 'Parser::Number';
Index: Complex.pm
===================================================================
RCS file: /webwork/cvs/system/pg/lib/Parser/Complex.pm,v
retrieving revision 1.12
retrieving revision 1.13
diff -Llib/Parser/Complex.pm -Llib/Parser/Complex.pm -u -r1.12 -r1.13
--- lib/Parser/Complex.pm
+++ lib/Parser/Complex.pm
@@ -3,7 +3,7 @@
# Implements the Complex class
#
package Parser::Complex;
-use strict;
+use strict; no strict "refs";
our @ISA = qw(Parser::Item);
$Parser::class->{Complex} = 'Parser::Complex';
Index: Value.pm
===================================================================
RCS file: /webwork/cvs/system/pg/lib/Parser/Value.pm,v
retrieving revision 1.21
retrieving revision 1.22
diff -Llib/Parser/Value.pm -Llib/Parser/Value.pm -u -r1.21 -r1.22
--- lib/Parser/Value.pm
+++ lib/Parser/Value.pm
@@ -4,7 +4,7 @@
# (used to store constant Vector values, etc.)
#
package Parser::Value;
-use strict;
+use strict; no strict "refs";
our @ISA = qw(Parser::Item);
$Parser::class->{Value} = 'Parser::Value';
Index: List.pm
===================================================================
RCS file: /webwork/cvs/system/pg/lib/Parser/List.pm,v
retrieving revision 1.24
retrieving revision 1.25
diff -Llib/Parser/List.pm -Llib/Parser/List.pm -u -r1.24 -r1.25
--- lib/Parser/List.pm
+++ lib/Parser/List.pm
@@ -3,7 +3,7 @@
# Implements base List class.
#
package Parser::List;
-use strict;
+use strict; no strict "refs";
our @ISA = qw(Parser::Item);
$Parser::class->{List} = 'Parser::List';
Index: Context.pm
===================================================================
RCS file: /webwork/cvs/system/pg/lib/Parser/Context.pm,v
retrieving revision 1.23
retrieving revision 1.24
diff -Llib/Parser/Context.pm -Llib/Parser/Context.pm -u -r1.23 -r1.24
--- lib/Parser/Context.pm
+++ lib/Parser/Context.pm
@@ -2,7 +2,7 @@
package Parser::Context;
my $pkg = "Parser::Context";
-use strict;
+use strict; no strict "refs";
our @ISA = ("Value::Context");
#
Index: Constant.pm
===================================================================
RCS file: /webwork/cvs/system/pg/lib/Parser/Constant.pm,v
retrieving revision 1.15
retrieving revision 1.16
diff -Llib/Parser/Constant.pm -Llib/Parser/Constant.pm -u -r1.15 -r1.16
--- lib/Parser/Constant.pm
+++ lib/Parser/Constant.pm
@@ -3,7 +3,7 @@
# Implements named constants (e, pi, etc.)
#
package Parser::Constant;
-use strict;
+use strict; no strict "refs";
our @ISA = qw(Parser::Item);
$Parser::class->{Constant} = 'Parser::Constant';
Index: String.pm
===================================================================
RCS file: /webwork/cvs/system/pg/lib/Parser/String.pm,v
retrieving revision 1.14
retrieving revision 1.15
diff -Llib/Parser/String.pm -Llib/Parser/String.pm -u -r1.14 -r1.15
--- lib/Parser/String.pm
+++ lib/Parser/String.pm
@@ -4,7 +4,7 @@
# (Used for things like INFINITY, and so on)
#
package Parser::String;
-use strict;
+use strict; no strict "refs";
our @ISA = qw(Parser::Item);
$Parser::class->{String} = 'Parser::String';
Index: BOP.pm
===================================================================
RCS file: /webwork/cvs/system/pg/lib/Parser/BOP.pm,v
retrieving revision 1.22
retrieving revision 1.23
diff -Llib/Parser/BOP.pm -Llib/Parser/BOP.pm -u -r1.22 -r1.23
--- lib/Parser/BOP.pm
+++ lib/Parser/BOP.pm
@@ -4,7 +4,7 @@
#
package Parser::BOP;
-use strict;
+use strict; no strict "refs";
our @ISA = qw(Parser::Item);
$Parser::class->{BOP} = 'Parser::BOP';
Index: Variable.pm
===================================================================
RCS file: /webwork/cvs/system/pg/lib/Parser/Variable.pm,v
retrieving revision 1.12
retrieving revision 1.13
diff -Llib/Parser/Variable.pm -Llib/Parser/Variable.pm -u -r1.12 -r1.13
--- lib/Parser/Variable.pm
+++ lib/Parser/Variable.pm
@@ -3,7 +3,7 @@
# Implements named variables
#
package Parser::Variable;
-use strict;
+use strict; no stric "refs";
our @ISA = qw(Parser::Item);
$Parser::class->{Variable} = 'Parser::Variable';
Index: Function.pm
===================================================================
RCS file: /webwork/cvs/system/pg/lib/Parser/Function.pm,v
retrieving revision 1.25
retrieving revision 1.26
diff -Llib/Parser/Function.pm -Llib/Parser/Function.pm -u -r1.25 -r1.26
--- lib/Parser/Function.pm
+++ lib/Parser/Function.pm
@@ -4,7 +4,7 @@
#
package Parser::Function;
-use strict;
+use strict; no strict "refs";
our @ISA = qw(Parser::Item);
$Parser::class->{Function} = 'Parser::Function';
Index: Item.pm
===================================================================
RCS file: /webwork/cvs/system/pg/lib/Parser/Item.pm,v
retrieving revision 1.16
retrieving revision 1.17
diff -Llib/Parser/Item.pm -Llib/Parser/Item.pm -u -r1.16 -r1.17
--- lib/Parser/Item.pm
+++ lib/Parser/Item.pm
@@ -4,7 +4,7 @@
# are things like binary operator, function call, and so on.
#
package Parser::Item;
-use strict;
+use strict; no strict "refs";
use UNIVERSAL;
use Scalar::Util;
Index: UOP.pm
===================================================================
RCS file: /webwork/cvs/system/pg/lib/Parser/UOP.pm,v
retrieving revision 1.21
retrieving revision 1.22
diff -Llib/Parser/UOP.pm -Llib/Parser/UOP.pm -u -r1.21 -r1.22
--- lib/Parser/UOP.pm
+++ lib/Parser/UOP.pm
@@ -3,7 +3,7 @@
# Implements the base Unary Operator class
#
package Parser::UOP;
-use strict;
+use strict; no strict "refs";
our @ISA = qw(Parser::Item);
$Parser::class->{UOP} = 'Parser::UOP';
|
|
From: Arnie P. v. a. <we...@ma...> - 2008-06-25 20:00:06
|
Log Message:
-----------
Added
no strict "refs"
to try to avoid new error checking in Perl 5.10.
Modified Files:
--------------
pg/lib/Value:
Context.pm
Revision Data
-------------
Index: Context.pm
===================================================================
RCS file: /webwork/cvs/system/pg/lib/Value/Context.pm,v
retrieving revision 1.20
retrieving revision 1.21
diff -Llib/Value/Context.pm -Llib/Value/Context.pm -u -r1.20 -r1.21
--- lib/Value/Context.pm
+++ lib/Value/Context.pm
@@ -5,7 +5,7 @@
package Value::Context;
my $pkg = "Value::Context";
-use strict;
+use strict; no strict "refs";
use UNIVERSAL;
#
|
|
From: Arnie P. v. a. <we...@ma...> - 2008-06-25 20:03:57
|
Log Message:
-----------
Added
no strict "refs"
to try to avoid new error checking in Perl 5.10.
Tags:
----
rel-2-4-patches
Modified Files:
--------------
pg/lib/Value:
Context.pm
Revision Data
-------------
Index: Context.pm
===================================================================
RCS file: /webwork/cvs/system/pg/lib/Value/Context.pm,v
retrieving revision 1.10.6.2.2.1
retrieving revision 1.10.6.2.2.2
diff -Llib/Value/Context.pm -Llib/Value/Context.pm -u -r1.10.6.2.2.1 -r1.10.6.2.2.2
--- lib/Value/Context.pm
+++ lib/Value/Context.pm
@@ -5,7 +5,7 @@
package Value::Context;
my $pkg = "Value::Context";
-use strict;
+use strict; no strict "refs";
use UNIVERSAL;
#
|
×
Want the latest updates on software, tech news, and AI?
Get latest updates about software, tech news, and AI from SourceForge directly in your inbox once a month.
Thanks for helping keep SourceForge clean.
X