diff options
-rw-r--r-- | ChangeLog | 5 | ||||
-rw-r--r-- | match.c | 4 |
2 files changed, 7 insertions, 2 deletions
@@ -1,5 +1,10 @@ 2012-03-01 Kaz Kylheku <kaz@kylheku.com> + * match.c (sem_error, file_err): Bugfix: pull text formatted source + location using source_loc_str rather than raw object using source_loc. + +2012-03-01 Kaz Kylheku <kaz@kylheku.com> + * match.c (v_load): Fixed broken functionality. Failing to evaluate directives following the load and consume input properly. Check for errors during the parse and throw an exception. @@ -84,7 +84,7 @@ static void sem_error(val form, val fmt, ...) va_start (vl, fmt); if (form) - format(stream, lit("(~a) "), source_loc(form), nao); + format(stream, lit("(~a) "), source_loc_str(form), nao); (void) vformat(stream, fmt, vl); va_end (vl); @@ -99,7 +99,7 @@ static void file_err(val form, val fmt, ...) va_start (vl, fmt); if (form) - format(stream, lit("(~a) "), source_loc(form), nao); + format(stream, lit("(~a) "), source_loc_str(form), nao); (void) vformat(stream, fmt, vl); va_end (vl); |