Implement the exercice with the `do` keyword · 3f8d0a1fa2 - Gogs Jovian

Implement the exercice with the `do` keyword

DricomDragon 5 years ago

parent

2681135c7d

commit

3f8d0a1fa2

1 changed files with 8 additions and 0 deletions

Split View Show Diff Stats

						
							+ 8
							
							- 0
						
io_length.hs
							 
								View File
							
				@@ -0,0 +1,8 @@
			
				+-- Slide 57
			
				+
			
				+ioLength::IO Int
			
				+ioLength = do
			
				+	x <- getLine
			
				+	return (length x)
			
				+
			
				+main = ioLength >>= print