22 lines
		
	
	
		
			579 B
		
	
	
	
		
			Scheme
		
	
	
	
			
		
		
	
	
			22 lines
		
	
	
		
			579 B
		
	
	
	
		
			Scheme
		
	
	
	
(define-library
 | 
						|
  (foreign c mosh-primitives)
 | 
						|
  (import (scheme base)
 | 
						|
          (scheme write)
 | 
						|
          (scheme char)
 | 
						|
          (scheme file)
 | 
						|
          (scheme inexact)
 | 
						|
          (scheme inexact)
 | 
						|
          (scheme process-context)
 | 
						|
          (mosh ffi))
 | 
						|
  (export size-of-type
 | 
						|
          align-of-type
 | 
						|
          shared-object-load
 | 
						|
          define-c-procedure
 | 
						|
          define-c-callback
 | 
						|
          c-bytevector?
 | 
						|
          c-bytevector-u8-ref
 | 
						|
          c-bytevector-u8-set!
 | 
						|
          c-bytevector-pointer-ref
 | 
						|
          c-bytevector-pointer-set!)
 | 
						|
  (include "mosh-primitives.scm"))
 |