gnu: json-for-vhdl: Move to hdl.

* gnu/packages/electronics.scm (json-for-vhdl): Move from here ...
* gnu/packages/hdl.scm: ... to here.

Change-Id: I498b652ae7edcad71dd0924264dbd84694ac6a87

gnu/packages/hdl.scm

@@ -63,6 +63,49 @@ as approved and published by the @acronym{VHDL, Very High Speed Hardware
 Description Language} Analysis and Standardization Group.")
     (license license:asl2.0)))
 
+(define-public json-for-vhdl
+  ;; No tagged releases.
+  (let ((commit "0dc9e317440263cd4941f157f5e5668baa858ec2")
+        (revision "0"))
+    (package
+      (name "json-for-vhdl")
+      (version (git-version "20220905" revision commit)) ;last revision
+      (source
+       (origin
+         (method git-fetch)
+         (uri (git-reference
+                (url "https://github.com/Paebbels/JSON-for-VHDL/")
+                (commit commit)))
+         (file-name (git-file-name name version))
+         (sha256
+          (base32 "1062g2c3dpsb67zhqrn1j04p7jl28g4mcxd6nhrqqfffjsvxkpw9"))))
+      (build-system copy-build-system)
+      (arguments
+       (list
+        #:install-plan
+        #~'(("src" "share/json-for-vhdl/work/src"
+             #:include ("vhdl")))
+        #:phases
+        #~(modify-phases %standard-phases
+            ;; The examples/Encodings_VUnit test requires vhdl builtins.
+            (add-after 'unpack 'fix-check
+              (lambda _
+                (substitute* "tests/VUnit/run.py"
+                  (("from_argv\\(\\)")
+                   "from_argv()\nvu.add_vhdl_builtins()")))))))
+      (native-search-paths
+       (list (search-path-specification
+               (variable "FW_JSON_VHDL")
+               (separator #f)
+               (files (list "share/json-for-vhdl")))))
+      (home-page "https://github.com/Paebbels/JSON-for-VHDL/")
+      (synopsis "Parse and query JSON data structures in VHDL")
+      (description
+       "The JSON-for-VHDL library provides a parser to query JSON data
+structures from external files on disk.  It provides a context to be
+used in the declarative section of design units.")
+      (license license:asl2.0))))
+
 (define-public neorv32
   (package
     (name "neorv32")