gdjn  Diff

Differences From Artifact [22543b9ce7]:

To Artifact [495ac069e8]:


  1008   1008   	(let [uf (unit-files unit)]
  1009   1009   		(:write stdout (case emit
  1010   1010   			"header" (lines->str (uf :header))
  1011   1011   			"loader" (lines->str (uf :impl))
  1012   1012   			(error :bad-cmd)))))
  1013   1013   
  1014   1014   (defn main [& argv]
  1015         -	(entry ;argv))
  1016         -	# (try (entry ;argv)
  1017         -	# 	([e] (:write stderr (style ;(err->msg e)) "\n"))))
         1015  +	# (entry ;argv))
         1016  +	(try (entry ;argv)
         1017  +		([e] (:write stderr (style ;(err->msg e)) "\n"))))