verify that all known bugs have been fixed and that none of the datasets give any issues with string contents or line metadata

This commit is contained in:
2024-07-20 01:23:38 +01:00
parent 59ac0aded8
commit 8b296d0332
2 changed files with 19 additions and 8 deletions

View File

@@ -4,7 +4,9 @@ ann
"allowVectorExps true" "allowVectorExps true"
in in
../data-sets/svelte.sml ../data-sets/svelte.sml
(* (* other datasets commented out
* because they didn't detect any issues
* and give much longer compile times
../data-sets/rust.sml ../data-sets/rust.sml
../data-sets/seph.sml ../data-sets/seph.sml
../data-sets/automerge.sml ../data-sets/automerge.sml

View File

@@ -65,13 +65,22 @@ struct
fun main () = fun main () =
let let
val (rope, gap) = compareTxns SvelteComponent.txns val _ = compareTxns SvelteComponent.txns
val _ = print "string contents are equal\n" val _ = print "string contents and line metadata are equal for svelte\n"
val _ = LineGap.verifyLines gap
(* (* compile times are much longer with the other datasets included
val _ = compareTxns Rust.txns * but running those datasets did not detect any issues after
val _ = compareTxns Seph.txns * all issues were fixed with Svelte.
val _ = compareTxns Automerge.txns
* So comment these datasets out.
val _ = compareTxns RustCode.txns
val _ = print "string contents and line metadata are equal for rust\n"
val _ = compareTxns SephBlog.txns
val _ = print "string contents and line metadata equal for seh"
val _ = compareTxns AutomergePaper.txns
val _ = print "string contents and line metadata equal for automerge"
*) *)
in in
() ()