bf60550ce5
This PR renames `Substring` to `Substring.Raw`. This is to signify its status as a second-class citizen (not deprecated, but no real plans for verification, like `String.Pos.Raw`) and to free up the name `Substring` for a possible future type `String.Substring : String -> Type` so that `s.Substring` is the type of substrings of `s`. The functions `String.toSubstring` and `String.toSubstring'` will remain for now for bootstrapping reasons.
86 lines
2.6 KiB
Text
86 lines
2.6 KiB
Text
[Compiler.result] size: 3
|
|
def foo._closed_0 : SourceInfo :=
|
|
let _x.1 := false;
|
|
let _x.2 := Syntax.missing;
|
|
let _x.3 := @SourceInfo.fromRef _x.2 _x.1;
|
|
return _x.3
|
|
[Compiler.result] size: 1
|
|
def foo._closed_1 : String :=
|
|
let _x.1 := "UnhygienicMain";
|
|
return _x.1
|
|
[Compiler.result] size: 2
|
|
def foo._closed_2 : Name :=
|
|
let _x.1 := foo._closed_1;
|
|
let _x.2 := Name.mkStr1 _x.1;
|
|
return _x.2
|
|
[Compiler.result] size: 1
|
|
def foo._closed_3 : String :=
|
|
let _x.1 := "term_+_";
|
|
return _x.1
|
|
[Compiler.result] size: 2
|
|
def foo._closed_4 : Name :=
|
|
let _x.1 := foo._closed_3;
|
|
let _x.2 := Name.mkStr1 _x.1;
|
|
return _x.2
|
|
[Compiler.result] size: 1
|
|
def foo._closed_5 : String :=
|
|
let _x.1 := "a";
|
|
return _x.1
|
|
[Compiler.result] size: 2
|
|
def foo._closed_6 : Substring.Raw :=
|
|
let _x.1 := foo._closed_5;
|
|
let _x.2 := String.toRawSubstring' _x.1;
|
|
return _x.2
|
|
[Compiler.result] size: 2
|
|
def foo._closed_7 : Name :=
|
|
let _x.1 := foo._closed_5;
|
|
let _x.2 := Name.mkStr1 _x.1;
|
|
return _x.2
|
|
[Compiler.result] size: 4
|
|
def foo._closed_8 : Name :=
|
|
let _x.1 := 1;
|
|
let _x.2 := foo._closed_7;
|
|
let _x.3 := foo._closed_2;
|
|
let _x.4 := addMacroScope _x.3 _x.2 _x.1;
|
|
return _x.4
|
|
[Compiler.result] size: 5
|
|
def foo._closed_9 : Syntax :=
|
|
let _x.1 := [] ◾;
|
|
let _x.2 := foo._closed_8;
|
|
let _x.3 := foo._closed_6;
|
|
let _x.4 := foo._closed_0;
|
|
let _x.5 := Syntax.ident _x.4 _x.3 _x.2 _x.1;
|
|
return _x.5
|
|
[Compiler.result] size: 1
|
|
def foo._closed_10 : String :=
|
|
let _x.1 := "+";
|
|
return _x.1
|
|
[Compiler.result] size: 3
|
|
def foo._closed_11 : Syntax :=
|
|
let _x.1 := foo._closed_10;
|
|
let _x.2 := foo._closed_0;
|
|
let _x.3 := Syntax.atom _x.2 _x.1;
|
|
return _x.3
|
|
[Compiler.result] size: 20
|
|
def foo n : Syntax :=
|
|
let _x.1 := Syntax.missing;
|
|
let _x.2 := 1;
|
|
let _x.3 := false;
|
|
let _x.4 := foo._closed_0;
|
|
let _x.5 := foo._closed_1;
|
|
let _x.6 := foo._closed_2;
|
|
let _x.7 := foo._closed_3;
|
|
let _x.8 := foo._closed_4;
|
|
let _x.9 := foo._closed_5;
|
|
let _x.10 := foo._closed_6;
|
|
let _x.11 := foo._closed_7;
|
|
let _x.12 := foo._closed_8;
|
|
let _x.13 := [] ◾;
|
|
let _x.14 := foo._closed_9;
|
|
let _x.15 := foo._closed_10;
|
|
let _x.16 := foo._closed_11;
|
|
let _x.17 := Nat.reprFast n;
|
|
let _x.18 := SourceInfo.none;
|
|
let _x.19 := @Syntax.mkNumLit _x.17 _x.18;
|
|
let _x.20 := Syntax.node3 _x.4 _x.8 _x.14 _x.16 _x.19;
|
|
return _x.20
|