Removing lines with more than 80 characters in tests
This commit is contained in:
@ -215,7 +215,10 @@ match get_result program with
|
||||
(* Sum multiples of 3 and 5 program *)
|
||||
|
||||
let program =
|
||||
"let rec sum n: int -> int = if n % 3 == 0 || n % 5 == 0 then n + sum (n - 1) else if n < 1 then 0 else sum (n - 1) in sum"
|
||||
"let rec sum n: int -> int =
|
||||
if n % 3 == 0 || n % 5 == 0
|
||||
then n + sum (n - 1)
|
||||
else if n < 1 then 0 else sum (n - 1) in sum"
|
||||
;;
|
||||
|
||||
Printf.printf "Sum multiples of 3 and 5 program: ";
|
||||
|
||||
Reference in New Issue
Block a user