mirror of
				https://github.com/KevinMidboe/linguist.git
				synced 2025-10-29 17:50:22 +00:00 
			
		
		
		
	samples: add Terra samples
source: https://github.com/zdevito/terra/tree/master/tests
This commit is contained in:
		
							
								
								
									
										20
									
								
								samples/Terra/evenodd.t
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										20
									
								
								samples/Terra/evenodd.t
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,20 @@
 | 
			
		||||
terra iseven(a : uint) : bool
 | 
			
		||||
	if a == 0 then
 | 
			
		||||
		return true
 | 
			
		||||
	else
 | 
			
		||||
		return isodd(a - 1)
 | 
			
		||||
	end
 | 
			
		||||
end and
 | 
			
		||||
terra isodd(a : uint) : bool
 | 
			
		||||
	if a == 0 then
 | 
			
		||||
		return false
 | 
			
		||||
	else
 | 
			
		||||
		return iseven(a - 1)
 | 
			
		||||
	end
 | 
			
		||||
end
 | 
			
		||||
 | 
			
		||||
local test = require("test")
 | 
			
		||||
test.eq(iseven(3),false)
 | 
			
		||||
test.eq(iseven(2),true)
 | 
			
		||||
test.eq(isodd(3),true)
 | 
			
		||||
test.eq(isodd(2),false)
 | 
			
		||||
		Reference in New Issue
	
	Block a user