From: Phil Burk Date: Thu, 13 Feb 2020 14:56:14 +0000 (-0800) Subject: Merge pull request #71 from frankpolte/master X-Git-Url: http://git.subgeniuskitty.com/pforth/.git/commitdiff_plain/47a1084ddee779dc12d3ecc9ca4903adc250ee0d?hp=7d169e32d0619ecf128abe042ec5ef6a2655e1a1 Merge pull request #71 from frankpolte/master fixes mixed declarations and code warning --- diff --git a/csrc/pfcompil.c b/csrc/pfcompil.c index a3f44f3..01574df 100644 --- a/csrc/pfcompil.c +++ b/csrc/pfcompil.c @@ -1156,9 +1156,10 @@ cell_t ffRefill( void ) if( gCurrentTask->td_InputStream == PF_STDIN ) { /* ACCEPT is deferred so we call it through the dictionary. */ + ThrowCode throwCode; PUSH_DATA_STACK( gCurrentTask->td_SourcePtr ); PUSH_DATA_STACK( TIB_SIZE ); - ThrowCode throwCode = pfCatch( gAcceptP_XT ); + throwCode = pfCatch( gAcceptP_XT ); if (throwCode) { Result = throwCode; goto error;