projects
/
p5sagit/p5-mst-13.2.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
Add VMS' default to the CGI.pm temp list (should update to File::Spec)
[p5sagit/p5-mst-13.2.git]
/
lib
/
overload.pm
diff --git
a/lib/overload.pm
b/lib/overload.pm
index
3750a43
..
ba96bc9
100644
(file)
--- a/
lib/overload.pm
+++ b/
lib/overload.pm
@@
-1,5
+1,7
@@
package overload;
+$overload::hint_bits = 0x20000;
+
sub nil {}
sub OVERLOAD {
@@
-129,7
+131,7
@@
sub constant {
# Arguments: what, sub
while (@_) {
$^H{$_[0]} = $_[1];
- $^H |= $constants{$_[0]} | 0x20000;
+ $^H |= $constants{$_[0]} | $overload::hint_bits;
shift, shift;
}
}