emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
From: Rainer M Krug <r.m.krug@gmail.com>
To: Eric Schulte <schulte.eric@gmail.com>
Cc: emacs-orgmode <emacs-orgmode@gnu.org>,
	Dr Rainer M Krug <r.m.krug@gmail.com>
Subject: Re: [BABEL] tangling with leaving non-source code lines as empty lines?
Date: Thu, 15 Jul 2010 10:00:55 +0200	[thread overview]
Message-ID: <4C3EC037.1070702@mail.com> (raw)
In-Reply-To: <871vb7wb3c.fsf@gmail.com>

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

On 13/07/2010 19:22, Eric Schulte wrote:
> Hi Rainer,
> 
> Dr Rainer M Krug <r.m.krug@gmail.com> writes:
> 
>> On 13/07/2010 02:46, Eric Schulte wrote:
>>> Hi Rainer,
>>>
>>> With the tangling comments generated by the latest Org-mode, the
>>> following function should be able to jump from any code in a tangled
>>> code file back to the relevant block in the original Org-mode file.
>>
>> Wow - that was quick.
>>
>> Thanks.
>>
>>>
>>> --8<---------------cut here---------------start------------->8---
>>> (defun org-babel-tangle-jump-to-org ()
>>>   "Jump from a tangled code file to the related Org-mode file."
>>>   (interactive)
>>>   (let ((mid (point))
>>> 	target-buffer target-char
>>> 	start end link path block-name)
>>>     (save-window-excursion
>>>       (save-excursion
>>> 	(unless (and (re-search-backward org-bracket-link-analytic-regexp nil t)
>>> 		     (setq start (point))
>>> 		     (setq link (match-string 0))
>>> 		     (setq path (match-string 3))
>>> 		     (setq block-name (match-string 5))
>>> 		     (re-search-forward (concat " " (regexp-quote block-name)
>>> 						" ends here[\n\r]") nil t)
>>> 		     (setq end (point))
>>> 		     (< start mid) (< mid end))
>>> 	  (error "not in tangled code")))
>>>       (when (string-match "::" path)
>>> 	(setq path (substring path 0 (match-beginning 0))))
>>>       (find-file path) (setq target-buffer (current-buffer))
>>>       (goto-char start) (org-open-link-from-string link)
>>>       (if (string-match "[^ \t\n\r]:\\([[:digit:]]+\\)" block-name)
>>> 	  (org-babel-next-src-block
>>> 	   (string-to-int (match-string 1 block-name)))
>>> 	(org-babel-goto-named-src-block block-name))
>>>       (setq target-char (point)))
>>>     (pop-to-buffer target-buffer)
>>>     (goto-char target-char)))
>>> --8<---------------cut here---------------end--------------->8---
>>>
>>
>> I tried it out, and realised that one needs to name the blocks
>> (#+srcname:) to be able to use it. Then it jumps to the code block in
>> the org file.
>>
> 
> Have you tried this on un-named code blocks (with the latest Org-mode
> from git)?  It should work for those as well -- it parses the name, and
> uses org-babel-next-src-block to jump down the appropriate number of
> blocks.

OK - I tried it this morning (after updating org-mode), and it is
working even with unnamed blocks - perfect.

> 
>>
>> Two more things (As pointed out in the other email) would be nice:
>>
>> 1) it would be nice to jump to the line of code in the Org-mode file
>> which corresponds to the line in the code file
>>
> 
> Agreed, I was planning on implementing this, it shouldn't be difficult.

Great - thanks

> 
>>
>> 2) It would be brilliant, if one could call the function from the
>> Org-file buffer and enter the line number and then jump to the block /
>> line in the block.
>>
> 
> That's a great suggestions, I will certainly look at folding it in.

Perfect - I am looking forward to that.

> 
>>
>> In addition:
>> 3) it would be very useful, if this function could be used with
>> non-named source blocks.
>>
> 
> As I said above, I /believe/ that it is usable as such now, however if
> you could come up with an example where this fails, please do let me
> know.

Working - thanks.

> 
>>
>> But that function is already quite usefull.
>>
> 
> Great, I'll post any future improvements I make to this thread, and
> please do let me know if you run across errant behavior or new
> potentially useful behavior.

I am looking forward to any additions,

Cheers,

Rainer

> 
> Cheers -- Eric
> 
>>
>> Thanks,
>>
>> Rainer
>>
>>
>>> This is too large of a block of untested code to push into Org-mode now,
>>> however please give it a try, and let me know if you think this could be
>>> generally useful.  Hopefully after the feature-freeze we can fold
>>> something like this into Babel to ease navigation between Org files and
>>> their tangled offspring.
>>>
>>> Cheers -- Eric
>>>
>>> "Eric Schulte" <schulte.eric@gmail.com> writes:
>>>
>>>> Hi Rainer,
>>>>
>>>> If I'm understand you correctly you want the absolute position (by LOC)
>>>> of the lines of R code to be the same in both the original org file and
>>>> the tangled file or R code.  I don't think this is possible.  It is
>>>> possible to tangle code blocks in any order (not just the order in which
>>>> they appear in the original org file), so there are many valid tangling
>>>> scenarios in which this feature could not work.
>>>>
>>>> Rather, I think that it may make sense to have a function for jumping
>>>> back and forth between tangled code blocks and the related Org file.  In
>>>> that case the R errors could be followed to the tangled R code file,
>>>> from which you could easily jump to the relevant line in the relevant
>>>> code block in the Org file.  If you are tangling with comments, then it
>>>> should be possible to have a function called from a line in a tangled
>>>> code file which when called
>>>>
>>>> 1) finds it's enclosing comments
>>>> 2) remembers it's offset from the comments (which would then be it's
>>>>    offset in the code block in the Org file)
>>>> 3) read the comment to learn which code block in which Org file it's
>>>>    tangled from
>>>> 4) jump to the relevant line, in the relevant block, in the relevant
>>>>    file
>>>>
>>>> Similarly when called form within a code block in an Org file the
>>>> function could
>>>>
>>>> 1) read it's header argument to find the relevant tangled code file
>>>> 2) jump to that file
>>>> 3) use the comments in that file to move to the appropriate section of
>>>>    code and related line
>>>>
>>>> I'll think about such a function, and if it makes sense to implement it
>>>> apart from a more general "activate org-mode links in comments" minor
>>>> mode.  Any ideas or suggestions would be welcome!
>>>>
>>>> Thanks -- Eric
>>>>
>>>> Rainer M Krug <r.m.krug@gmail.com> writes:
>>>>
>>>>> Hi Eric,
>>>>>
>>>>> would it be possible, when tangling, to leave lines without source code in
>>>>> the resulting code file as empty lines? The reasoning would be that error
>>>>> messages (at least in R) give the line in which the error occurred. If the
>>>>> line numbers in which the code sits would be preserved (by leaving empty
>>>>> lines where no code is in the .org file), debugging would be much easier.
>>>>>
>>>>> By the way: I am using the after tangle hook and it works absolutely
>>>>> perfectly.
>>>>>
>>>>> Thanks and cheers,
>>>>>
>>>>> Rainer

-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.10 (GNU/Linux)
Comment: Using GnuPG with Mozilla - http://enigmail.mozdev.org/

iEYEARECAAYFAkw+wDYACgkQoYgNqgF2egoNmgCeL1ypgjwjT82r60x6yEyT5FF6
VwgAnA1GkoyEX4GoQmYjtctI+Q2t6S2s
=AVWc
-----END PGP SIGNATURE-----

  reply	other threads:[~2010-07-15  8:01 UTC|newest]

Thread overview: 7+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2010-07-12 15:19 [BABEL] tangling with leaving non-source code lines as empty lines? Rainer M Krug
2010-07-12 18:04 ` Eric Schulte
2010-07-13  0:46   ` Eric Schulte
2010-07-13  8:10     ` Dr Rainer M Krug
2010-07-13 17:22       ` Eric Schulte
2010-07-15  8:00         ` Rainer M Krug [this message]
2010-07-13  7:47   ` Dr Rainer M Krug

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=4C3EC037.1070702@mail.com \
    --to=r.m.krug@gmail.com \
    --cc=emacs-orgmode@gnu.org \
    --cc=schulte.eric@gmail.com \
    /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).