1-module(test_transform_mod).
2-export([ex1/0]).
3
4-include("codegen.hrl").
5
6ex1() ->
7    parse_trans_mod:transform_module(
8      ex1, [fun(Fs, _Os) ->
9		    parse_trans:export_function(int, 0, Fs)
10	    end,
11	    fun transform_ex1/2], [{pt_pp_src,true}]).
12
13transform_ex1(Forms, _Opts) ->
14    NewF = codegen:gen_function(add, fun(A, B) ->
15					     A - B
16				     end),
17    parse_trans:replace_function(add, 2, NewF, Forms).
18