Add support for w.d format (#361)

belegdol · web-flow · commit 4010db5e9c03 · 2026-04-25T08:55:06.000-04:00
These appear to be stored without a specific name. Defined here: https://documentation.sas.com/doc/en/pgmsascdc/9.4_3.5/leforinforref/n1n7bmvs1brl23n1dj9cbzau39df.htm
diff --git a/src/sas/readstat_sas7bdat_read.c b/src/sas/readstat_sas7bdat_read.c
@@ -700,7 +700,7 @@ static readstat_variable_t *sas7bdat_init_variable(sas7bdat_ctx_t *ctx, int i,
         goto cleanup;
     }
     size_t len = strlen(variable->format);
-    if (len && ctx->col_info[i].format_width) {
+    if (ctx->col_info[i].format_width) {
         len += snprintf(variable->format + len, sizeof(variable->format) - len,
                 "%d", ctx->col_info[i].format_width);
     }

Original file line number	Diff line number	Diff line change
`@@ -700,7 +700,7 @@ static readstat_variable_t sas7bdat_init_variable(sas7bdat_ctx_t ctx, int i,`
`700`	`700`	`goto cleanup;`
`701`	`701`	`}`
`702`	`702`	`size_t len = strlen(variable->format);`
`703`		`- if (len && ctx->col_info[i].format_width) {`
	`703`	`+ if (ctx->col_info[i].format_width) {`
`704`	`704`	`len += snprintf(variable->format + len, sizeof(variable->format) - len,`
`705`	`705`	`"%d", ctx->col_info[i].format_width);`
`706`	`706`	`}`