From 2f950d3af7f3e8e6ad535d4ab99845ff168732ac Mon Sep 17 00:00:00 2001 From: Daniel Santos Date: Tue, 10 Jan 2023 21:41:04 +0000 Subject: may-reverse bug squash --- cl-math.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/cl-math.lisp b/cl-math.lisp index 481eeed..77337d2 100644 --- a/cl-math.lisp +++ b/cl-math.lisp @@ -12,8 +12,8 @@ (defun may-reverse (number) "If units is placed on the end, reverse; else keep it." (if *number-units-beginning* - (reverse number) - number)) + number + (reverse number))) (defun explode (number) "Given a number (which can have letters), it returns a list of the number" -- cgit 1.4.1-2-gfad0 e='id' value='c1e841fc2dc43cd94e993165ff0fbde12fd0ec15'/> Soul of a tiny new machine. More thorough tests → More comprehensible and rewrite-friendly software → More resilient society.Kartik K. Agaram <vc@akkartik.com>
about summary refs log tree commit diff stats
path: root/baremetal/README.md
blob: 5cdb75ed22451442fc6ddc3028072de928c8c88c (plain) (blame) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45