Leave statement caret at the start of literals

This allows a precise location to be reported for errors within literals, by
adding the offset of the error in the literal to the caret.  This will be used
to report nice errors for things like regular expressions and supported XSD
datatypes.

1 files changed, 4 insertions, 1 deletions

diff --git a/src/n3.c b/src/n3.c
index 80c7b9fe..5940c010 100644
--- a/src/n3.c
+++ b/src/n3.c
@@ -15,6 +15,7 @@
 */
 
 #include "byte_source.h"
+#include "caret.h"
 #include "env.h"
 #include "namespaces.h"
 #include "node.h"
@@ -732,6 +733,7 @@ read_object(SerdReader* const  reader,
             bool* const        ate_dot)
 {
   const size_t orig_stack_size = reader->stack.size;
+  SerdCaret    orig_caret      = reader->source->caret;
 
   assert(ctx->subject);
 
@@ -782,6 +784,7 @@ read_object(SerdReader* const  reader,
     break;
   case '\"':
   case '\'':
+    ++orig_caret.col;
     st = read_literal(reader, &o, ate_dot);
     break;
   default:
@@ -790,7 +793,7 @@ read_object(SerdReader* const  reader,
   }
 
   if (!st && simple && o) {
-    st = emit_statement(reader, *ctx, o);
+    st = emit_statement_at(reader, *ctx, o, &orig_caret);
   }
 
   serd_stack_pop_to(&reader->stack, orig_stack_size);