Add info for assets loading

docs/roadmap.org

@@ -26,6 +26,36 @@ Each version will be tagged upon being considered complete
 :PROPERTIES:
 :Effort:   20
 :END:
+* Code Snippets (for future use)
+** How to get a path to executable or project depending on which you are running as:
+from([[https://github.com/mfiano/gamebox/blob/master/src/utils/utils.lisp]])
+#+BEGIN_SRC lisp
+(in-package :gbx.util)
+
+(defun path (context dir &optional file)
+  (let ((path (format nil "~A/~@[~A~]" dir file)))
+    (with-slots (user) context
+      (if uiop/image:*image-dumped-p*
+          (truename
+           (uiop/pathname:merge-pathnames*
+            path
+            (uiop:pathname-directory-pathname (uiop:argv0))))
+          (asdf/system:system-relative-pathname user path)))))
+
+(defun read-file (context file)
+  (let ((path (path context "." file)))
+    (when (and (or (pathnamep path) (stringp path))
+               (uiop/filesystem:file-exists-p path))
+      (with-open-file (in path)
+        (let ((*read-eval* nil))
+          (read in))))))
+
+(defun flatten-floats (sequence)
+  (let ((sequence (mapcar #'float (flatten sequence))))
+    (make-array (length sequence)
+                :element-type 'single-float
+:initial-contents sequence)))
+#+END_SRC
 * Versions
 ** 0.0
 *** DONE Ask #lispgames for feedback on this roadmap.           :realworld: