let inspect_ast_lit (lit : Ast.lit) = match lit with
    | Int(i)    -> Printf.sprintf "Int(%d)" i
    | Float(f)  -> Printf.sprintf "Float(%f)" f
    | String(s) -> Printf.sprintf "String(\"%s\")" s
    | Bool(b)   -> Printf.sprintf "Bool(%B)" b