The Weird and The Wonderful

void IEnumerable<Control>IterateUITree(Control c)<br />
{<br />
  var result = new List<Control>();<br />
  result.Add(c);<br />
  foreach(Control child in c.Children)<br />
    IterateUITree(child, result);<br />
  return result;<br />
}<br />
void IterateUITree(Control c, List<Control> result)<br />
{<br />
  result.Add(c);<br />
  foreach(Control child in c.Children)<br />
    IterateUITree(child, result);<br />
}<br />

<br />
(* Fibonacci Number formula *)<br />
let rec fib n =<br />
    match n with<br />
    | 0 | 1 -> n<br />
    | _ -> fib (n - 1) + fib (n - 2)<br />
 <br />
(* An alternative approach - a lazy recursive sequence of Fibonacci numbers *)<br />
let rec fibs = seq {<br />
    yield! [1; 1];<br />
    for (x, y) in Seq.zip fibs (Seq.skip 1 fibs) -> x + y }<br />
 <br />
(* Print even fibs *)<br />
[1 .. 10]<br />
|> List.map     fib<br />
|> List.filter  (fun n -> (n mod 2) = 0)<br />
|> printlist<br />
 <br />
(* Same thing, using Comprehension syntax *)<br />
[ for i in 1..10 do<br />
    let r = fib i<br />
    if r % 2 = 0 then yield r ] br />
|> printlist<br />

using System;
using System.IO;
using System.Collections.Generic;
using System.Linq;
using System.Text;

namespace Linq
{
    class Program
    {
        static void Main(string[] args)
        {
            ListFiles(new DirectoryInfo("c:\\"));
        }

        static void ListFiles(DirectoryInfo dir)
        {
            var Directories = from dirs in dir.GetDirectories()
                              orderby dirs.FullName
                              select dirs;

            foreach(DirectoryInfo directory in Directories)
            {
                Console.WriteLine("Directory: <" + directory.FullName + "> contains the following files:");

                var Files = from file in directory.GetFiles()
                            orderby file.FullName
                            select file;

                foreach (FileInfo file in Files)
                {
                    Console.WriteLine("---" + file.FullName);
                }
            }
        }
    }
}

C:\
  A
    A1
      A11
        File1
        File2

static void ListDirectories(DirectoryInfo dir)
{
    var BaseDir = from dirs in dir.GetDirectories()
                         orderby dirs.FullName
                         select dirs;

    foreach (DirectoryInfo thisDir in BaseDir)
    {
        var TheDirectory = from dirs in thisDir.GetDirectories("*", SearchOption.AllDirectories)
                           orderby dirs.FullName
                           select dirs;

        Console.WriteLine("Directory: <" + thisDir.FullName + "> contains the following directories:");

        foreach (DirectoryInfo directory in TheDirectory)
        {
            Console.WriteLine("  --[" + directory.FullName + "]");
        }
    }
}

static void ListDirectories(DirectoryInfo dir)
{
    var BaseDir = from dirs in dir.GetDirectories()
                  orderby dirs.FullName
                  select dirs;

    Thread.BeginCriticalRegion();
    foreach (DirectoryInfo thisDir in BaseDir)
    {
        try
        {

            var TheDirectory = from dirs in thisDir.GetDirectories("*", SearchOption.AllDirectories)
                               orderby dirs.FullName
                               select dirs;

            Console.WriteLine("Directory: <" + thisDir.FullName + "> contains the following directories:");

            foreach (DirectoryInfo directory in TheDirectory)
            {
                Console.WriteLine("  --[" + directory.FullName + "]");
            }
        }
        catch (AccessViolationException ave)
        {
            Console.WriteLine("Access Violation for: [" + thisDir.FullName + "] ave:" + ave.Message);
        }
        catch (UnauthorizedAccessException uave)
        {
            Console.WriteLine("Unathorized Access Violation for: [" + thisDir.FullName + "] uave:" + uave.Message);
        }
    }
    Thread.EndCriticalRegion();
}

Chris Losinger wrote:

$10 says thisDir.GetDirectories is recursive

Chris Losinger wrote:

so you only get immediate subdirs of the target dir ?

var TheDirectory = from dirs in thisDir.GetDirectories("*",SearchOption.AllDirectories)
                   orderby dirs.FullName
                   select dirs;

\\Where thisDir = new DirectoryInfo(@"C:\");
\\This gets the whole tree.  No recursion.