From mboxrd@z Thu Jan 1 00:00:00 1970 From: Eric Schulte Subject: Re: Org Babel C/C++ Date: Mon, 26 Mar 2012 07:39:56 -0400 Message-ID: <87wr67po1v.fsf@gmx.com> References: <87fwcz6vbf.fsf@gmail.com> Mime-Version: 1.0 Content-Type: text/plain Return-path: Received: from eggs.gnu.org ([208.118.235.92]:60060) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1SCAW6-00073n-HD for emacs-orgmode@gnu.org; Mon, 26 Mar 2012 10:03:32 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1SCAVw-00010y-Iu for emacs-orgmode@gnu.org; Mon, 26 Mar 2012 10:03:26 -0400 Received: from mailout-us.gmx.com ([74.208.5.67]:49025 helo=mailout-us.mail.com) by eggs.gnu.org with smtp (Exim 4.71) (envelope-from ) id 1SCAVw-00010D-BH for emacs-orgmode@gnu.org; Mon, 26 Mar 2012 10:03:16 -0400 List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: Daimrod Cc: emacs-orgmode@gnu.org Applied, Thanks! Daimrod writes: > Hi, > > I've made a small patch to ob-C.el so it now includes the current > directory to the list of directories to be searched for header files. > Without this, I cannot include a local header file because the > compilation happens in /tmp and thus gcc or g++ doesn't search for > header files in the directory I currently work. > > diff --git a/lisp/ob-C.el b/lisp/ob-C.el > index f1525aa..4f33fc4 100644 > --- a/lisp/ob-C.el > +++ b/lisp/ob-C.el > @@ -96,15 +96,14 @@ or `org-babel-execute:C++'." > (progn > (with-temp-file tmp-src-file (insert full-body)) > (org-babel-eval > - (format "%s -o %s %s %s -I \"%s\"" > + (format "%s -o %s %s %s" > (cond > ((equal org-babel-c-variant 'c) org-babel-C-compiler) > ((equal org-babel-c-variant 'cpp) org-babel-C++-compiler)) > (org-babel-process-file-name tmp-bin-file) > (mapconcat 'identity > (if (listp flags) flags (list flags)) " ") > - (org-babel-process-file-name tmp-src-file) > - (file-name-directory (expand-file-name (buffer-file-name)))) "")))) > + (org-babel-process-file-name tmp-src-file)) "")))) > ((lambda (results) > (org-babel-reassemble-table > (if (member "vector" (cdr (assoc :result-params params))) -- Eric Schulte http://cs.unm.edu/~eschulte/