source: trunk/source/examples/rubix/loader.lisp @ 13474

Last change on this file since 13474 was 12674, checked in by gb, 10 years ago

rubix.lisp: suppress a compiler warning
loader.lisp: commented-out call needs to run on the event thread in Cocotron

(and it may be a good idea to do that in Cocoa, as well.)

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 449 bytes
Line 
1(in-package :cl-user)
2
3(require "COCOA")
4
5(let* ((containing-dir (make-pathname :directory (pathname-directory *load-truename*) :defaults nil)))
6  (flet ((load-relative (path)
7           (load (merge-pathnames path containing-dir))))
8    (load-relative "opengl.lisp")
9    (load-relative "vectors.lisp")
10    (load-relative "lights.lisp")
11    (load-relative "blocks.lisp")
12    (load-relative "rubix.lisp")))
13
14
15; (gui::execute-in-gui #'run-rubix-demo)
Note: See TracBrowser for help on using the repository browser.