summaryrefslogblamecommitdiffstats
path: root/oecho/oecho0.ml
blob: fed5a003a3398195351b63bdca0260b9e64c72d0 (plain) (tree)
1
2
3
4
5
6
7
8
9








                                     
open Arg
open Unix
open Scanf
open Printf

let num = Array.length Sys.argv
let _ = if num >= 2 then
    Printf.printf "%s\n" Sys.argv.(1)
    else Printf.printf "\n"