more on simple demo app

app/demo/build.sh

@@ -0,0 +1,2 @@
+
+sbcl --eval '(asdf:make :scopes-demo)' --eval '(quit)'

app/demo/main.lisp

@@ -2,9 +2,15 @@
 
 (defpackage :scopes/app/demo
   (:use :common-lisp)
-  (:export #:main))
+    (:local-nicknames (:forge :scopes/forge))
+    (:export #:main))
 
 (in-package :scopes/app/demo)
 
 (defun main()
-  (format t "~%Hello World~%"))
+  (format t "~%Hello World.~%relative path: ~a~%system source dir: ~a~%"
+          (asdf:system-relative-pathname :scopes-demo "config")
+          (asdf:system-source-directory :scopes-demo))
+  (setf forge:*forge-env* (forge:forge-env))
+  (forge:setup-builtins)
+  (forge:repl))

app/demo/scopes-demo.asd

@@ -6,8 +6,9 @@
   :version "0.0.1"
   :homepage "https://www.cyberconcepts.org"
   :description ""
-  :components ((:file "app/demo/main"))
+  :depends-on (:scopes)
+  :components ((:file "main"))
   :build-operation "program-op"
-  :build-pathname "app/demo/bin/demo"
+  :build-pathname "bin/demo"
   :entry-point "scopes/app/demo:main")