Permalink
Browse files

Remove deprecated classname opcode (after recent cleanups, it was a d…

…uplicate

of typeof)

Note: this may break the native_pbc tests due to an update that forced
a change to PBC_COMPAT; Can't build that on my platform due to a borked
shell script; just need to regen the native pbc files as per PBC_COMPAT



git-svn-id: https://svn.parrot.org/parrot/trunk@23247 d31e2699-5ff4-0310-a27c-f18f2fbe73fe
  • Loading branch information...
1 parent 69b4fbf commit 621c8e506844601cce6f518ebf6f64a11dc2faba @coke coke committed Nov 29, 2007
View
@@ -81,28 +81,23 @@ we are moving to use:
=item 2
-The C<classname> op is deprecated and will be removed after the 0.5.0 release.
-It's an exact duplicate of the string return variant of the C<typeof> op.
-
-=item 3
-
The experimental C<instantiate> opcode is deprecated and will be removed after
the 0.5.0 release.
(The C<instantiate> vtable function becomes core in 0.5.0, but is accessed via
the "new" opcode for the PMCs that use it.)
-=item 4
+=item 3
The C<getclass> opcode is deprecated (replaced by the C<get_class> opcode) and
will be removed after the 0.5.0 release.
-=item 5
+=item 4
The C<get_mro> opcode is deprecated (replaced by C<inspect>) and will be
removed after the 0.5.0 release.
-=item 6
+=item 5
The PMC union struct is deprecated and will be removed once all core PMCs have
been updated.
View
@@ -23,8 +23,12 @@
# or TODO much better: all .pbc files should make-depend on PBC_COMPAT
+# Also, if you're removing an opcode, be sure to run
+# make -f tools/dev/ops_renum.mak
+
# please insert tab separated entries at the top of the list
+3.06 2007.11.28 coke remove classname opcode
3.05 2007.10.29 allison add get_eh, get_all_eh, and count_eh opcodes
3.04 2007.10.28 paultcochrane remove clear_eh opcode
3.03 2007.10.17 coke released 0.4.17
@@ -123,7 +123,7 @@ Create and returns a clone of a PAST node.
.sub 'clone' :vtable :method
.local pmc res
- $S0 = classname self
+ $S0 = typeof self
res = new $S0
.local pmc iter
iter = self.'iterator'()
@@ -67,14 +67,14 @@ is set or implied.
target = src
pos = 0
iscont = 1
- grammar = classname self
+ grammar = typeof self
goto adverb_pos
target_from_src:
target = getattribute src, '$.target'
$P0 = getattribute src, '$.pos'
pos = $P0
iscont = 0
- grammar = classname src
+ grammar = typeof src
if pos >= 0 goto adverb_pos
pos = 0
@@ -358,16 +358,6 @@ Return the R<CLASS> of the given R<OBJECT>.
I<Arguments: P, P>
-=head2 classname
-
-X<classname opcode (PASM)>
-
- classname R<NAME>, R<CLASS>
-
-Set R<NAME> to the classname of R<CLASS>.
-
-I<Arguments: SR, P>
-
=head2 classoffset
X<classoffset opcode (PASM)>
View
@@ -416,18 +416,6 @@ inline op class(out PMC, invar PMC) :object_classes {
goto NEXT();
}
-=item B<classname>(out STR, invar PMC)
-
-Get the class name for the class in $2 and put it in $1.
-
-=cut
-
-inline op classname(out STR, invar PMC) :object_base {
- $1 = VTABLE_name(interp, $2);
- goto NEXT();
-}
-
-
##################################################
Oops, something went wrong.

0 comments on commit 621c8e5

Please sign in to comment.