let x = a.b
let x = (a.b).c
let x = H20.Water.water.h
let x = p.Parser.token
let x = (p.Lang.Parser.token).pos
;;lexbuf.lnum <- (lexbuf.lnum + 1)
;;(parser.lexbuf).lnum <- ((parser.lexbuf).lnum + 1)
let x = arr.(0)
let x = arr.((x : int))
let x = (arr.(0)).(1)
let x = (arr.((x : int))).((y : int))
;;arr.(0) <- (a + b)
;;f ()
;;(f ()) ()
;;f a
;;(f a) a
;;f a
;;f (x : int)
;;f a b c
;;f a b c
;;f ~a ~b:bArg ?c ?d:expr
;;((f ~a ~b:bArg ?c ?d:expr) ~a ~b:bArg ?c ?d:expr) ~a ~b:bArg ?c ?d:expr
;;f ~a:(x : int) ?b:(y : int)
;;connection#platformId
;;((connection#left)#account)#accountName
;;john#age #= 99
;;(john#son)#age #= (steve#age - 5)
;;dict#\n #= abc
;;dict#\" #= dict2#\"