Small fixup for misspelled words

src/frontend/com_let.c

@@ -300,7 +300,7 @@ static int find_indices(char *s, const struct dvec *vec_dst,
         *p_end = '\0';
         if (dim_cur == v_numdims_dst) {
             (void) fprintf(cp_err,
-                    "Final dimension exceded maximum number.\n");
+                    "Final dimension exceeded maximum number.\n");
             return -1;
         }
         if (get_index_values(s, v_dims_dst[dim_cur],
@@ -375,7 +375,7 @@ static int find_indices(char *s, const struct dvec *vec_dst,
         else {
             (void) fprintf(cp_err, "Error: Only %d dimensions "
                     "were supplied, but %d are needed. The last dimension "
-                    "may be omitted, in which case it will defalt to the "
+                    "may be omitted, in which case it will default to the "
                     "full range of that dimension.\n",
                     dim_cur, v_numdims_dst);
         }
@@ -400,7 +400,7 @@ static int get_index_values(char *s, int n_elem_this_dim,
     char *p_colon;
     if ((p_colon = strchr(s, ':')) == (char *) NULL) { /* One expression */
         if (get_one_index_value(s, &p_range->low) != 0) {
-            (void) fprintf(cp_err, "Error geting index.\n");
+            (void) fprintf(cp_err, "Error getting index.\n");
             return -1;
         }
         p_range->high = p_range->low;
@@ -411,10 +411,10 @@ static int get_index_values(char *s, int n_elem_this_dim,
             const int rc = get_one_index_value(s, &p_range->low);
             if (rc != 0) {
                 if (rc < 0) { /* error */
-                    (void) fprintf(cp_err, "Error geting low range.\n");
+                    (void) fprintf(cp_err, "Error getting low range.\n");
                     return -1;
                 }
-                /* +1 -> Else use defalt */
+                /* +1 -> Else use default */
                 p_range->low = 0;
             }
         }
@@ -423,10 +423,10 @@ static int get_index_values(char *s, int n_elem_this_dim,
             const int rc = get_one_index_value(s, &p_range->high);
             if (rc != 0) {
                 if (rc < 0) { /* error */
-                    (void) fprintf(cp_err, "Error geting high range.\n");
+                    (void) fprintf(cp_err, "Error getting high range.\n");
                     return -1;
                 }
-                /* +1 -> Else use defalt */
+                /* +1 -> Else use default */
                 p_range->high = n_elem_this_dim - 1;
             }
         }

src/frontend/streams.c

@@ -226,7 +226,7 @@ void fixdescriptors(void)
     /* Warn if there was some failure */
     if (dup2_fail) {
         (void) fprintf(cp_err,
-                "I/O descriptior failure: %s.\n", strerror(errno));
+                "I/O descriptor failure: %s.\n", strerror(errno));
     }
 } /* end of function fixdescriptors */
 

src/xspice/icm/table/table2D/cfunc.mod

@@ -508,7 +508,7 @@ static Table2_Data_t *init_local_data(const char *filename, int order)
             /* generate  column data structure (y) */
             if ((loc->ycol = (double *) calloc((size_t) iy,
                     sizeof(double))) == (double *) NULL) {
-                cm_message_printf("Unable to allocate colum structure.");
+                cm_message_printf("Unable to allocate column structure.");
                 xrc = -1;
                 goto EXITPOINT;
             }

src/xspice/icm/table/table3D/cfunc.mod

@@ -528,7 +528,7 @@ static Table3_Data_t *init_local_data(const char *filename, int interporder)
             /* generate  column data structure (y) */
             if ((loc->ycol = (double *) calloc((size_t) iy,
                     sizeof(double))) == (double *) NULL) {
-                cm_message_printf("Unable to allocate colum structure.");
+                cm_message_printf("Unable to allocate column structure.");
                 xrc = -1;
                 goto EXITPOINT;
             }