Added concept of multiple nodes
[clinton/domtool2.git] / src / eval.sml
index c05d781..232a8aa 100644 (file)
@@ -14,7 +14,7 @@
  * You should have received a copy of the GNU General Public License
  * along with this program; if not, write to the Free Software
  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
-*)
+ *)
 
 (* Execution of Domtool programs reduced to primitive actions *)
 
@@ -103,9 +103,10 @@ fun exec evs e =
                      | SOME action => action (evs, args)
                end
 
+       val _ = Env.pre ()
        val evs' = exec' evs e
     in
-       ()
+       Env.post ()
     end
 
 end