zoul

@implementation AVAssetExportSession (Testing)

- (void) exportSynchronously
{
    dispatch_semaphore_t semaphore = dispatch_semaphore_create(0);
    [self exportAsynchronouslyWithCompletionHandler:^{
        dispatch_semaphore_signal(semaphore);
    }];
    dispatch_semaphore_wait(semaphore, DISPATCH_TIME_FOREVER);
    dispatch_release(semaphore);

zoul

NSString *NSStringFromOSStatus(OSStatus errCode)
{
    if (errCode == noErr)
        return @"noErr";
    char message[5] = {0};
    *(UInt32*) message = CFSwapInt32HostToBig(errCode);
    return [NSString stringWithCString:message encoding:NSASCIIStringEncoding];
}

zoul

@implementation UIImage (ForceLoading)

- (void) forceLoad
{
    const CGImageRef cgImage = [self CGImage];  

    const int width = CGImageGetWidth(cgImage);
    const int height = CGImageGetHeight(cgImage);
    
    const CGColorSpaceRef colorspace = CGImageGetColorSpace(cgImage);

zoul

@interface DownloadOperation : NSOperation
{
    NSURLRequest *request;
    NSURLConnection *connection;
    NSMutableData *receivedData;
}

@property(readonly) BOOL isExecuting;
@property(readonly) BOOL isFinished;

zoul

@interface UINavigationItem (Extensions)

- (void) setRightBarButtonItemsWithTotalWidth: (NSUInteger) width
    items: (UIBarItem*) firstItem, ...;

@end

zoul

typedef enum {
    kDeviceTypeUnknown = 0,
    kDeviceTypeSimulator,
    kDeviceTypeiPhone1G,
    kDeviceTypeiPhone3G,
    kDeviceTypeiPhone3GS,
    kDeviceTypeiPhone4,
    kDeviceTypeiPod1G,
    kDeviceTypeiPod2G,
    kDeviceTypeiPad

zoul

- (void) processStrings: (NSString*) str1, ...
{
    va_list args;
    va_start(args, str1);
    NSString *arg = str1;
    while (arg != nil) {
        // do something with arg
        arg = va_arg(args, NSString*);
    }
    va_end(args);

zoul

#!/usr/bin/perl

use Modern::Perl;
use WWW::Mechanize;

my $root = 'http://naima:3000/cs/';
my $domain = 'http://naima';
my $mech = WWW::Mechanize->new;

sub visit {

zoul

#!/usr/bin/perl

use Modern::Perl;
use XML::RSS::Tools;
use Perl6::Slurp;

my $style = slurp \*DATA;
my $feed = XML::RSS::Tools->new;
#$feed->set_http_client('lite');
#$feed->debug(1);

zoul

/*
    - Trivial wrapper around system sound as provided by Audio Services.
    - Don’t forget to link against the Audio Toolbox framework.
    - Assumes ARC support.
*/

@interface Sound : NSObject

// Path is relative to the resources dir.
- (id) initWithPath: (NSString*) path;