emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
From: "Thomas S. Dye" <tsd@tsdye.com>
To: org-mode mailing list <emacs-orgmode@gnu.org>
Subject: [babel]  (wrong-type-argument number-or-marker-p nil)
Date: Sun, 7 Feb 2010 12:35:17 -1000	[thread overview]
Message-ID: <DCF8718F-5854-459D-9BA2-6D140574D505@tsdye.com> (raw)


[-- Attachment #1.1: Type: text/plain, Size: 5711 bytes --]

Aloha all,

I pulled the latest org-mode this morning and got an error starting  
emacs afterwards that appears to be tied to org-babel-load-file.

I ran git bisect and ended up here:

131441dbd2d16e92f863864ed536f37fcd4a85fc is first bad commit
commit 131441dbd2d16e92f863864ed536f37fcd4a85fc
Author: Eric Schulte <schulte.eric@gmail.com>
Date:   Thu Feb 4 09:43:11 2010 -0700

     babel: load-file works for symlinks -- Thanks to Martin Kühl

:040000 040000 b4e1b1d95a9c1bfd182ad3a834830c4494566679  
7ae93fe06479799b0d7dc233caa00ddfd6daec3a M      contrib

The backtrace from starting emacs with --debug-init follows:

> Debugger entered--Lisp error: (wrong-type-argument number-or-marker- 
> p nil)
>   time-subtract((19311 14612 450479) nil)
>   (time-to-seconds (time-subtract (current-time) (sixth ...)))
>   (catch (quote --cl-block-age--) (time-to-seconds (time- 
> subtract ... ...)))
>   (cl-block-wrapper (catch (quote --cl-block-age--) (time-to- 
> seconds ...)))
>   (block age (time-to-seconds (time-subtract ... ...)))
>   age("td.org")
>   (> (age file) (age exported-file))
>   (and (file-exists-p exported-file) (> (age file) (age exported- 
> file)))
>   (if (and (file-exists-p exported-file) (> ... ...)) nil (org-babel- 
> tangle-file file base-name "emacs-lisp"))
>   (unless (and (file-exists-p exported-file) (> ... ...)) (org-babel- 
> tangle-file file base-name "emacs-lisp"))
>   (let* ((base-name ...) (exported-file ...)) (unless (and ... ...)  
> (org-babel-tangle-file file base-name "emacs-lisp")) (load-file  
> exported-file) (message "loaded %s" exported-file))
>   (progn (fset (quote age) (function* ...)) (let* (... ...)  
> (unless ... ...) (load-file exported-file) (message "loaded %s"  
> exported-file)))
>   (unwind-protect (progn (fset ... ...) (let* ... ... ... ...)) (if  
> --cl-letf-bound-- (fset ... --cl-letf-save--) (fmakunbound ...)))
>   (let* ((--cl-letf-bound-- ...) (--cl-letf-save-- ...)) (unwind- 
> protect (progn ... ...) (if --cl-letf-bound-- ... ...)))
>   (letf ((... ...)) (let* (... ...) (unless ... ...) (load-file  
> exported-file) (message "loaded %s" exported-file)))
>   (letf* ((... ...)) (let* (... ...) (unless ... ...) (load-file  
> exported-file) (message "loaded %s" exported-file)))
>   (flet ((age ... ...)) (let* (... ...) (unless ... ...) (load-file  
> exported-file) (message "loaded %s" exported-file)))
>   org-babel-load-file("td.org")
>   mapc(org-babel-load-file ("td.org"))
>   (let ((default-directory user-specific-dir)) (mapc (function load)  
> (directory-files user-specific-dir nil ".*el$")) (mapc (function org- 
> babel-load-file) (directory-files user-specific-dir nil ".*org$")))
>   (progn (let (...) (mapc ... ...) (mapc ... ...)))
>   (if (file-exists-p user-specific-dir) (progn (let ... ... ...)))
>   (when (file-exists-p user-specific-dir) (let (...) (mapc ... ...)  
> (mapc ... ...)))
>   eval-buffer(#<buffer  *load*<2>> nil "/Users/dk/.emacs.d/starter- 
> kit.el" nil t)  ; Reading at buffer position 6504
>   load-with-code-conversion("/Users/dk/.emacs.d/starter-kit.el" "/ 
> Users/dk/.emacs.d/starter-kit.el" nil nil)
>   load("/Users/dk/.emacs.d/starter-kit.el" nil nil t)
>   load-file("/Users/dk/.emacs.d/starter-kit.el")
>   (let* ((base-name ...) (exported-file ...)) (unless (and ... ...)  
> (org-babel-tangle-file file base-name "emacs-lisp")) (load-file  
> exported-file) (message "loaded %s" exported-file))
>   (progn (fset (quote age) (function* ...)) (let* (... ...)  
> (unless ... ...) (load-file exported-file) (message "loaded %s"  
> exported-file)))
>   (unwind-protect (progn (fset ... ...) (let* ... ... ... ...)) (if  
> --cl-letf-bound-- (fset ... --cl-letf-save--) (fmakunbound ...)))
>   (let* ((--cl-letf-bound-- ...) (--cl-letf-save-- ...)) (unwind- 
> protect (progn ... ...) (if --cl-letf-bound-- ... ...)))
>   (letf ((... ...)) (let* (... ...) (unless ... ...) (load-file  
> exported-file) (message "loaded %s" exported-file)))
>   (letf* ((... ...)) (let* (... ...) (unless ... ...) (load-file  
> exported-file) (message "loaded %s" exported-file)))
>   (flet ((age ... ...)) (let* (... ...) (unless ... ...) (load-file  
> exported-file) (message "loaded %s" exported-file)))
>   org-babel-load-file("/Users/dk/.emacs.d/starter-kit.org")
>   eval-buffer(#<buffer  *load*> nil "/Users/dk/.emacs.d/init.el" nil  
> t)  ; Reading at buffer position 884
>   load-with-code-conversion("/Users/dk/.emacs.d/init.el" "/Users/ 
> dk/.emacs.d/init.el" t t)
>   load("/Users/dk/.emacs.d/init" t t)
>   #[nil "\b\205\264\0	\306=\203\x11\0\307\b\310Q\2027\0	\311= 
> \2033\0\312\307\313\314#\203#\0\315\2027\0\312\307\313\316# 
> \203/\0\317\2027\0\315\2027\0\307\b\320Q\x1a\321\x13\322\n\321\211#\210\v\321= 
> \203_\0\323\324\325\307\b\326Q!\"\x1c\322\f\321\211#\210\v\321=\203^\0\n\x13)\v 
> \203\244\0\327\v!\330\232\203\244\0\331\v!\211\x1d\332P\x1e\"\333\x0e\"! 
> \203\200\0\x0e\"\202\213\0\333
> !\203\212\0
> \202\213\0\313\211\x15\203\243\0\334
> \v\"\203\241\0\335\336
> \v#\210\337\340!\210
> \x13*\x0e#?\205\263\0\313\x1e$\322\341\321\211#))\207" [init-file-user system- 
> type user-init-file-1 user-init-file otherfile source ms-dos "~" "/ 
> _emacs" windows-nt directory-files nil "^\\.emacs\\(\\.elc?\\)?$"  
> "~/.emacs" "^_emacs\\(\\.elc?\\)?$" "~/_emacs" "/.emacs" t load  
> expand-file-name "init" file-name-as-directory "/.emacs.d" file-name- 
> extension "elc" file-name-sans-extension ".el" file-exists-p file- 
> newer-than-file-p message "Warning: %s is newer than %s" sit-for 1  
> "default" alt inhibit-default-init inhibit-startup-screen] 7]()
>   command-line()
>   normal-top-level()

hth,
Tom

[-- Attachment #1.2: Type: text/html, Size: 9791 bytes --]

[-- Attachment #2: Type: text/plain, Size: 201 bytes --]

_______________________________________________
Emacs-orgmode mailing list
Please use `Reply All' to send replies to the list.
Emacs-orgmode@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-orgmode

             reply	other threads:[~2010-02-07 22:35 UTC|newest]

Thread overview: 5+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2010-02-07 22:35 Thomas S. Dye [this message]
2010-02-07 22:53 ` [babel] (wrong-type-argument number-or-marker-p nil) Eric Schulte
2010-02-08  4:44   ` Thomas S. Dye
2010-02-08 12:50     ` Dan Davison
2010-02-08 19:21   ` Thomas S. Dye

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

  List information: https://www.orgmode.org/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=DCF8718F-5854-459D-9BA2-6D140574D505@tsdye.com \
    --to=tsd@tsdye.com \
    --cc=emacs-orgmode@gnu.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).