Skip to content
This repository


Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
branch: master
Fetching contributors…

Cannot retrieve contributors at this time

file 18 lines (15 sloc) 0.57 kb
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18
(in-package :clipmunk.bindings)

(cffi:defcfun ("cpMomentForCircle" #.(chipmunk-lispify "cpMomentForCircle" 'function)) :double
  (m :double)
  (r1 :double)
  (r2 :double)
  (offset-x :double) (offset-y :double))

(cffi:defcfun ("cpMomentForSegment" #.(chipmunk-lispify "cpMomentForSegment" 'function)) :double
  (m :double)
  (a-x :double) (a-y :double)
  (b-x :double) (b-y :double))

(cffi:defcfun ("cpMomentForPoly" #.(chipmunk-lispify "cpMomentForPoly" 'function)) :double
  (m :double)
  (numVerts :int)
  (verts :pointer)
  (offset-x :double) (offset-y :double))
Something went wrong with that request. Please try again.