[svn:parrot] r46691 - in trunk: . src/ops t/pmc

plobsing at svn.parrot.org plobsing at svn.parrot.org
Sun May 16 00:39:59 UTC 2010


Author: plobsing
Date: Sun May 16 00:39:58 2010
New Revision: 46691
URL: https://trac.parrot.org/parrot/changeset/46691

Log:
remove deprecated sizeof_i_i op. TT #633

Modified:
   trunk/DEPRECATED.pod
   trunk/src/ops/ops.num
   trunk/src/ops/sys.ops
   trunk/t/pmc/managedstruct.t
   trunk/t/pmc/nci.t

Modified: trunk/DEPRECATED.pod
==============================================================================
--- trunk/DEPRECATED.pod	Sat May 15 23:34:02 2010	(r46690)
+++ trunk/DEPRECATED.pod	Sun May 16 00:39:58 2010	(r46691)
@@ -156,13 +156,6 @@
 for Sub, Exception, and related PMC types will instead be handled by
 get_label and set_label.
 
-=item sizeof [eligible in 2.4]
-
-This opcode uses the old integer ID for a PMC type; this opcode should be changed
-to use the current methods to lookup a PMC or removed entirely.
-
-L<https://trac.parrot.org/parrot/ticket/633>
-
 =item All bitwise ops [eligible in 2.1]
 
 All bitwise ops (all ops containing C<bitwise> in their names) will be provided

Modified: trunk/src/ops/ops.num
==============================================================================
--- trunk/src/ops/ops.num	Sat May 15 23:34:02 2010	(r46690)
+++ trunk/src/ops/ops.num	Sun May 16 00:39:58 2010	(r46691)
@@ -1193,64 +1193,62 @@
 sleep_ic                       1169
 sleep_n                        1170
 sleep_nc                       1171
-sizeof_i_i                     1172
-sizeof_i_ic                    1173
-store_lex_s_p                  1174
-store_lex_sc_p                 1175
-store_dynamic_lex_s_p          1176
-store_dynamic_lex_sc_p         1177
-find_lex_p_s                   1178
-find_lex_p_sc                  1179
-find_dynamic_lex_p_s           1180
-find_dynamic_lex_p_sc          1181
-find_caller_lex_p_s            1182
-find_caller_lex_p_sc           1183
-get_namespace_p                1184
-get_namespace_p_p              1185
-get_namespace_p_pc             1186
-get_hll_namespace_p            1187
-get_hll_namespace_p_p          1188
-get_hll_namespace_p_pc         1189
-get_root_namespace_p           1190
-get_root_namespace_p_p         1191
-get_root_namespace_p_pc        1192
-get_global_p_s                 1193
-get_global_p_sc                1194
-get_global_p_p_s               1195
-get_global_p_pc_s              1196
-get_global_p_p_sc              1197
-get_global_p_pc_sc             1198
-get_hll_global_p_s             1199
-get_hll_global_p_sc            1200
-get_hll_global_p_p_s           1201
-get_hll_global_p_pc_s          1202
-get_hll_global_p_p_sc          1203
-get_hll_global_p_pc_sc         1204
-get_root_global_p_s            1205
-get_root_global_p_sc           1206
-get_root_global_p_p_s          1207
-get_root_global_p_pc_s         1208
-get_root_global_p_p_sc         1209
-get_root_global_p_pc_sc        1210
-set_global_s_p                 1211
-set_global_sc_p                1212
-set_global_p_s_p               1213
-set_global_pc_s_p              1214
-set_global_p_sc_p              1215
-set_global_pc_sc_p             1216
-set_hll_global_s_p             1217
-set_hll_global_sc_p            1218
-set_hll_global_p_s_p           1219
-set_hll_global_pc_s_p          1220
-set_hll_global_p_sc_p          1221
-set_hll_global_pc_sc_p         1222
-set_root_global_s_p            1223
-set_root_global_sc_p           1224
-set_root_global_p_s_p          1225
-set_root_global_pc_s_p         1226
-set_root_global_p_sc_p         1227
-set_root_global_pc_sc_p        1228
-find_name_p_s                  1229
-find_name_p_sc                 1230
-find_sub_not_null_p_s          1231
-find_sub_not_null_p_sc         1232
+store_lex_s_p                  1172
+store_lex_sc_p                 1173
+store_dynamic_lex_s_p          1174
+store_dynamic_lex_sc_p         1175
+find_lex_p_s                   1176
+find_lex_p_sc                  1177
+find_dynamic_lex_p_s           1178
+find_dynamic_lex_p_sc          1179
+find_caller_lex_p_s            1180
+find_caller_lex_p_sc           1181
+get_namespace_p                1182
+get_namespace_p_p              1183
+get_namespace_p_pc             1184
+get_hll_namespace_p            1185
+get_hll_namespace_p_p          1186
+get_hll_namespace_p_pc         1187
+get_root_namespace_p           1188
+get_root_namespace_p_p         1189
+get_root_namespace_p_pc        1190
+get_global_p_s                 1191
+get_global_p_sc                1192
+get_global_p_p_s               1193
+get_global_p_pc_s              1194
+get_global_p_p_sc              1195
+get_global_p_pc_sc             1196
+get_hll_global_p_s             1197
+get_hll_global_p_sc            1198
+get_hll_global_p_p_s           1199
+get_hll_global_p_pc_s          1200
+get_hll_global_p_p_sc          1201
+get_hll_global_p_pc_sc         1202
+get_root_global_p_s            1203
+get_root_global_p_sc           1204
+get_root_global_p_p_s          1205
+get_root_global_p_pc_s         1206
+get_root_global_p_p_sc         1207
+get_root_global_p_pc_sc        1208
+set_global_s_p                 1209
+set_global_sc_p                1210
+set_global_p_s_p               1211
+set_global_pc_s_p              1212
+set_global_p_sc_p              1213
+set_global_pc_sc_p             1214
+set_hll_global_s_p             1215
+set_hll_global_sc_p            1216
+set_hll_global_p_s_p           1217
+set_hll_global_pc_s_p          1218
+set_hll_global_p_sc_p          1219
+set_hll_global_pc_sc_p         1220
+set_root_global_s_p            1221
+set_root_global_sc_p           1222
+set_root_global_p_s_p          1223
+set_root_global_pc_s_p         1224
+set_root_global_p_sc_p         1225
+set_root_global_pc_sc_p        1226
+find_name_p_s                  1227
+find_name_p_sc                 1228
+find_sub_not_null_p_s          1229
+find_sub_not_null_p_sc         1230

Modified: trunk/src/ops/sys.ops
==============================================================================
--- trunk/src/ops/sys.ops	Sat May 15 23:34:02 2010	(r46690)
+++ trunk/src/ops/sys.ops	Sun May 16 00:39:58 2010	(r46691)
@@ -305,21 +305,6 @@
     goto ADDRESS(next);
 }
 
-########################################
-
-=item B<sizeof>(out INT, in INT)
-
-Get the size of native datatype $2 in $1.
-
-=cut
-
-inline op sizeof (out INT, in INT) :deprecated {
-    if ($2 < enum_first_type || $2 >= enum_last_type)
-        $1 = -1;
-    else
-        $1 = data_types[$2 - enum_first_type].size;
-}
-
 ###############################################################################
 
 =back

Modified: trunk/t/pmc/managedstruct.t
==============================================================================
--- trunk/t/pmc/managedstruct.t	Sat May 15 23:34:02 2010	(r46690)
+++ trunk/t/pmc/managedstruct.t	Sun May 16 00:39:58 2010	(r46691)
@@ -104,10 +104,6 @@
     ok($I0, "short val retrieved correctly")
 .end
 
-#pir_output_is( <<'CODE', <<'OUTPUT', "named element access int16" );
-#
-#.include "datatypes.pasm"
-#
 .sub named_element_access_int16
     new $P1, ['OrderedHash']
     set  $P1['x'], .DATATYPE_INT16
@@ -121,14 +117,6 @@
     # need a ManagedStruct to allocate data memory
     new $P2, ['ManagedStruct'], $P1
 
-    # calc allocation size
-    set $I0, 0
-    sizeof $I1, .DATATYPE_INT16
-    add $I0, $I1
-    add $I0, $I1
-    # set size
-    set $P2, $I0
-
     # set struct values by name
     set $I0, 2
     set $P2["x"], $I0

Modified: trunk/t/pmc/nci.t
==============================================================================
--- trunk/t/pmc/nci.t	Sat May 15 23:34:02 2010	(r46690)
+++ trunk/t/pmc/nci.t	Sun May 16 00:39:58 2010	(r46691)
@@ -1330,16 +1330,6 @@
   push P2, 0    # 1 elem array
   push P2, 0
   new P5, ['ManagedStruct'], P2
-  set I6, 0
-  sizeof I7, .DATATYPE_DOUBLE
-  add I6, I7
-  sizeof I7, .DATATYPE_FLOAT
-  add I6, I7
-  sizeof I7, .DATATYPE_INT
-  add I6, I7
-  sizeof I7, .DATATYPE_CSTR
-  add I6, I7
-  set P5, I6
   set P5[0], 10.0
   set P5[1], 4.0
   set P5[2], 17


More information about the parrot-commits mailing list