dependencyClosure { ... searchPath = [ ../foo ../bar ]; ... }
* Primop `dirOf' to return the directory part of a path (e.g., dirOf
  /a/b/c == /a/b).
* Primop `relativise' (according to Webster that's a real word!) that
  given paths A and B returns a string representing path B relative
  path to A; e.g., relativise /a/b/c a/b/x/y => "../x/y".
		
	
			
		
			
				
	
	
		
			15 lines
		
	
	
	
		
			288 B
		
	
	
	
		
			Nix
		
	
	
	
	
	
			
		
		
	
	
			15 lines
		
	
	
	
		
			288 B
		
	
	
	
		
			Nix
		
	
	
	
	
	
with (import ../../../lib);
 | 
						|
 | 
						|
let {
 | 
						|
  inherit (import ../aterm {}) libATerm;
 | 
						|
 | 
						|
  compileTest = main: link {
 | 
						|
    objects = [(compileC {inherit main; localIncludePath = [ ../aterm ];})];
 | 
						|
    libraries = libATerm;
 | 
						|
  };
 | 
						|
 | 
						|
  body = [
 | 
						|
    (compileTest ./fib.c)
 | 
						|
    (compileTest ./primes.c)
 | 
						|
  ];
 | 
						|
}
 |