| 
					
				 | 
			
			
				@@ -366,6 +366,39 @@ span. Note the use of LaTeX, rather than Org-mode, markup. 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 | 2 | 5 | 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 | 3 | 6 | 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				  
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+** Convert every element of a table to a string 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+#+tblname: hetero-table 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+| 1 | 2 | 3 | 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+| a | b | c | 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+#+source: all-to-string 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+#+begin_src emacs-lisp :var tbl='() 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  (defun all-to-string (tbl) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    (if (listp tbl) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+        (mapcar #'all-to-string tbl) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+      (if (stringp tbl) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+          tbl 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+        (format "%s" tbl)))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  (all-to-string tbl) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+#+end_src 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+#+begin_src emacs-lisp :var tbl=hetero-table 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  (mapcar (lambda (row) (mapcar (lambda (cell) (stringp cell)) row)) tbl) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+#+end_src 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+#+results: 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+| nil | nil | nil | 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+| t   | t   | t   | 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+#+begin_src emacs-lisp :var tbl=all-to-string(hetero-table) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  (mapcar (lambda (row) (mapcar (lambda (cell) (stringp cell)) row)) tbl) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+#+end_src 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+#+results: 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+| t | t | t | 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+| t | t | t | 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 * Misc 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				  
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 ** File-specific Version Control logging 
			 |