cvsuser 04/09/08 06:02:58
Modified: src utils.c
Log:
fixed c++ style comments
Revision Changes Path
1.16 +4 -4 parrot/src/utils.c
Index: utils.c
===================================================================
RCS file: /cvs/public/parrot/src/utils.c,v
retrieving revision 1.15
retrieving revision 1.16
diff -u -w -r1.15 -r1.16
--- utils.c 8 Sep 2004 00:34:00 -0000 1.15
+++ utils.c 8 Sep 2004 13:02:58 -0000 1.16
@@ -1,6 +1,6 @@
/*
Copyright: 2001-2003 The Perl Foundation. All Rights Reserved.
-$Id: utils.c,v 1.15 2004/09/08 00:34:00 dan Exp $
+$Id: utils.c,v 1.16 2004/09/08 13:02:58 jrieks Exp $
=head1 NAME
@@ -518,7 +518,7 @@
*/
out_array = mem_sys_allocate((sizeof(long)) * (arraylen + 1));
out_array[arraylen] = 0;
- // printf("Long array has %i elements\n", arraylen);
+ /* printf("Long array has %i elements\n", arraylen);*/
for (cur = 0; cur < arraylen; cur++) {
out_array[cur] = VTABLE_get_integer_keyed_int(interpreter, array, cur);
}
@@ -571,10 +571,10 @@
out_array = mem_sys_allocate((sizeof(char *)) * (arraylen + 1));
out_array[arraylen] = 0;
- // printf("String array has %i elements\n", arraylen);
+ /* printf("String array has %i elements\n", arraylen);*/
for (cur = 0; cur < arraylen; cur++) {
out_array[cur] = string_to_cstring(interpreter,
VTABLE_get_string_keyed_int(interpreter, array, cur));
- // printf("Offset %i is %s\n", cur, out_array[cur]);
+ /* printf("Offset %i is %s\n", cur, out_array[cur]);*/
}
return out_array;