Untitled
| Run Settings | |
|---|---|
| Language | Ocaml |
| Language Version | |
| Run Command |
| Snippet Metadata | |
|---|---|
| Owner | spencerwi |
| Created | |
| Modified | |
| Visibility | Public |
let draw_progressbar percentage =
print_string ("\r|" ^ (String.init 10 (fun i -> if i < percentage then '=' else ' ')) ^ "|")
let () =
for p = 1 to 10 do
draw_progressbar p;
done;
print_endline "\rDone! "
| Editor Settings | |
|---|---|
| Theme | |
| Key bindings | |
| Full width | |
| Lines |