From 59eec134ac0fc3cb3ab7ecfd32b0be006d346591 Mon Sep 17 00:00:00 2001 From: Syndamia Date: Tue, 6 Dec 2022 11:48:20 +0200 Subject: [asd] Fixed packages configuration --- src/math.lisp | 4 ++-- src/packages.lisp | 21 +++++++++++++++++++++ 2 files changed, 23 insertions(+), 2 deletions(-) create mode 100644 src/packages.lisp (limited to 'src') diff --git a/src/math.lisp b/src/math.lisp index 832c87c..89ccb0a 100644 --- a/src/math.lisp +++ b/src/math.lisp @@ -12,7 +12,7 @@ "Sums all numbers and stores result in name (first argument)" `(op= '+ ,value ,@numbers)) -(defmacro ++_ (value) +(defmacro ++1 (value) "Adds increments value by one" `(+= ,value 1)) @@ -24,7 +24,7 @@ "Decrements value by one" `(-= ,value 1)) -(defmacro /= (value &rest numbers) +(defmacro //= (value &rest numbers) "Divides all numbers and stores result in name (first argument)" `(op= '/ ,value ,@numbers)) diff --git a/src/packages.lisp b/src/packages.lisp new file mode 100644 index 0000000..441101d --- /dev/null +++ b/src/packages.lisp @@ -0,0 +1,21 @@ +(in-package :cl) + +(defpackage senzill.math + (:use :cl) + (:export :% + :+= + :++1 + :-= + :-- + ://= + :*= + :^ + :avg) + (:documentation "Math functions")) + +(defpackage senzill.collections + (:use :cl) + (:export :push-back + :pop-back + :slice) + (:documentation "List functions")) -- cgit v1.2.3