initial import

This commit is contained in:
Helmut Merz 2024-04-18 19:46:47 +02:00
commit 7c321b76aa
3 changed files with 47 additions and 0 deletions

18
forge/forge.lisp Normal file
View file

@ -0,0 +1,18 @@
;;; cl-scopes/forge - may the forge be with you!
;;;; A Forth-like interpreter implemented in Common Lisp.
(defpackage :scopes/forge
(:nicknames :scf)
(:use :common-lisp)
(:export #:hello))
(in-package :scopes/forge)
(defun hello ()
(format t "Hello Common Lisp - 2024-04-18"))
(defclass track () (
(taskid :initarg :taskid)
(username :initarg :username)))

17
scopes.asd Normal file
View file

@ -0,0 +1,17 @@
(in-package #:asdf-user)
(defsystem :scopes
:author ""
:maintainer ""
:license "MIT"
:version "0.0.1"
:homepage "https://www.cyberconcepts.org"
:description ""
:depends-on (:str)
:components ((:file "forge/forge"))
:long-description "scopes: generic data processingg facilities")
;;#.(uiop:read-file-string
;; (uiop:subpathname *load-pathname* "README.md")))
;;:in-order-to ((test-op (test-op "scopes/test"))))

12
storage/tracking.lisp Normal file
View file

@ -0,0 +1,12 @@
;;; cl-scopes/forge - may the forge be with you!
;;;; A Forth-like interpreter implemented in Common Lisp.
(defun hello ()
(format t "Hello Common Lisp - changed!"))
(defclass track () (
(taskid :initarg :taskid)
(username :initarg :username)))