2013-04-10 21:29:02 -07:00
|
|
|
-module(fork).
|
|
|
|
|
-export([start/0]).
|
|
|
|
|
|
|
|
|
|
start() ->
|
2013-06-05 21:47:54 +00:00
|
|
|
erlang:spawn( fun() -> child() end ),
|
2013-04-10 21:29:02 -07:00
|
|
|
io:format("This is the original process~n").
|
|
|
|
|
|
|
|
|
|
child() ->
|
|
|
|
|
io:format("This is the new process~n").
|
