From 6595e9f7b118543e6a26a305cbc682b7e6d85d65 Mon Sep 17 00:00:00 2001 From: Nick Briggs Date: Wed, 7 Jun 2017 20:39:27 -0700 Subject: [PATCH] Add braces to suppress dangling else warning. modified: inc/tosfns.h --- inc/tosfns.h | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/inc/tosfns.h b/inc/tosfns.h index a1029c6..9d8a9e1 100755 --- a/inc/tosfns.h +++ b/inc/tosfns.h @@ -535,7 +535,7 @@ op_fn_common: \ LispPTR closure_env = (LispPTR) 0xffffffff; \ {register int NEXTBLOCK = NIL; \ defcell = fn_defcell; \ - if( (defcell->ccodep == 0) ) \ + if(defcell->ccodep == 0) { \ if(GetTypeNumber(defcell->defpointer)==TYPE_COMPILED_CLOSURE) \ { /* setup closure */ \ closure=(CClosure *)Addr68k_from_LADDR(defcell->defpointer);\ @@ -550,6 +550,7 @@ op_fn_common: \ defcell = (DefCell *)GetDEFCELL68k(ATOM_INTERPRETER); \ needpush = 1; \ } /*else end */ \ + } \ LOCFNCELL = (struct fnhead *)Addr68k_from_LADDR(defcell->defpointer); \ BCE_CURRENTFX->pc = ((UNSIGNED)PCMAC \ - (UNSIGNED)FuncObj) + fn_opcode_size; \