milosn@box la $ ./genzone/genzone /home/milosn/projects/la-2012-04-02-15-34-54.db 
((name . quna.la) (status . L) (ttl . 3600) (client_hold . N) (hd_id . 1) (ho_name . f1g1ns2.dnspod.net) (ho_ipv4 . ) (ho_ipv6 . ) (fw_url . ))
quna 3600 NS f1g1ns2.dnspod.net
((name . quna.la) (status . L) (ttl . 3600) (client_hold . N) (hd_id . 2) (ho_name . f1g1ns1.dnspod.net) (ho_ipv4 . ) (ho_ipv6 . ) (fw_url . ))
quna 3600 NS f1g1ns1.dnspod.net
((name . tv18.la) (status . L) (ttl . 3600) (client_hold . N) (hd_id . -1) (ho_name . ) (ho_ipv4 . ) (ho_ipv6 . ) (fw_url . http://www.la/))

Error: call of non-procedure: #<unspecified>

	Call history:

	##sys#peek-c-string	  
	loop1474	  
	genzone.la.scm:71: alist-ref	  
	genzone.la.scm:72: alist-ref	  
	genzone.la.scm:72: string-downcase	  
	genzone.la.scm:73: get-prefix	  
	genzone.la.scm:21: string-split	  
	genzone.la.scm:21: drop-right	  
	genzone.la.scm:21: string-join	  
	genzone.la.scm:74: alist-ref	  
	genzone.la.scm:75: alist-ref	  
	genzone.la.scm:76: alist-ref	  
	genzone.la.scm:78: display	  
	genzone.la.scm:79: newline	  
	genzone.la.scm:96: hash-table-set!	  
	g8687	  	<--