Subject: bug#45846: closed (Re: [bug#45846] [PATCH] New cl-mssql)

From: [email-masked] (GNU bug Tracking System)
Date: Thu, 14 Jan 2021 09:32:02 +0000

Your bug report

#45846: [PATCH] New cl-mssql

which was filed against the guix-patches package, has been closed.

The explanation is attached below, along with your original report.
If you require more details, please reply to [email-masked].

-- 
45846: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=45846
GNU Bug Tracking System
Contact [email-masked] with problems

Subject: Re: [bug#45846] [PATCH] New cl-mssql
From: Guillaume Le Vaillant <[email-masked]>
To: Sharlatan Hellseher <[email-masked]>
Cc: [email-masked]
Date: Thu, 14 Jan 2021 10:31:24 +0100
List-Id: <debbugs-submit.debbugs.gnu.org>

Patch pushed as 88eb5370ec155902ed5fe7636e91e932079b338a.
Thanks.

Subject: [PATCH] New cl-mssql
From: Sharlatan Hellseher <[email-masked]>
To: [email-masked]
Date: Wed, 13 Jan 2021 21:53:04 +0000
List-Id: <debbugs-submit.debbugs.gnu.org>

Hi,

It depends on foreign library comes from FreeTDS project. Issue with
patch is open - https://issues.guix.gnu.org/45775

Regards

* pgloader

- https://issues.guix.gnu.org/44993
- https://issues.guix.gnu.org/45025
- https://issues.guix.gnu.org/45107
- https://issues.guix.gnu.org/45189
- https://issues.guix.gnu.org/45263
- https://issues.guix.gnu.org/45324
- https://issues.guix.gnu.org/45356
- https://issues.guix.gnu.org/45452
- https://issues.guix.gnu.org/45602
- https://issues.guix.gnu.org/45639
- https://issues.guix.gnu.org/45678
- https://issues.guix.gnu.org/45719
- https://issues.guix.gnu.org/45740
- https://issues.guix.gnu.org/45775

- [-] pgloader [31/34] [91%]
  1. [X] abnf [100%]
     - [X] :packed <2020-12-05 Sat>
     - [X] :patch-sent <2020-12-07 Mon>
     - [X] :patch-applied-upstream <2020-12-11 Fri>
     - [X] :depends-on [2/2]
       + [X] esrap
       + [X] cl-ppcre
  2. [X] alexandria
  3. [X] cl-base64
  4. [X] cl-csv
  5. [X] cl-fad
  6. [X] cl-log [100%]
     - [X] :packed <2020-12-02 Wed>
     - [X] :patch-sent <2020-12-02 Wed>
     - [X] :patch-applied-upstream <2020-12-05 Sat>
  7. [X] cl-markdown [100%]
     - version-0.10.4
     - [X] :packed <2021-01-07 Thu>
     - [X] :patch-sent <2021-01-07 Thu>
     - [X] :patch-applied-upstream <2021-01-08 Fri>
     - [X] :depends-on [6/6]
       + [X] dynamic-classes [100%]
         - https://github.com/gwkkwg/dynamic-classes
         - [X] :packed <2021-01-07 Thu>
         - [X] :patch-sent <2021-01-07 Thu>
         - [X] :patch-applied-upstream <2021-01-08 Fri>
         - [X] :depends-on [1/1]Э
           + [X] metatilities-base
       + [X] anaphora
       + [X] cl-containers "0.11.5"
       + [X] cl-ppcre
       + [X] metabang-bind
       + [X] metatilities-base "0.6.0"
  8. [X] cl-mustache [100%]
     - https://github.com/kanru/cl-mustache
       - WRONG: https://github.com/osa1/cl-mustache
     - [X] :packed <2020-12-21 Mon>
     - [X] :patch-sent <2020-12-21 Mon>
     - [X] :patch-applied-upstream <2020-12-22 Tue>
  9. [X] closer-mop
  10. [-] cl-postgres [25%] - part of Postmodern
      - [ ] :packed
      - [ ] :patch-sent
      - [ ] :patch-applied-upstream
      - [X] :depends-on [4/4]
        - [X] md5
        - [X] split-sequence
        - [X] cl-base64
        - [X] uax-15 [100%]
          + [X] :packed <2020-12-26 Sat>
          + [X] :patch-sent <2020-12-26 Sat>
          + [X] :patch-applied-upstream <2020-12-28 Mon>
          + [X] :depends-on [3/3]
            - [X] split-sequence
            - [X] cl-ppcre
            - [X] uiop - part of ASDF
  11. [X] cl-ppcre
  12. [X] command-line-arguments [100%]
      - https://github.com/fare/command-line-arguments
      - [X] :packed <2020-12-12 Sat>
      - [X] :patch-sent <2020-12-12 Sat>
      - [X] :patch-applied-upstream <2020-12-12 Sat>
  13. [X] db3 [100%]
      - [X] :packed <2021-01-03 Sun>
      - [X] :patch-sent <2021-01-03 Sun>
      - [X] :patch-applied-upstream <2021-01-04 Mon>
  14. [X] drakma
  15. [X] esrap
  16. [X] flexi-streams
  17. [X] ixf [100%]
      - [X] :packed <2021-01-01 Fri>
      - [X] :patch-sent <2021-01-01 Fri>
      - [X] :patch-applied-upstream <2021-01-02 Sat>
      - [X] :depends-on
        - [X] split-sequence
        - [X] md5
        - [X] alexandria
        - [X] babel
        - [X] local-time
        - [X] cl-ppcre
        - [X] ieee-floats
  18. [X] local-time
  19. [X] lparallel
  20. [X] metabang-bind
  21. [-] mssql [50%]
      - [X] :packed <2021-01-13 Wed>
      - [X] :patch-sent <2021-01-13 Wed>
      - [ ] :patch-applied-upstream
      - [-] :depends-on [4/5]
        + [-] libsybdb
          - https://github.com/FreeTDS/freetds
          - [X] :packed <2021-01-10 Sun>
          - [X] :patch-sent <2021-01-10 Sun>
          - [ ] :patch-applied-upstream
        + [X] cffi
        + [X] iterate
        + [X] garbage-pools
          - https://github.com/archimag/garbage-pools
          - [X] :packed <2021-01-08 Fri>
          - [X] :patch-sent <2021-01-09 Sat>
          - [X] :patch-applied-upstream <2021-01-10 Sun>
        + [X] parse-number
  22. [X] postmodern
  23. [X] py-configparser [100%]
      - [X] :packed <2020-12-24 Thu>
      - [X] :patch-sent <2021-01-05 Tue>
      - [X] :patch-applied-upstream <2021-01-06 Wed>
      - [X] :depends-on [1/1]
        + [X] parse-number
  24. [X] qmynd [100%]
      - [X] :packed <2020-12-19 Sat>
      - [X] :patch-sent <2020-12-19 Sat>
      - [X] :patch-applied-upstream <2020-12-19 Sat>
      - [X] :depends-on [6/6]
        - [X] babel
        - [X] flexi-streams
        - [X] ironclad
        - [X] list-of - part of asdf-finalizers
          - https://gitlab.common-lisp.net/asdf/asdf-finalizers
          - [X] :packed <2020-12-15 Tue>
          - [X] :patch-sent <2020-12-15 Tue>
          - [X] :patch-applied-upstream <2020-12-19 Sat>
          - [X] :depends-on [1/1]
            - [X] asdf-finalizers
              - [X] :packed <2020-12-15 Tue>
              - [X] :patch-sent <2020-12-15 Tue>
              - [X] :patch-applied-upstream <2020-12-19 Sat>
        - [X] trivial-gray-streams
        - [X] usocket
      - [X] :weakly-depends-on [3/3]
        - [X] chipz
        - [X] cl+ssl
        - [X] salza2
  25. [X] quri
  26. [ ] simple-date [0%] - part of Postmodern
      - [ ] :packed
      - [ ] :patch-sent
      - [ ] :patch-applied-upstream
  27. [X] split-sequence
  28. [X] sqlite
  29. [X] trivial-backtrace
  30. [X] uiop
  31. [X] usocket
  32. [X] uuid
  33. [X] yason
  34. [X] zs3 [100%]
      - [X] :packed <2020-12-03 Thu>
      - [X] :patch-sent <2020-12-03 Thu>
      - [X] :patch-applied-upstream <2020-12-05 Sat>
      - [X] :depends-on [6/6]
        + [X] drakma
        + [X] alexandria
        + [X] cxml
        + [X] ironclad
        + [X] puri
        + [X] cl-base64

-- 
… наш разум - превосходная объяснительная машина которая способна
найти смысл почти в чем угодно, истолковать любой феномен, но
совершенно не в состоянии принять мысль о непредсказуемости.
From cfaace66b33a705de8d33f73ef83b9a5f574809c Mon Sep 17 00:00:00 2001
From: Sharlatan Hellseher <[email-masked]>
Date: Wed, 13 Jan 2021 21:43:28 +0000
Subject: [PATCH] gnu: Add sbcl-mssql

* gnu/packages/lisp-xyz.scm (new vars) sbcl-mssql cl-mssql ecl-mssql

package depends on #45775 open <2021-01-10 Sun> - freetds
---
 gnu/packages/lisp-xyz.scm | 44 +++++++++++++++++++++++++++++++++++++++
 1 file changed, 44 insertions(+)

diff --git a/gnu/packages/lisp-xyz.scm b/gnu/packages/lisp-xyz.scm
index f0881bdfb7..b07685728e 100644
--- a/gnu/packages/lisp-xyz.scm
+++ b/gnu/packages/lisp-xyz.scm
@@ -1939,6 +1939,50 @@ pretty, documentation is code.")
          ;; TODO: Find why the tests fail on ECL.
          ((#:tests? _ #f) #f))))))
 
+(define-public sbcl-mssql
+  (let ((commit "045602a19a32254108f2b75871049293f49731eb")
+        (revision "1"))
+    (package
+      (name "sbcl-mssql")
+      (version (git-version "0.0.3" revision commit))
+      (source (origin
+                (method git-fetch)
+                (uri (git-reference
+                      (url "https://github.com/archimag/cl-mssql")
+                      (commit commit)))
+                (file-name (git-file-name name version))
+                (sha256
+                 (base32
+                  "09i50adppgc1ybm3ka9vbindhwa2x29f9n3n0jkrryymdhb8zknm"))))
+      (build-system asdf-build-system/sbcl)
+      (inputs
+       `(("cffi" ,sbcl-cffi)
+         ("freetds" ,freetds)
+         ("garbage-pools" ,sbcl-garbage-pools)
+         ("iterate" ,sbcl-iterate)
+         ("parse-number" ,sbcl-parse-number)))
+      (arguments
+       `(#:phases
+         (modify-phases %standard-phases
+           (add-after 'unpack 'fix-paths
+             (lambda* (#:key inputs #:allow-other-keys)
+               (substitute* "src/mssql.lisp"
+                 (("libsybdb" all)
+                  (string-append (assoc-ref inputs "freetds")"/lib/" all)))
+               #t)))))
+      (home-page "https://github.com/archimag/cl-mssql")
+      (synopsis "Common Lisp library which interacts with MS-SQL Server databases")
+      (description
+       "@code{cl-mssql} provides interface to connect to Microsof SQL server.  It
+uses foriegn library @code{libsybdb} providing by FreeTDS project.")
+      (license license:llgpl))))
+
+(define-public ecl-mssql
+  (sbcl-package->ecl-package sbcl-mssql))
+
+(define-public cl-mssql
+  (sbcl-package->cl-source-package sbcl-mssql))
+
 (define-public sbcl-lisp-unit
   (let ((commit "89653a232626b67400bf9a941f9b367da38d3815"))
     (package
-- 
2.26.2