[svn:parrot] r43946 - trunk/src/pmc

whiteknight at svn.parrot.org whiteknight at svn.parrot.org
Sat Feb 13 23:31:01 UTC 2010


Author: whiteknight
Date: Sat Feb 13 23:31:00 2010
New Revision: 43946
URL: https://trac.parrot.org/parrot/changeset/43946

Log:
fix indenting in ImageIO to be like all other .pmc files

Modified:
   trunk/src/pmc/imageio.pmc

Modified: trunk/src/pmc/imageio.pmc
==============================================================================
--- trunk/src/pmc/imageio.pmc	Sat Feb 13 23:28:27 2010	(r43945)
+++ trunk/src/pmc/imageio.pmc	Sat Feb 13 23:31:00 2010	(r43946)
@@ -359,9 +359,9 @@
 
 */
 
-VTABLE void set_pointer(void* value) {
-    PARROT_IMAGEIO(SELF)->thaw_ptr = (PMC**)value;
-}
+    VTABLE void set_pointer(void* value) {
+        PARROT_IMAGEIO(SELF)->thaw_ptr = (PMC**)value;
+    }
 
 /*
 
@@ -373,9 +373,9 @@
 
 */
 
-VTABLE INTVAL get_integer() {
-    return PARROT_IMAGEIO(SELF)->what;
-}
+    VTABLE INTVAL get_integer() {
+        return PARROT_IMAGEIO(SELF)->what;
+    }
 
 /*
 
@@ -387,11 +387,11 @@
 
 */
 
-VTABLE void push_integer(INTVAL v) {
-    size_t len = PF_size_integer() * sizeof (opcode_t);
-    ensure_buffer_size(interp, SELF, len);
-    SET_VISIT_CURSOR(SELF, (char *)PF_store_integer(GET_VISIT_CURSOR(SELF), v));
-}
+    VTABLE void push_integer(INTVAL v) {
+        size_t len = PF_size_integer() * sizeof (opcode_t);
+        ensure_buffer_size(interp, SELF, len);
+        SET_VISIT_CURSOR(SELF, (char *)PF_store_integer(GET_VISIT_CURSOR(SELF), v));
+    }
 
 
 /*
@@ -404,12 +404,12 @@
 
 */
 
-VTABLE void push_float(FLOATVAL v)
-{
-    size_t len = PF_size_number() * sizeof (opcode_t);
-    ensure_buffer_size(interp, SELF, len);
-    SET_VISIT_CURSOR(SELF, (char *)PF_store_number(GET_VISIT_CURSOR(SELF), &v));
-}
+    VTABLE void push_float(FLOATVAL v)
+    {
+        size_t len = PF_size_number() * sizeof (opcode_t);
+        ensure_buffer_size(interp, SELF, len);
+        SET_VISIT_CURSOR(SELF, (char *)PF_store_number(GET_VISIT_CURSOR(SELF), &v));
+    }
 
 
 /*
@@ -422,12 +422,12 @@
 
 */
 
-VTABLE void push_string(STRING *v)
-{
-    size_t len = PF_size_string(v) * sizeof (opcode_t);
-    ensure_buffer_size(INTERP, SELF, len);
-    SET_VISIT_CURSOR(SELF, (char *)PF_store_string(GET_VISIT_CURSOR(SELF), v));
-}
+    VTABLE void push_string(STRING *v)
+    {
+        size_t len = PF_size_string(v) * sizeof (opcode_t);
+        ensure_buffer_size(INTERP, SELF, len);
+        SET_VISIT_CURSOR(SELF, (char *)PF_store_string(GET_VISIT_CURSOR(SELF), v));
+    }
 
 /*
 
@@ -440,10 +440,10 @@
 
 */
 
-VTABLE void push_pmc(PMC *v) {
-    VTABLE_set_pointer(interp, SELF, &v);
-    (PARROT_IMAGEIO(SELF)->visit_pmc_now)(INTERP, v, SELF);
-}
+    VTABLE void push_pmc(PMC *v) {
+        VTABLE_set_pointer(interp, SELF, &v);
+        (PARROT_IMAGEIO(SELF)->visit_pmc_now)(INTERP, v, SELF);
+    }
 
 /*
 
@@ -455,14 +455,14 @@
 
 */
 
-VTABLE INTVAL shift_integer()
-{
-    opcode_t *pos  = GET_VISIT_CURSOR(SELF);
-    const INTVAL i = PF_fetch_integer(PARROT_IMAGEIO(SELF)->pf, (const opcode_t **)&pos);
-    SET_VISIT_CURSOR(SELF, (char *)pos);
-    BYTECODE_SHIFT_OK(SELF);
-    return i;
-}
+    VTABLE INTVAL shift_integer()
+    {
+        opcode_t *pos  = GET_VISIT_CURSOR(SELF);
+        const INTVAL i = PF_fetch_integer(PARROT_IMAGEIO(SELF)->pf, (const opcode_t **)&pos);
+        SET_VISIT_CURSOR(SELF, (char *)pos);
+        BYTECODE_SHIFT_OK(SELF);
+        return i;
+    }
 
 
 /*
@@ -475,13 +475,13 @@
 
 */
 
-VTABLE FLOATVAL shift_float() {
-    opcode_t *pos    = GET_VISIT_CURSOR(SELF);
-    const FLOATVAL f = PF_fetch_number(PARROT_IMAGEIO(SELF)->pf, (const opcode_t **)&pos);
-    SET_VISIT_CURSOR(SELF, (char *)pos);
-    BYTECODE_SHIFT_OK(SELF);
-    return f;
-}
+    VTABLE FLOATVAL shift_float() {
+        opcode_t *pos    = GET_VISIT_CURSOR(SELF);
+        const FLOATVAL f = PF_fetch_number(PARROT_IMAGEIO(SELF)->pf, (const opcode_t **)&pos);
+        SET_VISIT_CURSOR(SELF, (char *)pos);
+        BYTECODE_SHIFT_OK(SELF);
+        return f;
+    }
 
 
 /*
@@ -494,14 +494,14 @@
 
 */
 
-VTABLE STRING *shift_string()
-{
-    opcode_t *pos    = GET_VISIT_CURSOR(SELF);
-    STRING * const s = PF_fetch_string(interp, PARROT_IMAGEIO(SELF)->pf, (const opcode_t **)&pos);
-    SET_VISIT_CURSOR(SELF, (char *)pos);
-    BYTECODE_SHIFT_OK(SELF);
-    return s;
-}
+    VTABLE STRING *shift_string()
+    {
+        opcode_t *pos    = GET_VISIT_CURSOR(SELF);
+        STRING * const s = PF_fetch_string(interp, PARROT_IMAGEIO(SELF)->pf, (const opcode_t **)&pos);
+        SET_VISIT_CURSOR(SELF, (char *)pos);
+        BYTECODE_SHIFT_OK(SELF);
+        return s;
+    }
 
 /*
 
@@ -513,61 +513,61 @@
 
 */
 
-VTABLE PMC *shift_pmc() {
-    PMC *result;
-    VTABLE_set_pointer(interp, SELF, &result);
-    (PARROT_IMAGEIO(SELF)->visit_pmc_now)(interp, NULL, SELF);
-    return result;
-}
-
-VTABLE void set_pmc(PMC *p)
-{
-        UINTVAL header_length = GROW_TO_16_BYTE_BOUNDARY(PACKFILE_HEADER_BYTES);
-
-        PARROT_IMAGEIO(SELF)->what = VISIT_FREEZE_NORMAL;
-        PARROT_IMAGEIO(SELF)->visit_pmc_now  = visit_todo_list_freeze;
-        create_buffer(INTERP, p, SELF);
-        ensure_buffer_size(INTERP, SELF, header_length);
-        mem_sys_memcopy(GET_VISIT_CURSOR(SELF),
-            PARROT_IMAGEIO(SELF)->pf->header, PACKFILE_HEADER_BYTES);
-        INC_VISIT_CURSOR(SELF, header_length);
-
-        PARROT_IMAGEIO(SELF)->seen = pmc_new(INTERP, enum_class_Hash);
-        VTABLE_set_pointer(INTERP, PARROT_IMAGEIO(SELF)->seen,
-            parrot_new_intval_hash(INTERP));
-
-        visit_loop_todo_list(INTERP, p, SELF);
-}
-
-VTABLE void set_string_native(STRING *image) {
-        UINTVAL header_length = GROW_TO_16_BYTE_BOUNDARY(PACKFILE_HEADER_BYTES);
-        int unpacked_length;
-
-        PARROT_IMAGEIO(SELF)->what          = VISIT_THAW_NORMAL;
-        PARROT_IMAGEIO(SELF)->visit_pmc_now = visit_todo_list_thaw;
-        PARROT_IMAGEIO(SELF)->buffer        = (Buffer *)image;
-        PARROT_IMAGEIO(SELF)->id_list       = pmc_new(INTERP, enum_class_ResizablePMCArray);
-
-        PARROT_ASSERT(image->_bufstart == image->strstart);
-
-        SET_VISIT_CURSOR(SELF, (char *)Buffer_bufstart(PARROT_IMAGEIO(SELF)->buffer));
-        PARROT_IMAGEIO(SELF)->input_length = image->strlen;
-
-        PARROT_IMAGEIO(SELF)->pf->options |= PFOPT_PMC_FREEZE_ONLY;
-        unpacked_length = PackFile_unpack(interp, PARROT_IMAGEIO(SELF)->pf,
-            GET_VISIT_CURSOR(SELF), PARROT_IMAGEIO(SELF)->input_length);
-
-        if (!unpacked_length) {
-            Parrot_ex_throw_from_c_args(interp, NULL,
-                    EXCEPTION_INVALID_STRING_REPRESENTATION,
-                    "PackFile header failed during unpack");
-        }
-        else {
+    VTABLE PMC *shift_pmc() {
+        PMC *result;
+        VTABLE_set_pointer(interp, SELF, &result);
+        (PARROT_IMAGEIO(SELF)->visit_pmc_now)(interp, NULL, SELF);
+        return result;
+    }
+
+    VTABLE void set_pmc(PMC *p)
+    {
+            UINTVAL header_length = GROW_TO_16_BYTE_BOUNDARY(PACKFILE_HEADER_BYTES);
+
+            PARROT_IMAGEIO(SELF)->what = VISIT_FREEZE_NORMAL;
+            PARROT_IMAGEIO(SELF)->visit_pmc_now  = visit_todo_list_freeze;
+            create_buffer(INTERP, p, SELF);
+            ensure_buffer_size(INTERP, SELF, header_length);
+            mem_sys_memcopy(GET_VISIT_CURSOR(SELF),
+                PARROT_IMAGEIO(SELF)->pf->header, PACKFILE_HEADER_BYTES);
             INC_VISIT_CURSOR(SELF, header_length);
-        }
 
-        visit_loop_todo_list(interp, pmc, SELF);
-}
+            PARROT_IMAGEIO(SELF)->seen = pmc_new(INTERP, enum_class_Hash);
+            VTABLE_set_pointer(INTERP, PARROT_IMAGEIO(SELF)->seen,
+                parrot_new_intval_hash(INTERP));
+
+            visit_loop_todo_list(INTERP, p, SELF);
+    }
+
+    VTABLE void set_string_native(STRING *image) {
+            UINTVAL header_length = GROW_TO_16_BYTE_BOUNDARY(PACKFILE_HEADER_BYTES);
+            int unpacked_length;
+
+            PARROT_IMAGEIO(SELF)->what          = VISIT_THAW_NORMAL;
+            PARROT_IMAGEIO(SELF)->visit_pmc_now = visit_todo_list_thaw;
+            PARROT_IMAGEIO(SELF)->buffer        = (Buffer *)image;
+            PARROT_IMAGEIO(SELF)->id_list       = pmc_new(INTERP, enum_class_ResizablePMCArray);
+
+            PARROT_ASSERT(image->_bufstart == image->strstart);
+
+            SET_VISIT_CURSOR(SELF, (char *)Buffer_bufstart(PARROT_IMAGEIO(SELF)->buffer));
+            PARROT_IMAGEIO(SELF)->input_length = image->strlen;
+
+            PARROT_IMAGEIO(SELF)->pf->options |= PFOPT_PMC_FREEZE_ONLY;
+            unpacked_length = PackFile_unpack(interp, PARROT_IMAGEIO(SELF)->pf,
+                GET_VISIT_CURSOR(SELF), PARROT_IMAGEIO(SELF)->input_length);
+
+            if (!unpacked_length) {
+                Parrot_ex_throw_from_c_args(interp, NULL,
+                        EXCEPTION_INVALID_STRING_REPRESENTATION,
+                        "PackFile header failed during unpack");
+            }
+            else {
+                INC_VISIT_CURSOR(SELF, header_length);
+            }
+
+            visit_loop_todo_list(interp, pmc, SELF);
+    }
 
 /*
 


More information about the parrot-commits mailing list