mirror of
				https://github.com/KevinMidboe/linguist.git
				synced 2025-10-29 17:50:22 +00:00 
			
		
		
		
	
		
			
				
	
	
		
			16 lines
		
	
	
		
			149 B
		
	
	
	
		
			Perl
		
	
	
	
	
	
			
		
		
	
	
			16 lines
		
	
	
		
			149 B
		
	
	
	
		
			Perl
		
	
	
	
	
	
 | 
						|
 | 
						|
local a = symbol()
 | 
						|
 | 
						|
local q = quote 
 | 
						|
	var [a] = 2
 | 
						|
	[a] = [a] + 1
 | 
						|
end
 | 
						|
 | 
						|
terra foo()
 | 
						|
	q
 | 
						|
	return [a]
 | 
						|
end
 | 
						|
 | 
						|
local test = require("test")
 | 
						|
test.eq(3,foo()) |