diff --git a/compilers/imcc/optimizer.c b/compilers/imcc/optimizer.c index 264b778571..743458781e 100644 --- a/compilers/imcc/optimizer.c +++ b/compilers/imcc/optimizer.c @@ -928,7 +928,6 @@ IMCC_subst_constants(ARGMOD(imc_info_t *imcc), ARGMOD(IMC_Unit *unit), size_t i; char op[20]; - const char *fmt = FLOATVAL_FMT; const char *debug_fmt = NULL; /* gcc -O uninit warn */ int found, branched; @@ -1040,7 +1039,7 @@ IMCC_subst_constants(ARGMOD(imc_info_t *imcc), ARGMOD(IMC_Unit *unit), r[1] = mk_const(imcc, b, r[0]->set); break; case 'N': - snprintf(b, sizeof (b), fmt, REG_NUM(imcc->interp, 0)); + snprintf(b, sizeof (b), FLOATVAL_FMT, REG_NUM(imcc->interp, 0)); r[1] = mk_const(imcc, b, r[0]->set); break; case 'S': diff --git a/src/call/context.c b/src/call/context.c index 04d5dc0a64..43420a7eca 100644 --- a/src/call/context.c +++ b/src/call/context.c @@ -235,7 +235,7 @@ init_context(ARGMOD(PMC *pmcctx), ARGIN_NULLOK(PMC *pmcold)) PARROT_ASSERT(PMC_IS_NULL(pmcold) || pmcold->vtable->base_type == enum_class_CallContext); /* - * FIXME Invoking corotine shouldn't initialise context. So just + * FIXME Invoking coroutine shouldn't initialise context. So just * check ctx->current_sub. If it's not null return from here */ if (!PMC_IS_NULL(ctx->current_sub)) @@ -757,7 +757,7 @@ Parrot_pcc_get_regs_used(SHIM_INTERP, ARGIN(const PMC *ctx), int type) =item C -Get pointer to FLOANFAL and INTVAL registers. +Get pointer to FLOATVAL and INTVAL registers. =cut diff --git a/src/io/api.c b/src/io/api.c index f9c02cdf0f..11d746996e 100644 --- a/src/io/api.c +++ b/src/io/api.c @@ -1374,7 +1374,7 @@ Parrot_io_pprintf(PARROT_INTERP, PIOHANDLE os_handle, ARGIN(const char *s), ...) =item C Writes a C string format with varargs to C. This routine uses -Parrot_io_write_s to perform the actual right, and is therefore subject to +Parrot_io_write_s to perform the actual write, and is therefore subject to all the same semantics and limitations. =cut