Skip to content

Instantly share code, notes, and snippets.

@ionoy
Created November 24, 2013 17:09
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save ionoy/7629561 to your computer and use it in GitHub Desktop.
Save ionoy/7629561 to your computer and use it in GitHub Desktop.
{DEBUG_INFO(DEBUG_INFO(def a1 = System.Linq.Enumerable.Where.[char] (_N_closurised_this_ptr.Children, System.Func[char, bool] (macro_Nemerle.Core._N_operator905413823_4554Macro:
def _N_lambda__8285(c : char) : bool
{
DEBUG_INFO((c == 'a'))
}
_N_lambda__8285));
());
DEBUG_INFO(macro_Nemerle.Core.foreachMacro:
def enumerator = DEBUG_INFO(System.Linq.Enumerable.Select.[char, string-] (_N_closurised_this_ptr.Children2, System.Func[char, string-] (macro_Nemerle.Core._N_operator905413823_4554Macro:
def _N_lambda__8291(c : char) : string-
{
DEBUG_INFO((string.Concat (c.ToString (), "1") : string))
}
_N_lambda__8291))).GetEnumerator ();
def loop() : void
{
macro_Nemerle.Core.whenmacroMacro:
if ((enumerator.MoveNext () : bool)) {
(match (enumerator.get_Current ()) {
| (_) as a2 =>
(DEBUG_INFO(DEBUG_INFO(def b = a2;
()));
() :> void)
| _ =>
(() :> void)
};
loop () :> void)
}
else {
(() :> void)
}
}
try {
loop ()
} finally {
(enumerator : System.IDisposable).Dispose ()
});
def f1(letters : string) : void
{
()
}
def f2(letters : string, func : char -> string) : System.Collections.Generic.IEnumerable[string]
{
DEBUG_INFO(DEBUG_INFO(System.Linq.Enumerable.Select.[char, string] (letters, System.Func[char, string] (func))))
}
DEBUG_INFO(def a3 = f1 (_N_closurised_this_ptr.Children);
());
DEBUG_INFO(def a4 = f2 (_N_closurised_this_ptr.Children2, macro_Nemerle.Core._N_operator905413823_4554Macro:
def _N_lambda__8471(c : char) : string
{
DEBUG_INFO((string.Concat (c.ToString (), "2") : string))
}
_N_lambda__8471);
()))}
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment