chaliy · January 15, 2010 23:29
diff --git a/web_service_future.fs b/web_service_future.fs
 namespace Processing.Services2

 type BatchItem = {
     Arguments : (string * string) list;
 }

 type Batch = {    
    Id : string;   
    ProcessorKey : string; 
    Items : BatchItem list;
 }

 module BatchQueue =        
    let Queue(b:Batch) =
        printfn "Queued!"
	namespace Processing.Services2

	type BatchItem = {
	Arguments : (string * string) list;
	}

	type Batch = {
	Id : string;
	ProcessorKey : string;
	Items : BatchItem list;
	}

	module BatchQueue =
	let Queue(b:Batch) =
	printfn "Queued!"