Codebase list coq / 7736febd-25dd-4a65-b378-c348b02cf540/main gramlib / gramext.ml
7736febd-25dd-4a65-b378-c348b02cf540/main

Tree @7736febd-25dd-4a65-b378-c348b02cf540/main (Download .tar.gz)

gramext.ml @7736febd-25dd-4a65-b378-c348b02cf540/mainraw · history · blame

(* camlp5r *)
(* gramext.ml,v *)
(* Copyright (c) INRIA 2007-2017 *)

type position =
  | First
  | Last
  | Before of string
  | After of string

type g_assoc = NonA | RightA | LeftA

let pr_assoc = function
  | LeftA -> Pp.str "left associativity"
  | RightA -> Pp.str "right associativity"
  | NonA -> Pp.str "no associativity"