mirror of
				https://github.com/KevinMidboe/linguist.git
				synced 2025-10-29 17:50:22 +00:00 
			
		
		
		
	
		
			
				
	
	
		
			24 lines
		
	
	
		
			290 B
		
	
	
	
		
			Common Lisp
		
	
	
	
	
	
			
		
		
	
	
			24 lines
		
	
	
		
			290 B
		
	
	
	
		
			Common Lisp
		
	
	
	
	
	
| /* Old-style comment. */
 | |
| 
 | |
| // New-style comment.
 | |
| 
 | |
| typedef float foo_t;
 | |
| 
 | |
| #ifndef ZERO
 | |
| #define ZERO (0.0)
 | |
| #endif
 | |
| 
 | |
| #define FOO(x) ((x) + \
 | |
|   ZERO)
 | |
| 
 | |
| __kernel
 | |
| void foo(__global const foo_t * x, __local foo_t y, const uint n)
 | |
| {
 | |
|   barrier(CLK_LOCAL_MEM_FENCE);
 | |
| 
 | |
|   if (n > 42) {
 | |
|     *x += y;
 | |
|   }
 | |
| }
 | |
| 
 |