Reworked build.lisp and load.lisp into bob.lisp

bob.lisp quickloads the dependencies necessary and defines functions
which I can just call from my REPL to load or build the project.
Better than loading the file over and over again.  Affectionately
named after "Bob The Builder".

bob.lisp

@@ -0,0 +1,36 @@
+;;; bob.lisp - 2025-02-10
+
+;; Copyright (C) 2025 Aryadev Chavali
+
+;; This program is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
+;; FOR A PARTICULAR PURPOSE.  See the GNU General Public License Version 2 for
+;; details.
+
+;; You may distribute and modify this code under the terms of the GNU General
+;; Public License Version 2, which you should have received a copy of along with
+;; this program.  If not, please go to <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Little bit of code scaffolding that makes it easy to load or build the
+;; system.  Named after "Bob the Builder".
+
+;;; Code:
+
+(defpackage bob
+  (:use :cl)
+  (:export
+   :build :load-all))
+
+(in-package :bob)
+
+(ql:quickload :deploy)
+(asdf:load-asd (merge-pathnames "odraw.asd" (uiop:getcwd)))
+
+(defun build ()
+  (push :deploy-console *features*)
+  (asdf:make :odraw))
+
+(defun load-all ()
+  (asdf:load-system :odraw))

build.lisp

@@ -1,5 +0,0 @@
-(ql:quickload :asdf)
-(ql:quickload :deploy)
-(push :deploy-console *features*)
-(asdf:load-asd (merge-pathnames "odraw.asd" (uiop:getcwd)))
-(asdf:make :odraw)

load.lisp

@@ -1,4 +0,0 @@
-(ql:quickload :asdf)
-(ql:quickload :deploy)
-(asdf:load-asd (merge-pathnames "odraw.asd" (uiop:getcwd)))
-(asdf:load-system :odraw)