mirror of
				https://github.com/KevinMidboe/linguist.git
				synced 2025-10-29 17:50:22 +00:00 
			
		
		
		
	
		
			
				
	
	
		
			16 lines
		
	
	
		
			205 B
		
	
	
	
		
			Forth
		
	
	
	
	
	
			
		
		
	
	
			16 lines
		
	
	
		
			205 B
		
	
	
	
		
			Forth
		
	
	
	
	
	
module Sample
 | 
						|
 | 
						|
open System
 | 
						|
 | 
						|
type Foo =
 | 
						|
    {
 | 
						|
        Bar : string
 | 
						|
    }
 | 
						|
 | 
						|
type Baz = interface end
 | 
						|
 | 
						|
let Sample1(xs : int list) : string =
 | 
						|
    xs
 | 
						|
    |> List.map (fun x -> string x)
 | 
						|
    |> String.concat ","
 |