Browse Source

Update cakelisp for renamed var generators

pitch-detection
Macoy Madson 10 months ago
parent
commit
2dc2d6f89f
  1. 2
      Dependencies/cakelisp
  2. 4
      src/Math.cake
  3. 4
      src/OgreInitialize.cake
  4. 1
      src/Tracy.cake
  5. 2
      test/src/VocalGame.cake

2
Dependencies/cakelisp

@ -1 +1 @@
Subproject commit 5958efdae9e07f6acb6ddecc4c080f4e130517a2
Subproject commit dc93eddbf8757e5faa33abeea308748ada94b503

4
src/Math.cake

@ -25,7 +25,7 @@
;; Trigonometry
;;
(global-var g-pi (const float) HMM_PI32)
(var-global g-pi (const float) HMM_PI32)
(def-c-function-alias degrees-to-radians HMM_ToRadians) ;; (degrees float &return float)
@ -44,7 +44,7 @@
(def-type-alias-global vec3 hmm_vec3)
(def-type-alias-global vec4 hmm_vec4)
(global-var g-up-axis (const vec3) (array 0.f 1.f 0.f))
(var-global g-up-axis (const vec3) (array 0.f 1.f 0.f))
(def-c-function-alias vec3-length HMM_LengthVec3) ;; (a vec3 &return float)
(def-c-function-alias vec3-normalize HMM_NormalizeVec3) ;; (a vec3 &return vec3)

4
src/OgreInitialize.cake

@ -28,12 +28,12 @@
(class Root)
(class SceneManager)))
(global-var g-ogre-root (* (in Ogre Root)) null)
(var-global g-ogre-root (* (in Ogre Root)) null)
(var g-scene-manager (* (in Ogre SceneManager)) null)
(var g-ogre-window (* (in Ogre Window)) null)
(var g-graphics-intialized bool false)
(global-var g-ogre-window-should-quit bool false)
(var-global g-ogre-window-should-quit bool false)
;; TODO: Add advanced class definition
;; class MyWindowEventListener : public Ogre::WindowEventListener

1
src/Tracy.cake

@ -60,7 +60,6 @@ unexpected location?")
(return false))
(add-compile-time-hook-module pre-build build-tracy-profiler)
;; TODO: Any file which includes Tracy needs these
;; For now, an easy way to build files which include necessary headers
(defmacro module-use-tracy-build-options ()

2
test/src/VocalGame.cake

@ -54,7 +54,7 @@
(defun-local audio-output-callback (userdata (* void) stream (* Uint8) stream-length int)
(ZoneScopedN "Audio output")
;; (printf "Audio len %d\n" stream-length)
(static-var up bool false)
(var-static up bool false)
(set up (not up))
(var i int 0)
(var pi (const float) 3.14159f)

Loading…
Cancel
Save