@@ -12,7 +12,7 @@ open Microsoft.FSharp.Compiler
12
12
13
13
14
14
15
- val internal stdinMockFilename : string
15
+ val stdinMockFilename : string
16
16
17
17
[<Sealed>]
18
18
type LightSyntaxStatus =
@@ -42,30 +42,30 @@ val resetLexbufPos : string -> UnicodeLexing.Lexbuf -> unit
42
42
val mkLexargs : 'a * string list * LightSyntaxStatus * LexResourceManager * LexerIfdefStack * ErrorLogger -> lexargs
43
43
val reusingLexbufForParsing : UnicodeLexing.Lexbuf -> ( unit -> 'a ) -> 'a
44
44
45
- val (* internal *) usingLexbufForParsing : UnicodeLexing.Lexbuf * string -> ( UnicodeLexing.Lexbuf -> 'a ) -> 'a
46
- val internal defaultStringFinisher : 'a -> 'b -> byte [] -> Parser.token
47
- val internal callStringFinisher : ( 'a -> 'b -> byte [] -> 'c ) -> AbstractIL.Internal.ByteBuffer -> 'a -> 'b -> 'c
48
- val internal addUnicodeString : AbstractIL.Internal.ByteBuffer -> string -> unit
49
- val internal addUnicodeChar : AbstractIL.Internal.ByteBuffer -> int -> unit
50
- val internal addByteChar : AbstractIL.Internal.ByteBuffer -> char -> unit
51
- val internal stringBufferAsString : byte [] -> string
52
- val internal stringBufferAsBytes : AbstractIL.Internal.ByteBuffer -> byte []
53
- val internal stringBufferIsBytes : AbstractIL.Internal.ByteBuffer -> bool
54
- val internal newline : Lexing.LexBuffer < 'a > -> unit
55
- val internal trigraph : char -> char -> char -> char
56
- val internal digit : char -> int32
57
- val internal hexdigit : char -> int32
58
- val internal unicodeGraphShort : string -> uint16
59
- val internal hexGraphShort : string -> uint16
60
- val internal unicodeGraphLong : string -> LongUnicodeLexResult
61
- val internal escape : char -> char
45
+ val usingLexbufForParsing : UnicodeLexing.Lexbuf * string -> ( UnicodeLexing.Lexbuf -> 'a ) -> 'a
46
+ val defaultStringFinisher : 'a -> 'b -> byte [] -> Parser.token
47
+ val callStringFinisher : ( 'a -> 'b -> byte [] -> 'c ) -> AbstractIL.Internal.ByteBuffer -> 'a -> 'b -> 'c
48
+ val addUnicodeString : AbstractIL.Internal.ByteBuffer -> string -> unit
49
+ val addUnicodeChar : AbstractIL.Internal.ByteBuffer -> int -> unit
50
+ val addByteChar : AbstractIL.Internal.ByteBuffer -> char -> unit
51
+ val stringBufferAsString : byte [] -> string
52
+ val stringBufferAsBytes : AbstractIL.Internal.ByteBuffer -> byte []
53
+ val stringBufferIsBytes : AbstractIL.Internal.ByteBuffer -> bool
54
+ val newline : Lexing.LexBuffer < 'a > -> unit
55
+ val trigraph : char -> char -> char -> char
56
+ val digit : char -> int32
57
+ val hexdigit : char -> int32
58
+ val unicodeGraphShort : string -> uint16
59
+ val hexGraphShort : string -> uint16
60
+ val unicodeGraphLong : string -> LongUnicodeLexResult
61
+ val escape : char -> char
62
62
63
- exception internal ReservedKeyword of string * Range.range
64
- exception internal IndentationProblem of string * Range.range
63
+ exception ReservedKeyword of string * Range.range
64
+ exception IndentationProblem of string * Range.range
65
65
66
66
module Keywords =
67
- val (* internal *) KeywordOrIdentifierToken : lexargs -> UnicodeLexing.Lexbuf -> string -> Parser.token
68
- val (* internal *) IdentifierToken : lexargs -> UnicodeLexing.Lexbuf -> string -> Parser.token
69
- val (* internal *) QuoteIdentifierIfNeeded : string -> string
70
- val mutable (* internal *) permitFsharpKeywords : bool
67
+ val KeywordOrIdentifierToken : lexargs -> UnicodeLexing.Lexbuf -> string -> Parser.token
68
+ val IdentifierToken : lexargs -> UnicodeLexing.Lexbuf -> string -> Parser.token
69
+ val QuoteIdentifierIfNeeded : string -> string
70
+ val mutable permitFsharpKeywords : bool
71
71
val keywordNames : string list
0 commit comments