fix several build warnings in src/embed/* in gcc, g++, and icc

parrot · Dec 13, 2010 · 16e368d · 16e368d
1 parent 13686bc
commit 16e368d
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 6 deletions.
diff --git a/src/embed/api.c b/src/embed/api.c
@@ -63,7 +63,6 @@ Parrot_api_make_interpreter(Parrot_PMC parent, Parrot_Int flags,
     int alt_stacktop;
     Parrot_Interp interp_raw;
     void *stacktop_ptr = &alt_stacktop;
-    PMC * iglobals;
     const Parrot_Interp parent_raw = PMC_IS_NULL(parent) ? NULL : GET_RAW_INTERP(parent);
     interp_raw = allocate_interpreter(parent_raw, flags);
     if (args) {
@@ -77,7 +76,6 @@ Parrot_api_make_interpreter(Parrot_PMC parent, Parrot_Int flags,
             interp_raw->hash_seed = args->hash_seed;
     }
     initialize_interpreter(interp_raw, stacktop_ptr);
-    iglobals = interp_raw->iglobals;
     *interp = VTABLE_get_pmc_keyed_int(
             interp_raw, interp_raw->iglobals, (Parrot_Int)IGLOBALS_INTERPRETER);
     return !PMC_IS_NULL(*interp);
@@ -419,6 +417,7 @@ Parrot_api_set_stdhandles(Parrot_PMC interp_pmc, Parrot_Int in,
         Parrot_io_set_os_handle(interp, pmc, (PIOHANDLE)err);
         dummy = (void *)Parrot_io_stdhandle(interp, PIO_STDERR_FILENO, pmc);
     }
+    UNUSED(dummy);
 
     EMBED_API_CALLOUT(interp_pmc, interp)
 }

diff --git a/src/embed/pmc.c b/src/embed/pmc.c
@@ -10,8 +10,7 @@ Parrot_api_pmc_deserialize(Parrot_PMC interp_pmc, Parrot_String fpmc,
         ARGOUT(Parrot_PMC * pmc))
 {
     EMBED_API_CALLIN(interp_pmc, interp)
-    PMC * const config = Parrot_thaw(interp, fpmc);
-    Parrot_set_config_hash_pmc(interp, config);
+    *pmc = Parrot_thaw(interp, fpmc);
     EMBED_API_CALLOUT(interp_pmc, interp);
 }
 
@@ -24,8 +23,7 @@ Parrot_api_pmc_deserialize_bytes(Parrot_PMC interp_pmc,
     EMBED_API_CALLIN(interp_pmc, interp)
     STRING * const fpmc_str = Parrot_str_new_init(interp, (const char *)fpmc,
         length, Parrot_binary_encoding_ptr, PObj_external_FLAG);
-    PMC * const config = Parrot_thaw(interp, fpmc_str);
-    Parrot_set_config_hash_pmc(interp, config);
+    *pmc = Parrot_thaw(interp, fpmc_str);
     EMBED_API_CALLOUT(interp_pmc, interp);
 }