Skip to content

Commit 236c505

Browse files
committed
update
1 parent 4ac914e commit 236c505

File tree

2 files changed

+12
-3
lines changed

2 files changed

+12
-3
lines changed

.gitignore

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1,3 +1,4 @@
11
_build/
22
results-testcomp-*
33
*.install
4+
results-report

src/symbocalypse.ml

Lines changed: 11 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -43,14 +43,22 @@ let owi =
4343
let exploration_conv =
4444
let of_string s =
4545
match String.lowercase_ascii s with
46-
| ("fifo" | "lifo" | "random" | "smart") as s -> Ok s
46+
| ( "fifo" | "lifo" | "random" | "random-unseen-then-random" | "rarity"
47+
| "hot-path-penalty" | "rarity-aging" | "rarity-depth-aging"
48+
| "rarity-depth-loop-aging" ) as s ->
49+
Ok s
4750
| _ ->
48-
Fmt.error_msg {|Expected "fifo", "lifo" or "random" but got "%s"|} s
51+
Fmt.error_msg
52+
{|Expected "fifo", "lifo", "random", "random-unseen-then-random", "rarity", "hot-path-penalty", "rarity-aging", "rarity-depth-aging", or "rarity-depth-loop-aging", "rarity-depth-loop-aging-random", "rarity-depth-loop-aging-random" but got "%s"|}
53+
s
4954
in
5055
Arg.conv (of_string, Fmt.string)
5156
in
5257
let doc = {|exploration strategy to use ("fifo", "lifo" or "random")|} in
53-
Arg.(value & opt exploration_conv "random" & info [ "exploration" ] ~doc)
58+
Arg.(
59+
value
60+
& opt exploration_conv "rarity-depth-loop-aging-random"
61+
& info [ "exploration" ] ~doc )
5462
and+ bench =
5563
let doc = "enable benchmarks" in
5664
Arg.(value & flag & info [ "bench" ] ~doc ~docs:sdocs)

0 commit comments

Comments
 (0)