From f972dbe40a070cc77352f372d501027634812d82 Mon Sep 17 00:00:00 2001
From: "jacob.windle" <windlejacob12@gmail.com>
Date: Wed, 1 Jun 2022 23:18:49 -0400
Subject: [PATCH] first commit

---
 .gitignore          |  9 +++++++++
 README.markdown     |  5 +++++
 README.org          |  5 +++++
 article-splorer.asd | 21 +++++++++++++++++++++
 src/main.lisp       | 18 ++++++++++++++++++
 tests/main.lisp     | 11 +++++++++++
 6 files changed, 69 insertions(+)
 create mode 100644 .gitignore
 create mode 100644 README.markdown
 create mode 100644 README.org
 create mode 100644 article-splorer.asd
 create mode 100644 src/main.lisp
 create mode 100644 tests/main.lisp

diff --git a/.gitignore b/.gitignore
new file mode 100644
index 0000000..b9fa3c1
--- /dev/null
+++ b/.gitignore
@@ -0,0 +1,9 @@
+*.abcl
+*.fasl
+*.dx32fsl
+*.dx64fsl
+*.lx32fsl
+*.lx64fsl
+*.x86f
+*~
+.#*
diff --git a/README.markdown b/README.markdown
new file mode 100644
index 0000000..1cd0006
--- /dev/null
+++ b/README.markdown
@@ -0,0 +1,5 @@
+# Article-Splorer
+
+## Usage
+
+## Installation
diff --git a/README.org b/README.org
new file mode 100644
index 0000000..1366af8
--- /dev/null
+++ b/README.org
@@ -0,0 +1,5 @@
+* Article-Splorer 
+
+** Usage
+
+** Installation
diff --git a/article-splorer.asd b/article-splorer.asd
new file mode 100644
index 0000000..61601c2
--- /dev/null
+++ b/article-splorer.asd
@@ -0,0 +1,21 @@
+(defsystem "article-splorer"
+  :version "0.1.0"
+  :author ""
+  :license ""
+  :depends-on (#:log4cl)
+  :components ((:module "src"
+                :components
+                ((:file "main"))))
+  :description ""
+  :in-order-to ((test-op (test-op "article-splorer/tests"))))
+
+(defsystem "article-splorer/tests"
+  :author ""
+  :license ""
+  :depends-on ("article-splorer"
+               "rove")
+  :components ((:module "tests"
+                :components
+                ((:file "main"))))
+  :description "Test system for article-splorer"
+  :perform (test-op (op c) (symbol-call :rove :run c)))
diff --git a/src/main.lisp b/src/main.lisp
new file mode 100644
index 0000000..0133a42
--- /dev/null
+++ b/src/main.lisp
@@ -0,0 +1,18 @@
+(defpackage article-splorer
+  (:use :cl :log4cl))
+(in-package :article-splorer)
+
+(defparameter *bfsqueue* (make-queue))
+
+(defun entrypoint ()
+  (progn
+    (log:info "starting our program")
+    (begin-loop 0)))
+
+(defun begin-loop (iteration)
+  (progn
+    (log:info "iteration ~d" iteration)
+    (sleep 5)
+    (log:info "doing work")
+    (bfs )))
+
diff --git a/tests/main.lisp b/tests/main.lisp
new file mode 100644
index 0000000..909681e
--- /dev/null
+++ b/tests/main.lisp
@@ -0,0 +1,11 @@
+(defpackage article-splorer/tests/main
+  (:use :cl
+        :article-splorer
+        :rove))
+(in-package :article-splorer/tests/main)
+
+;; NOTE: To run this test file, execute `(asdf:test-system :article-splorer)' in your Lisp.
+
+(deftest test-target-1
+  (testing "should (= 1 1) to be true"
+    (ok (= 1 1))))