Debugger entered--Lisp error: (quit)
  outline-on-heading-p(t)
  outline-back-to-heading(t)
  outline-up-heading(1 t)
  (while (> (funcall outline-level) 1) (outline-up-heading 1 t) (put-text-property (point) (point-at-eol) :org-clock-force-headline-inclusion t))
  (progn (while (> ... 1) (outline-up-heading 1 t) (put-text-property ... ... :org-clock-force-headline-inclusion t)))
  (unwind-protect (progn (while ... ... ...)) (set-match-data save-match-data-internal (quote evaporate)))
  (let ((save-match-data-internal ...)) (unwind-protect (progn ...) (set-match-data save-match-data-internal ...)))
  (save-match-data (while (> ... 1) (outline-up-heading 1 t) (put-text-property ... ... :org-clock-force-headline-inclusion t)))
  (save-excursion (save-match-data (while ... ... ...)))
  (if headline-filter (save-excursion (save-match-data ...)))
  (progn (if headline-included (loop for l from 0 to level do ...)) (setq time (aref ltimes level)) (goto-char (match-beginning 0)) (put-text-property (point) (point-at-eol) :org-clock-minutes time) (if headline-filter (save-excursion ...)))
  (if (or headline-included headline-forced) (progn (if headline-included ...) (setq time ...) (goto-char ...) (put-text-property ... ... :org-clock-minutes time) (if headline-filter ...)))
  (when (or headline-included headline-forced) (if headline-included (loop for l from 0 to level do ...)) (setq time (aref ltimes level)) (goto-char (match-beginning 0)) (put-text-property (point) (point-at-eol) :org-clock-minutes time) (if headline-filter (save-excursion ...)))
  (progn (when (or headline-included headline-forced) (if headline-included ...) (setq time ...) (goto-char ...) (put-text-property ... ... :org-clock-minutes time) (if headline-filter ...)) (setq t1 0) (loop for l from level to (1- lmax) do (aset ltimes l 0)))
  (if (or (> t1 0) (> ... 0)) (progn (when ... ... ... ... ... ...) (setq t1 0) (loop for l from level to ... do ...)))
  (when (or (> t1 0) (> ... 0)) (when (or headline-included headline-forced) (if headline-included ...) (setq time ...) (goto-char ...) (put-text-property ... ... :org-clock-minutes time) (if headline-filter ...)) (setq t1 0) (loop for l from level to (1- lmax) do (aset ltimes l 0)))
  (let* ((headline-forced ...) (headline-included ...)) (setq level (- ... ...)) (when (or ... ...) (when ... ... ... ... ... ...) (setq t1 0) (loop for l from level to ... do ...)))
  (cond ((match-end 2) (setq ts ... te ... ts ... te ... ts ... te ... dt ... t1 ...)) ((match-end 4) (setq t1 ...)) (t (when ... ...) (let* ... ... ...)))
  (while (re-search-backward re nil t) (cond (... ...) (... ...) (t ... ...)))
  (save-excursion (goto-char (point-max)) (while (re-search-backward re nil t) (cond ... ... ...)) (setq org-clock-file-total-minutes (aref ltimes 0)))
  (let* ((bmp ...) (re ...) (lmax 30) (ltimes ...) (t1 0) (level 0) ts te dt time) (if (stringp tstart) (setq tstart ...)) (if (stringp tend) (setq tend ...)) (if (consp tstart) (setq tstart ...)) (if (consp tend) (setq tend ...)) (remove-text-properties (point-min) (point-max) (quote ...)) (save-excursion (goto-char ...) (while ... ...) (setq org-clock-file-total-minutes ...)) (set-buffer-modified-p bmp))
  org-clock-sum(nil nil (lambda nil (let (...) (eval matcher))))
  (if scope-is-list nil (org-clock-sum ts te (unless ... ...)) (goto-char (point-min)) (setq st t) (while (or ... ...) (goto-char p) (when ... ...)))
  (unless scope-is-list (org-clock-sum ts te (unless ... ...)) (goto-char (point-min)) (setq st t) (while (or ... ...) (goto-char p) (when ... ...)))
  (save-restriction (cond (...) (... ...) (... ...) (... ... ...) (... ... ... ...) (scope-is-list ...)) (goto-char pos) (unless scope-is-list (org-clock-sum ts te ...) (goto-char ...) (setq st t) (while ... ... ...)) (setq tbl (nreverse tbl)) (if tostring (if tbl ... nil) (goto-char ins) (insert-before-markers ... ... "|L|" ... "Headline|Time|\n") (setq total-time ...) (insert-before-markers "|-\n|" ... ... "*Total time*| *" ... "*|\n|-\n") (setq tbl ...) (if ... ...) (insert-before-markers ...) (backward-delete-char 1) (if ... ... ...) (goto-char ipos) (skip-chars-forward "^|") (org-table-align) (when recalc ... ...) (when rm-file-column ... ...) total-time))
  (let* ((hlchars ...) (ins ...) (total-time nil) (scope ...) (tostring ...) (multifile ...) (header ...) (maxlevel ...) (step ...) (emph ...) (timestamp ...) (ts ...) (te ...) (block ...) (link ...) (tags ...) (matcher ...) ipos time p level hlc hdl tsp props content recalc formula pcol cc beg end pos tbl tbl1 range-text rm-file-column scope-is-list st) (setq org-clock-file-total-minutes nil) (when step (unless ... ...) (org-clocktable-steps params) (throw ... nil)) (when block (setq cc ... ts ... te ... range-text ...)) (when (integerp ts) (setq ts ...)) (when (integerp te) (setq te ...)) (when (and ts ...) (setq ts ...)) (when (and te ...) (setq te ...)) (if ts (setq ts ...)) (if te (setq te ...)) (move-marker ins (point)) (setq ipos (point)) (setq pos (point)) (cond (... ...) (... ...) (... ... ...) (... ...)) (setq scope-is-list (and scope ...)) (save-restriction (cond ... ... ... ... ... ...) (goto-char pos) (unless scope-is-list ... ... ... ...) (setq tbl ...) (if tostring ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... total-time)))
  (catch (quote exit) (let* (... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ipos time p level hlc hdl tsp props content recalc formula pcol cc beg end pos tbl tbl1 range-text rm-file-column scope-is-list st) (setq org-clock-file-total-minutes nil) (when step ... ... ...) (when block ...) (when ... ...) (when ... ...) (when ... ...) (when ... ...) (if ts ...) (if te ...) (move-marker ins ...) (setq ipos ...) (setq pos ...) (cond ... ... ... ...) (setq scope-is-list ...) (save-restriction ... ... ... ... ...)))
  org-dblock-write:clocktable((:name "clocktable" :maxlevel 8 :scope subtree :tags "{DAILY}" :indentation-column 0 :content #("\n" 0 1 (fontified t))))
  funcall(org-dblock-write:clocktable (:name "clocktable" :maxlevel 8 :scope subtree :tags "{DAILY}" :indentation-column 0 :content #("\n" 0 1 (fontified t))))
  (let* ((pos ...) (line ...) (params ...) (name ...) (indent ...) (cmd ...)) (message "Updating dynamic block `%s' at line %d..." name line) (funcall cmd params) (message "Updating dynamic block `%s' at line %d...done" name line) (goto-char pos) (when (and indent ...) (setq indent ...) (save-excursion ... ... ... ...)))
  (save-window-excursion (let* (... ... ... ... ... ...) (message "Updating dynamic block `%s' at line %d..." name line) (funcall cmd params) (message "Updating dynamic block `%s' at line %d...done" name line) (goto-char pos) (when ... ... ...)))
  org-update-dblock()
  org-clock-report(nil)
  call-interactively(org-clock-report nil nil)