Skip to content

Instantly share code, notes, and snippets.

View yitzchak's full-sized avatar

Tarn W. Burton yitzchak

  • Georgia, United States
  • 15:13 (UTC -04:00)
View GitHub Profile
[186/385] Compiling src/gctools/source_info.cc
[187/385] Compiling extensions/cando/src/chem/topology.cc
../../src/llvmo/llvmoExpose.cc:4497:24: error: incompatible pointer to integer conversion assigning to 'unw_word_t' (aka 'unsigned long') from 'char *'
info.u.pi.name_ptr = saved_name;
^~~~~~~~~~
../../src/llvmo/llvmoExpose.cc:4498:13: error: no member named 'segbase' in 'unw_dyn_proc_info'
info.u.pi.segbase = 0;
~~~~~~~~~ ^
../../src/llvmo/llvmoExpose.cc:4499:13: error: no member named 'table_len' in 'unw_dyn_proc_info'
info.u.pi.table_len = 0;
../../src/core/lisp.cc:442 There are DEBUG_xxxx flags on - check the top of foundation.h !!!!
Starting cclasp-boehmprecise-0.4.2-4267-g8c38d0fa1-cst ... loading image...
Top level in: #<PROCESS TOP-LEVEL @0x7f0293366f09 (Running)>.
COMMON-LISP-USER> (f)
; caught STYLE-WARNING:
; Undefined function F
; at unknown location
;
;
; compilation unit finished
In file included from ../../include/clasp/clbind/details.h:30:
../../include/clasp/clbind/policies.h:159:48: error: no member named 'm_docstring' in 'clbind::policies<>'
std::string docstring() const { return this->m_docstring; };
~~~~ ^
../../include/clasp/clbind/class.h:392:34: note: in instantiation of member function 'clbind::policies<>::docstring' requested here
this->m_docstring = policies.docstring();
^
../../include/clasp/clbind/class.h:994:26: note: in instantiation of member function 'clbind::detail::memfun_registration<clang::Decl, unsigned int (clang::Decl::*)() const, clbind::policies<>>::memfun_registration' requested here
this->add_member(new detail::memfun_registration<T, F, Policies>(name, fn, policies));
^
@yitzchak
yitzchak / plot-2d.lisp
Created April 30, 2021 20:15
Plot 2d for VegaLite and common-lisp-jupyter
(defun plot-2d (fn &key title id update x-title y-title x-min x-max (grid 50))
(let* ((x (loop with x-range = (- x-max x-min)
with width = (/ (1- grid))
for i below grid
collect (+ x-min (* x-range i width))))
(y (mapcar fn x)))
(jupyter:vega-lite `(:object-plist "$schema" "https://vega.github.io/schema/vega-lite/v5.json"
,@(when title
(list "title" title))
"data" (:object-plist "values" ,(map 'vector
@yitzchak
yitzchak / scatter.lisp
Created April 30, 2021 17:16
Scatter Plot for VegaLite in common-lisp-jupyter
(defun scatter-plot (x y &key title id update x-title y-title regression)
(jupyter:vega-lite `(:object-plist "$schema" "https://vega.github.io/schema/vega-lite/v5.json"
,@(when title
(list "title" title))
"data" (:object-plist "values" ,(map 'vector
(lambda (x y)
(list :object-plist
"x" x
"y" y))
x y))
@yitzchak
yitzchak / Dockerfile
Created July 21, 2019 17:16
Dockerfile for Maxima-Jupyter and common-lisp-jupyter testing
FROM archlinux/base:latest
ARG D_USER=app
ARG D_PASSWD=
ARG D_UID=1000
ENV USER ${D_USER}
ENV HOME /home/${D_USER}
ENV PATH "${HOME}/.roswell/bin:${PATH}"