From mboxrd@z Thu Jan  1 00:00:00 1970
From: Charles Millar <millarc@verizon.net>
Subject: Infinite loop using :post header argument that calls a emacs-lisp
 src block
Date: Thu, 30 Jul 2015 21:49:33 -0400
Message-ID: <55BAD42D.2080103@verizon.net>
Mime-Version: 1.0
Content-Type: text/plain; charset=utf-8; format=flowed
Content-Transfer-Encoding: 7bit
Return-path: <emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org>
Received: from eggs.gnu.org ([2001:4830:134:3::10]:60800)
	by lists.gnu.org with esmtp (Exim 4.71)
	(envelope-from <millarc@verizon.net>) id 1ZKzS7-0007RV-N0
	for emacs-orgmode@gnu.org; Thu, 30 Jul 2015 21:49:40 -0400
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
	(envelope-from <millarc@verizon.net>) id 1ZKzS4-0000C7-9z
	for emacs-orgmode@gnu.org; Thu, 30 Jul 2015 21:49:39 -0400
Received: from vms173025pub.verizon.net ([206.46.173.25]:61192)
	by eggs.gnu.org with esmtp (Exim 4.71)
	(envelope-from <millarc@verizon.net>) id 1ZKzS4-0000BN-61
	for emacs-orgmode@gnu.org; Thu, 30 Jul 2015 21:49:36 -0400
Received: from [192.168.1.128] ([70.209.134.172]) by vms173025.mailsrvcs.net
	(Oracle Communications Messaging Server 7.0.5.32.0 64bit (built Jul 16
	2014)) with ESMTPA id <0NSB0010CX2M9GB0@vms173025.mailsrvcs.net> for
	emacs-orgmode@gnu.org; Thu, 30 Jul 2015 20:49:35 -0500 (CDT)
List-Id: "General discussions about Org-mode." <emacs-orgmode.gnu.org>
List-Unsubscribe: <https://lists.gnu.org/mailman/options/emacs-orgmode>,
	<mailto:emacs-orgmode-request@gnu.org?subject=unsubscribe>
List-Archive: <http://lists.gnu.org/archive/html/emacs-orgmode>
List-Post: <mailto:emacs-orgmode@gnu.org>
List-Help: <mailto:emacs-orgmode-request@gnu.org?subject=help>
List-Subscribe: <https://lists.gnu.org/mailman/listinfo/emacs-orgmode>,
	<mailto:emacs-orgmode-request@gnu.org?subject=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: "emacs-orgmode@gnu.org" <emacs-orgmode@gnu.org>

emacs version GNU Emacs 24.3.1 (x86_64-pc-linux-gnu, GTK+ Version 
3.10.7) of 2014-03-07 on lamiak, modified by Debian
Org-mode version 8.3beta (release_8.3beta-1302-g00142f @ 
/usr/share/emacs/site-lisp/org-mode/lisp/)

the following produces a table with header, hline, a row with TOTAl and 
#+TBLFM immediately after the table

#+NAME: SCHEDAP
#+begin_src rec :data foo.rec :type bar :fields 
AssetDate,Description,Basis :results silent
  (some recutils sexes)
#+end_src
#+NAME: SCHEDA
#+begin_src emacs-lisp :var table=SCHEDAP :export results
   (setq table (cons 'hline table))
   (setq table (cons '("Date" "Description" "Basis") table))
   (setq table (append table '(("|Total"))))
   (setq table (append table '(("\n#+TBLFM: 
@>$>=vsum(@I$>..@>>$>);%.2f::"))))
   table
#+end_src
#+TBLNAME: SCHEDA

What I would like to use is

#+NAME: insertstuff
#+begin_src emacs-lisp :var table=() :results silent
   (setq table (cons 'hline table))
   (setq table (cons '("Date" "Description" "Basis") table))
   (setq table (append table '(("|Total"))))
   (setq table (append table '(("\n#+TBLFM: 
@>$>=vsum(@I$>..@>>$>);%.2f::"))))
   table
#+end_src


#+NAME: SCHEDA
#+begin_src rec :data foo.rec :type bar :fields 
AssetDate,Description,Basis :post insertstuff :var table=SCHEDA
  (some recutils sexes)
#+end_src
#+TBLNAME: SCHEDA

which results in an infinite loop, or so it appears.

What am I missing? Or, is the first example my only choice?

Charlie Millar