diff options
| author | ckeller <ckeller@users.noreply.github.com> | 2019-02-14 20:09:40 +0100 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2019-02-14 20:09:40 +0100 |
| commit | ec41af7ac01cef7c30785e6dd704381f31e7c2d3 (patch) | |
| tree | 13d51483c50d7b5a668d90b8b67a8b99ef0fbe56 /src/lfsc/lfscLexer.mll | |
| parent | ba22fad2fb46962eef5f30d976e9eaeb587023a0 (diff) | |
| download | smtcoq-ec41af7ac01cef7c30785e6dd704381f31e7c2d3.tar.gz smtcoq-ec41af7ac01cef7c30785e6dd704381f31e7c2d3.zip | |
V8.7 (#36)
Port SMTCoq to Coq-8.7
Diffstat (limited to 'src/lfsc/lfscLexer.mll')
| -rw-r--r-- | src/lfsc/lfscLexer.mll | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/lfsc/lfscLexer.mll b/src/lfsc/lfscLexer.mll index 3e8d5f9..242df00 100644 --- a/src/lfsc/lfscLexer.mll +++ b/src/lfsc/lfscLexer.mll @@ -245,7 +245,7 @@ and scan_string buf start = parse { let ofs = lexbuf.lex_start_pos in let len = lexbuf.lex_curr_pos - ofs in - Quoted_string_buffer.add_substring buf lexbuf.lex_buffer ofs len; + Quoted_string_buffer.add_substring buf (Bytes.to_string lexbuf.lex_buffer) ofs len; Quoted_string_buffer.add_lexeme buf lexbuf; scan_string buf start lexbuf } |