anchor.diff:  
       ?line {'EXIT',_} =
   	(catch
  -	     binary_to_term(
  +	     binary_to_term_stress(
   	       %% A old-type fun in a list containing a bad creator pid.
   	       <<131,108,0,0,0,1,117,0,0,0,0,103,100,0,13,110,111,110,111,100,101,64,110,111,104,111,115,116,255,255,0,25,255,0,0,0,0,100,0,1,116,97,0,98,6,142,121,72,106>>)),
   
       ?line {'EXIT',_} =
   	(catch
  -	     binary_to_term(
  +	     binary_to_term_stress(
   	       %% A new-type fun in a list containing a bad creator pid.
   	       %% 
   	       <<131,
  
positive.code: 
      %% An absurdly large atom.
      ?line {'EXIT',_} = 
  	(catch binary_to_term(iolist_to_binary([<<131,100,65000:16>>|
  						lists:duplicate(65000, 42)]))),
  
      %% Longer than 255 characters.
      ?line {'EXIT',_} = 
  	(catch binary_to_term(iolist_to_binary([<<131,100,256:16>>|
  						lists:duplicate(256, 42)]))),
  
      %% OTP-7218. Thanks to Matthew Dempsky. Also make sure that we
      %% cover the other error cases for external funs (EXPORT_EXT).
      ?line {'EXIT',_} = 
  	(catch binary_to_term(
  		 <<131,
  		  113,				%EXPORT_EXP
  		  97,13,			%Integer: 13
  		  97,13,			%Integer: 13
  		  97,13>>)),			%Integer: 13
      ?line {'EXIT',_} = 
  	(catch binary_to_term(
  		 <<131,
  		  113,				%EXPORT_EXP
  		  100,0,1,64,			%Atom: '@'
  		  97,13,			%Integer: 13
  		  97,13>>)),			%Integer: 13
      ?line {'EXIT',_} = 
  	(catch binary_to_term(
  		 <<131,
  		  113,				%EXPORT_EXP
  		  100,0,1,64,			%Atom: '@'
  		  100,0,1,64,			%Atom: '@'
  		  106>>)),			%NIL
      ?line {'EXIT',_} = 
  	(catch binary_to_term(
  		 <<131,
  		  113,				%EXPORT_EXP
  		  100,0,1,64,			%Atom: '@'
  		  100,0,1,64,			%Atom: '@'
  		  98,255,255,255,255>>)),	%Integer: -1
      ?line {'EXIT',_} = 
  	(catch binary_to_term(
  		 <<131,
  		  113,				%EXPORT_EXP
  		  100,0,1,64,			%Atom: '@'
  
negative.code:     ?line ok = io:format("File: ~s\n", [BadFile]),
      ?line case file:read_file(BadFile) of
  	      {ok,Bin} ->
  		  ?line {'EXIT',{badarg,_}} = (catch binary_to_term_stress(Bin)),
  		  ok;
  	      Other ->
  		  ?line ?t:fail(Other)
  