Skip to content

Instantly share code, notes, and snippets.

@zakki

zakki/gist:3377337

Created August 17, 2012 09:19
Show Gist options

  • Select an option

    Learn more about clone URLs
  • Save zakki/3377337 to your computer and use it in GitHub Desktop.

Select an option

Learn more about clone URLs
Save zakki/3377337 to your computer and use it in GitHub Desktop.
Download ZIP
js_of_ocaml ReferenceError?
Raw
gistfile1.ml
let _ =
for i = 0 to 6 do
let result = try Some (List.find (fun s -> s = 1049) [1; 2; 5]) with Not_found -> None in
result
done
@zakki
Copy link
Copy Markdown
Author

zakki commented Aug 17, 2012 

  for(;;)
   {try
     {var param_l_=_g_;
      for(;;)
       {if(!param_l_)throw [0,_a_];
        var l_m_=param_l_[2];
        if(1049!==param_l_[1]){var param_l_=l_m_;continue;}
        break;}}
    catch(_p_){if(_n_[1]!==_a_)throw _n_;}

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment