diff --git a/libguile/goops.c b/libguile/goops.c index 96d03a3da..89047cf46 100644 --- a/libguile/goops.c +++ b/libguile/goops.c @@ -1495,7 +1495,8 @@ SCM_DEFINE (scm_sys_allocate_instance, "%allocate-instance", 2, 0, 0, /* Set all SCM-holding slots to unbound */ for (i = 0; i < n; i++) - { scm_t_wchar c = scm_i_symbol_ref (layout, i*2); + { + scm_t_wchar c = scm_i_symbol_ref (layout, i*2); if (c == 'p') SCM_STRUCT_DATA (obj)[i] = SCM_UNPACK (SCM_GOOPS_UNBOUND); else if (c == 's') diff --git a/libguile/vm-i-loader.c b/libguile/vm-i-loader.c index e242ef9bf..ef53cdd02 100644 --- a/libguile/vm-i-loader.c +++ b/libguile/vm-i-loader.c @@ -107,7 +107,8 @@ VM_DEFINE_LOADER (90, load_wide_string, "load-wide-string") FETCH_LENGTH (len); if (SCM_UNLIKELY (len % 4)) - { finish_args = scm_list_1 (scm_from_size_t (len)); + { + finish_args = scm_list_1 (scm_from_size_t (len)); goto vm_error_bad_wide_string_length; }