@@ -147,39 +147,55 @@ external ( or ) : bool -> bool -> bool = "%sequor"
147147external __LOC__ : string = " %loc_LOC"
148148(* * [__LOC__] returns the location at which this expression appears in
149149 the file currently being parsed by the compiler, with the standard
150- error format of OCaml: "File %S, line %d, characters %d-%d" *)
150+ error format of OCaml: "File %S, line %d, characters %d-%d".
151+ @since 4.02.0
152+ *)
151153external __FILE__ : string = " %loc_FILE"
152154(* * [__FILE__] returns the name of the file currently being
153- parsed by the compiler. *)
155+ parsed by the compiler.
156+ @since 4.02.0
157+ *)
154158external __LINE__ : int = " %loc_LINE"
155159(* * [__LINE__] returns the line number at which this expression
156- appears in the file currently being parsed by the compiler. *)
160+ appears in the file currently being parsed by the compiler.
161+ @since 4.02.0
162+ *)
157163external __MODULE__ : string = " %loc_MODULE"
158164(* * [__MODULE__] returns the module name of the file being
159- parsed by the compiler. *)
165+ parsed by the compiler.
166+ @since 4.02.0
167+ *)
160168external __POS__ : string * int * int * int = " %loc_POS"
161169(* * [__POS__] returns a tuple [(file,lnum,cnum,enum)], corresponding
162170 to the location at which this expression appears in the file
163171 currently being parsed by the compiler. [file] is the current
164172 filename, [lnum] the line number, [cnum] the character position in
165- the line and [enum] the last character position in the line. *)
173+ the line and [enum] the last character position in the line.
174+ @since 4.02.0
175+ *)
166176
167177external __LOC_OF__ : 'a -> string * 'a = " %loc_LOC"
168178(* * [__LOC_OF__ expr] returns a pair [(loc, expr)] where [loc] is the
169179 location of [expr] in the file currently being parsed by the
170180 compiler, with the standard error format of OCaml: "File %S, line
171- %d, characters %d-%d" *)
181+ %d, characters %d-%d".
182+ @since 4.02.0
183+ *)
172184external __LINE_OF__ : 'a -> int * 'a = " %loc_LINE"
173185(* * [__LINE__ expr] returns a pair [(line, expr)], where [line] is the
174186 line number at which the expression [expr] appears in the file
175- currently being parsed by the compiler. *)
187+ currently being parsed by the compiler.
188+ @since 4.02.0
189+ *)
176190external __POS_OF__ : 'a -> (string * int * int * int ) * 'a = " %loc_POS"
177191(* * [__POS_OF__ expr] returns a pair [(expr,loc)], where [loc] is a
178192 tuple [(file,lnum,cnum,enum)] corresponding to the location at
179193 which the expression [expr] appears in the file currently being
180194 parsed by the compiler. [file] is the current filename, [lnum] the
181195 line number, [cnum] the character position in the line and [enum]
182- the last character position in the line. *)
196+ the last character position in the line.
197+ @since 4.02.0
198+ *)
183199
184200(* * {6 Composition operators} *)
185201
0 commit comments