This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
public class NameListPage | |
{ | |
public Name : string | |
{ | |
mutable _name : string; | |
get | |
{ | |
server.GetName(name => { ServerName = name }); | |
_name | |
} |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
class XInt { public F() : void {} } | |
class XString { public G() : void {} } | |
class XObject | |
{ | |
public static @()(_ : XObject, x : int) : XInt { XInt(); } | |
public static @()(_ : XObject, x : int) : XString { XString(); } | |
public X() : void {} | |
} |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
/// <summary> | |
/// Transforms system type identifier with generic arguments to the parse-tree expression. | |
/// Number of elemnts in args must match number of generic parameters in the systemType. | |
/// </summary> | |
/// <example> | |
/// "NS.A`2+B`1", ["X", "Y", "Z"] ==> <[ NS.A.[X, Y].B.[Z] ]> | |
/// </example> | |
public static FromSystemType(manager : ManagerClass, systemType : string, args : list[string]) : PExpr | |
{ | |
if (string.IsNullOrEmpty (systemType)) <[]> |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Main() : void | |
{ | |
def type = "A.B`2+C`1"; | |
def args = ["X", "Y", "Z"].ToList(); | |
def re = Regex(@"`(\d)"); | |
def sp = re.Split(type.Replace('+', '.'), int.MaxValue); | |
def sb = StringBuilder(); |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
// Calculator.CalcParser | |
private mutable mutable __GENERATED_PEG__Memeoize_Pos__start__ : int | |
// Calculator.CalcParser | |
private mutable mutable __GENERATED_PEG__Memeoize_End__start__ : int | |
// Calculator.CalcParser | |
private mutable mutable __GENERATED_PEG__Memeoize_Res__start__ : int | |
// Calculator.CalcParser |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
private __GENERATED_PEG__RULE__sumOrSubx__(position : int, text : string) : int * int | |
{ | |
mutable result; | |
def p = unchecked | |
{ | |
mutable (c : char); | |
_ = c; | |
{ | |
_ = "CaptureH[sumOrSub](CaptureA[(int, List[(Chars, Void, int)])](CaptureA[(int, List[(Chars, Void, int)])](CaptureA[int](mulOrDiv) CaptureA[List[(Chars, Void, int)]](CaptureA[(Chars, Void, int)](CaptureA[(Chars, Void, int)](CaptureA[Chars]('+' / '-') CaptureA[Void](spaces) CaptureA[int](mulOrDiv)))*))))"; |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
private __GENERATED_PEG__RULE__startx__(position : int, text : string) : int | |
{ | |
unchecked | |
{ | |
mutable (c : char); | |
_ = c; | |
{ | |
mutable token_1; | |
if (__GENERATED_PEG__Memeoize_Pos__start__ == position) |
NewerOlder