From 0659562774832c0136faf68da22e51bf51cff055 Mon Sep 17 00:00:00 2001 From: Jose Antonio Ortega Ruiz Date: Mon, 6 Jan 2014 04:51:46 +0100 Subject: Compilation fixes --- doc/mdk_tut.texi | 13 ++++++------- mixguile/xmixguile_cmd_dispatcher.c | 12 ++++++------ 2 files changed, 12 insertions(+), 13 deletions(-) diff --git a/doc/mdk_tut.texi b/doc/mdk_tut.texi index 95b3f54..4d9fdbf 100644 --- a/doc/mdk_tut.texi +++ b/doc/mdk_tut.texi @@ -1,6 +1,6 @@ @c -*-texinfo-*- @c This is part of the GNU MDK Reference Manual. -@c Copyright (C) 2000, 2001, 2002, 2003, 2004, 2005, 2006 +@c Copyright (C) 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2014 @c Free Software Foundation, Inc. @c See the file mdk.texi for copying conditions. @@ -603,15 +603,15 @@ comparison flag: @ftable @code @item JL Jump if @w{@code{[CM] = L}}. OPCODE = 39, MOD = 4. -@itemx JE +@item JE Jump if @w{@code{[CM] = E}}. OPCODE = 39, MOD = 5. -@itemx JG +@item JG Jump if @w{@code{[CM] = G}}. OPCODE = 39, MOD = 6. -@itemx JGE +@item JGE Jump if @code{[CM]} does not equal @code{L}. OPCODE = 39, MOD = 7. -@itemx JNE +@item JNE Jump if @code{[CM]} does not equal @code{E}. OPCODE = 39, MOD = 8. -@itemx JLE +@item JLE Jump if @code{[CM]} does not equal @code{G}. OPCODE = 39, MOD = 9. @end ftable @@ -1314,4 +1314,3 @@ L EQU 5 a CON 20-L END start @end example - diff --git a/mixguile/xmixguile_cmd_dispatcher.c b/mixguile/xmixguile_cmd_dispatcher.c index bbc411d..69b704d 100644 --- a/mixguile/xmixguile_cmd_dispatcher.c +++ b/mixguile/xmixguile_cmd_dispatcher.c @@ -1,7 +1,7 @@ /* -*-c-*- -------------- xmixguile_cmd_dispatcher.c : * Implementation of the functions declared in xmixguile_cmd_dispatcher.h * ------------------------------------------------------------------ - * Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2009 Free Software Foundation, Inc. + * Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2009, 2014 Free Software Foundation, Inc. * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by @@ -15,7 +15,8 @@ * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software - * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. + * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA + * 02110-1301, USA. * */ @@ -65,7 +66,6 @@ static SCM mixvm_cmd_ (SCM cmd, SCM arg) { char *com = NULL, *argu = NULL; - gboolean result; SCM_ASSERT (scm_is_string (cmd) || scm_is_symbol (cmd), cmd, SCM_ARG1, "mixvm-cmd"); @@ -75,9 +75,9 @@ mixvm_cmd_ (SCM cmd, SCM arg) scm_lock_mutex (mutex_); com = scm_to_locale_string (cmd); argu = scm_to_locale_string (arg); - result = mix_vm_cmd_dispatcher_dispatch (vm_dispatcher_, - mix_vm_command_from_string (com), - argu); + (void) mix_vm_cmd_dispatcher_dispatch (vm_dispatcher_, + mix_vm_command_from_string (com), + argu); g_free (com); g_free (argu); -- cgit v1.2.3