diff --git a/src/glpkR.h b/src/glpkR.h index bad42a53d775a14dd68c3c028bf2886bb5fd85a9..9567f234355478eb7559394eda4564ec0c575d58 100644 --- a/src/glpkR.h +++ b/src/glpkR.h @@ -158,7 +158,7 @@ if (dupB) { \ Rf_error("Duplicate indices 'ia[%i] = ia[%i] = %i' and 'ja[%i] = ja[%i] = %i' not allowed!", dupA+1, dupB+1, rm[dupA], dupA+1, dupB+1, rn[dupB]); \ } \ - UNPROTECT(1) + UNPROTECT(1); \ } while (0) #else #define checkDupIndices(m, n, ne)