diff --git a/src/gsfml/fzblender.c b/src/gsfml/fzblender.c
index 22055b38bbc..e369cf354b7 100644
--- a/src/gsfml/fzblender.c
+++ b/src/gsfml/fzblender.c
@@ -463,7 +463,6 @@ EXTERN_MSC int GMT_fzblender (void *V_API, int mode, void *args) {
 		
 		if (Ctrl->E.active) {	/* Now apply the secondary filter */
 			struct GMT_DATASET *D = NULL;
-			char s_in_string[GMT_LEN256], s_out_string[GMT_LEN256];
 			/* Retrieve the primary filtering results */
 			if ((D = GMT_Read_VirtualFile (API, destination)) == NULL) {
 				Return (API->error);
@@ -485,7 +484,6 @@ EXTERN_MSC int GMT_fzblender (void *V_API, int mode, void *args) {
 			if (GMT_Open_VirtualFile (API, GMT_IS_DATASET, GMT_IS_LINE, GMT_OUT|GMT_IS_REFERENCE, NULL, destination) == GMT_NOTSET) {
 				Return (API->error);
 			}
-			//sprintf (buffer, "-F%s -E -N%d %s ->%s", Ctrl->E.args, POS_DR, s_in_string, s_out_string);
 			sprintf (buffer, "-F%s -N%d %s ->%s", Ctrl->E.args, POS_DR, source, destination);
 			GMT_Report (API, GMT_MSG_DEBUG, "Args to secondary filter1d: %s\n", buffer);
 			if ((status = GMT_Call_Module (API, "filter1d", GMT_MODULE_CMD, buffer))) {
diff --git a/src/seis/grdshake.c b/src/seis/grdshake.c
index cc4225e0e35..c0cf6f32f8b 100644
--- a/src/seis/grdshake.c
+++ b/src/seis/grdshake.c
@@ -91,6 +91,7 @@ static void Free_Ctrl (struct GMT_CTRL *GMT, struct SHAKE_CTRL *C) {	/* Dealloca
 	gmt_M_free(GMT, C);
 }
 
+#if 0
 static char set_unit_and_mode (char *arg, unsigned int *mode) {
 	unsigned int k = 0;
 	*mode = GMT_GREATCIRCLE;	/* Default is great circle distances */
@@ -100,6 +101,7 @@ static char set_unit_and_mode (char *arg, unsigned int *mode) {
 	}
 	return (arg[k]);
 }
+#endif
 
 static int usage (struct GMTAPI_CTRL *API, int level) {
 	const char *name = gmt_show_name_and_purpose (API, THIS_MODULE_LIB, THIS_MODULE_CLASSIC_NAME, THIS_MODULE_PURPOSE);
@@ -150,7 +152,7 @@ static int parse (struct GMT_CTRL *GMT, struct SHAKE_CTRL *Ctrl, struct GMT_Z_IO
 	 */
 
 	unsigned int n_errors = 0, n_files = 0, pos = 0;
-	char txt_a[GMT_LEN256] = {""}, p[GMT_LEN16] = {""};
+	char p[GMT_LEN16] = {""};
 	struct GMT_OPTION *opt = NULL;
 	struct GMTAPI_CTRL *API = GMT->parent;
 
@@ -266,9 +268,7 @@ EXTERN_MSC int GMT_grdshake (void *V_API, int mode, void *args) {
 	struct GMT_DATASET *Lin = NULL;
 	struct GMT_GRID *G = NULL;
 	struct GMT_GRID *Grid[3] = {NULL, NULL, NULL};
-	struct GMT_RECORD *Out = NULL;
 	struct GMT_Z_IO io;
-	struct GMT_OPTION *opt = NULL;
 	struct SHAKE_CTRL *Ctrl = NULL;
 	struct GMT_CTRL *GMT = NULL, *GMT_cpy = NULL;
 	struct GMT_OPTION *options = NULL;
diff --git a/src/seis/grdvs30.c b/src/seis/grdvs30.c
index 2842e665688..8d02ad4017a 100644
--- a/src/seis/grdvs30.c
+++ b/src/seis/grdvs30.c
@@ -159,8 +159,8 @@ static int parse (struct GMT_CTRL *GMT, struct VS30_CTRL *Ctrl, struct GMT_Z_IO
 	 * returned when registering these sources/destinations with the API.
 	 */
 
-	unsigned int n_errors = 0, n_files = 0, pos = 0;
-	char txt_a[GMT_LEN256] = {""}, p[GMT_LEN16] = {""}, *pch;
+	unsigned int n_errors = 0, n_files = 0;
+	char p[GMT_LEN16] = {""}, *pch;
 	struct GMT_OPTION *opt = NULL;
 	struct GMTAPI_CTRL *API = GMT->parent;
 
@@ -258,14 +258,13 @@ EXTERN_MSC int GMT_grdvs30 (void *V_API, int mode, void *args) {
 	unsigned int row, col, j, nr, k;
 	uint64_t ij;
 	int error = 0;
-	char cmd[GMT_LEN256] = {""}, data_grd[GMT_LEN16] = {""};
+	char cmd[GMT_LEN256] = {""};
 	char crat_grd[GMT_LEN16] = {""}, mask_grd[GMT_LEN16] = {""}, grad_grd[GMT_LEN16] = {""};
 	float crat, lg;
 	double (*table)[4], tvs[2], vv, wesn[4];
 
 	struct GMT_GRID *G = NULL, *Ggrad = NULL, *Gcrat = NULL, *Gland = NULL, *Gout = NULL;
 	struct GMT_Z_IO io;
-	struct GMT_OPTION *opt = NULL;
 	struct VS30_CTRL *Ctrl = NULL;
 	struct GMT_CTRL *GMT = NULL, *GMT_cpy = NULL;
 	struct GMT_OPTION *options = NULL;