jsaddle-wkwebview-0.9.10.0: cbits-uikit/ViewController.m

#import "ViewController.h"

// See cbits/WKWebView-callbacks.h: Haskell callbacks are registered, not extern.
#include "../cbits/WKWebView-callbacks.h"

@interface ViewController ()

@end

@implementation ViewController

-(id)initWithHandler:(HsStablePtr)handler {
    self = [super init];
    if (self) {
        _handler = handler;
    }
    return self;
}

- (void)loadView {
    [super loadView];
    // WKWebViewConfiguration *theConfiguration = [[WKWebViewConfiguration alloc] init];
    // [theConfiguration.preferences setValue:@YES forKey:@"developerExtrasEnabled"];
    _webView = [[WKWebView alloc] init];
    _webView.autoresizingMask = UIViewAutoresizingFlexibleWidth | UIViewAutoresizingFlexibleHeight;
    self.view = _webView;
}

- (void)viewDidLoad {
    [super viewDidLoad];
    if (jsaddleCallbacks.callWithWebView) jsaddleCallbacks.callWithWebView((void *)_webView, _handler);
}


- (void)didReceiveMemoryWarning {
    [super didReceiveMemoryWarning];
    // Dispose of any resources that can be recreated.
}


@end