anchor.diff:  
   	Frame = wxFrame:new(wx:null(), ?wxID_ANY, "imaku", [
   		{size, {960, 540}},
  -		{style, (?wxDEFAULT_FRAME_STYLE
  -					bxor (?wxRESIZE_BORDER bor ?wxMAXIMIZE_BOX))
  +		{style, ?wxDEFAULT_FRAME_STYLE
  +					bxor (?wxRESIZE_BORDER bor ?wxMAXIMIZE_BOX)
   				band ?wxBORDER_NONE}
   	]),
   	wxFrame:show(Frame),
  
positive.code: 
  	wxFrame:layout(Frame),
  
  	gl:clear(?GL_COLOR_BUFFER_BIT bor ?GL_DEPTH_BUFFER_BIT),
  	wxGLCanvas:swapBuffers(Canvas),
  
  	{Frame, #state{frame=Frame, canvas=Canvas}}.
  
  handle_call(Msg, _From, State) ->
  	{reply,ok,State}.
  
  handle_event(#wx{event=#wxClose{}}, State) ->
  	{stop, normal, State};
  handle_event(Ev,State) ->
  	{noreply, State}.
  
  handle_info(Msg, State) ->
  	{noreply,State}.
  
  code_change(_, _, State) ->
  	{stop, not_yet_implemented, State}.
  
  terminate(_Reason, _State) ->
  	wx:destroy(),
  	application:stop(imaku).
  
negative.code: 
  -record(state, {
  	frame,
  	canvas,
  	timer
  }).
  
  %% API.
  