Source

mutated_ocaml / testsuite / tests / misc / fib.ml

Diff from to

File testsuite/tests/misc/fib.ml

 (*                                                                     *)
 (***********************************************************************)
 
-(* $Id: fib.ml 11156 2011-07-27 14:17:02Z doligez $ *)
+(* $Id: fib.ml 12800 2012-07-30 18:59:07Z doligez $ *)
 
 let rec fib n =
   if n < 2 then 1 else fib(n-1) + fib(n-2)
 
 let _ =
   let n =
-    if Array.length Sys.argv >= 2 
+    if Array.length Sys.argv >= 2
     then int_of_string Sys.argv.(1)
     else 40 in
   print_int(fib n); print_newline(); exit 0
-