Renaud Casenave-Péré
a2b8b9da8c
Like the vector submodule, it implements + - * operations for matrix, scalar and vector where it makes sense but don't try yet to be efficient. There is also matrix constructors for null and identity matrices and row, col and diag subsets functions.
59 lines
2 KiB
Common Lisp
59 lines
2 KiB
Common Lisp
#|
|
|
This file is a part of stoe project.
|
|
Copyright (c) 2014 Renaud Casenave-Péré (renaud@casenave-pere.fr)
|
|
|#
|
|
|
|
#|
|
|
SaintOEngine - A 3d engine in common-lisp
|
|
|
|
Author: Renaud Casenave-Péré (renaud@casenave-pere.fr)
|
|
|#
|
|
|
|
(in-package :cl-user)
|
|
(defpackage stoe-asd
|
|
(:use :cl :asdf))
|
|
(in-package :stoe-asd)
|
|
|
|
(defsystem stoe
|
|
:version "0.1"
|
|
:author "Renaud Casenave-Péré"
|
|
:license "GPL3"
|
|
:depends-on (:swank)
|
|
:components ((:module "src"
|
|
:components
|
|
((:module "maths"
|
|
:components
|
|
((:file "maths")
|
|
(:file "vector")
|
|
(:file "float2")
|
|
(:file "float3")
|
|
(:file "float4")
|
|
(:file "matrix")))
|
|
(:file "utils")
|
|
(:file "thread"
|
|
:depends-on ("utils"))
|
|
(:file "containers")
|
|
(:file "modules"
|
|
:depends-on ("utils"))
|
|
(:file "debug"
|
|
:depends-on ("modules" "thread"))
|
|
(:file "jobs"
|
|
:depends-on ("thread" "containers" "utils"))
|
|
(:file "file"
|
|
:depends-on ("jobs"))
|
|
(:file "stoe"
|
|
:depends-on ("utils" "modules")))))
|
|
:description "SaintOEngine - A 3d engine in common-lisp"
|
|
:long-description
|
|
#.(with-open-file (stream (merge-pathnames
|
|
#p"README.md"
|
|
(or *load-pathname* *compile-file-pathname*))
|
|
:if-does-not-exist nil
|
|
:direction :input)
|
|
(when stream
|
|
(let ((seq (make-array (file-length stream)
|
|
:element-type 'character
|
|
:fill-pointer t)))
|
|
(setf (fill-pointer seq) (read-sequence seq stream))
|
|
seq)))
|
|
:in-order-to ((test-op (load-op stoe-test))))
|