Commit a683fea3 authored by Liam Healy's avatar Liam Healy
Browse files

Use CFFI-grovel to parse physical constants

Started writing definitions of constants based on GSL's physical
constants, using cffi-grovel.  This has not proceeded beyond the first
definition because cffi-grovel at the present time casts everything to
an integer.
parent 5b255beb
;; Definition of GSLL system
;; Liam Healy
;; Time-stamp: <2009-05-25 13:54:01EDT gsll.asd>
;; Time-stamp: <2009-05-25 17:03:53EDT gsll.asd>
;; $Id$
(when (asdf:find-system :fsbv nil)
......@@ -221,4 +221,7 @@
(:file "nonlinear-least-squares" :depends-on (generic))
(:file "simulated-annealing")))
(:file "basis-splines" :depends-on (init data random))))
(:file "basis-splines" :depends-on (init data random))
(:module physical-constants
((cffi-grovel:grovel-file "mksa")))))
;; Physical constants in the MKSA system
;; Liam Healy 2009-05-25 17:01:32EDT mksa.lisp
;; Time-stamp: <2009-05-25 17:03:55EDT mksa.lisp>
;; $Id: $
(define "_GNU_SOURCE")
(in-package :gsl)
(include "gsl/gsl_const_mksa.h")
(constant (+mksa-speed-of-light+ "GSL_CONST_MKSA_SPEED_OF_LIGHT"))
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment