Hi,
I am highliy interested in running Tidal cycles!
Working in the IT field, this is a thing I am rather opposed to,
but Tidal got me hooked.
I installed everything on my Windows Machine and it works fine on VSCode,
but what I really want to use is Emacs. Last time I used it must have been
around 1994 or so. Unfortunately I don't remebber much of elisp...
Anyhow...
(leaf haskell-mode
:doc "haskell mode is required for tidal cycles")
(add-to-list 'load-path "G:/src/emacs/tidal")
(require 'haskell-mode)
(require 'tidal)
but I get an error on startup:
-----------------------
string-trim-right(nil nil)
string-trim(nil)
(concat (string-trim (car (cdr (split-string (shell-command-to-string (cdr (assoc "path" filepath))) ":")))) (cdr (assoc "separator" filepath)) "BootTidal.hs")
(let ((filepath (cond ((string-equal system-type "windows-nt") '(("path" . "echo off && for /f %a in ('ghc-pkg latest tidal') ...") ("separator" . "\\"))) ((or (string-equal system-type "darwin") (string-equal system-type "gnu/linux")) '(("path" . "ghc-pkg field tidal data-dir") ("separator" . "/")))))) (concat (string-trim (car (cdr (split-string (shell-command-to-string (cdr ...)) ":")))) (cdr (assoc "separator" filepath)) "BootTidal.hs"))
(defvar tidal-boot-script-path (let ((filepath (cond ((string-equal system-type "windows-nt") '(... ...)) ((or (string-equal system-type "darwin") (string-equal system-type "gnu/linux")) '(... ...))))) (concat (string-trim (car (cdr (split-string (shell-command-to-string ...) ":")))) (cdr (assoc "separator" filepath)) "BootTidal.hs")) "*Full path to BootTidal.hs (inferred by introspect...")
load-with-code-conversion("g:/src/emacs/tidal/tidal.el" "g:/src/emacs/tidal/tidal.el" nil t)
require(tidal)
(progn (prog1 'haskell-mode (let ((file (leaf-this-file))) (if (boundp 'leaf--paths) nil (defvar leaf--paths nil)) (if file (progn (add-to-list 'leaf--paths (cons 'haskell-mode file))))) (condition-case err (progn (progn (if (boundp 'package-selected-packages) (if (memq ... package-selected-packages) nil (setq package-selected-packages ...)) (setq package-selected-packages (list ...))) (if (package-installed-p 'haskell-mode) nil (if (assoc ... package-archive-contents) nil (package-refresh-contents)) (condition-case _err (package-install ...) (error ... ...)))) (require 'haskell-mode)) (error (display-warning 'leaf (format "Error in `haskell-mode' block at `g:/src/emacs/.em..." (error-message-string err)))))) (add-to-list 'load-path "G:/src/emacs/tidal") (require 'haskell-mode) (require 'tidal))
(if (string= (system-name) "SOULARPEGGIO") (progn (prog1 'haskell-mode (let ((file (leaf-this-file))) (if (boundp 'leaf--paths) nil (defvar leaf--paths nil)) (if file (progn (add-to-list 'leaf--paths (cons ... file))))) (condition-case err (progn (progn (if (boundp ...) (if ... nil ...) (setq package-selected-packages ...)) (if (package-installed-p ...) nil (if ... nil ...) (condition-case _err ... ...))) (require 'haskell-mode)) (error (display-warning 'leaf (format "Error in `haskell-mode' block at `g:/src/emacs/.em..." (error-message-string err)))))) (add-to-list 'load-path "G:/src/emacs/tidal") (require 'haskell-mode) (require 'tidal)))
load-with-code-conversion("g:/src/emacs/.emacs" "g:/src/emacs/.emacs" t t)
-----------------------
I also tried installing it manually with package-install, but nothing seems to work.
What am I doing wrong?
Thankx!
Marc