[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[no subject]
From: |
Mathieu Othacehe |
Date: |
Mon, 23 Apr 2018 05:28:51 -0400 (EDT) |
branch: master
commit 85a373f639376307156510bbf24ec2fa30da5acd
Author: Mathieu Othacehe <address@hidden>
Date: Mon Apr 23 09:50:31 2018 +0200
http: Reverse evaluations list.
* src/cuirass/database.scm (db-get-evaluations): Reverse returned
evaluations
list.
---
src/cuirass/database.scm | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/src/cuirass/database.scm b/src/cuirass/database.scm
index 8437475..a1398bc 100644
--- a/src/cuirass/database.scm
+++ b/src/cuirass/database.scm
@@ -548,7 +548,7 @@ INSERT INTO Stamps (specification, stamp) VALUES ("
FROM Evaluations ORDER BY id DESC LIMIT " limit ";"))
(evaluations '()))
(match rows
- (() evaluations)
+ (() (reverse evaluations))
((#(id specification revision)
. rest)
(loop rest