* 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 *)
| SOME action => action (evs, args)
end
+ val _ = Env.pre ()
val evs' = exec' evs e
in
- ()
+ Env.post ()
end
end