Skip to content
This repository
tree: 9e50f0cb61
Fetching contributors…

Cannot retrieve contributors at this time

file 13 lines (11 sloc) 0.472 kb
1 2 3 4 5 6 7 8 9 10 11 12 13
;; test_references.nu
;; tests for Nu pass-by-reference extensions.
;;
;; Copyright (c) 2007 Tim Burks, Radtastical Inc.

(class TestReferences is NuTestCase
     
     (- (id) testReturnByReference is
        (class ReferenceClass is NSObject
             (+ (void) returnByReference:(id *) reference is
                (reference setValue:99)))
        (ReferenceClass returnByReference:(set reference (NuReference new)))
        (assert_equal 99 (reference value))))
Something went wrong with that request. Please try again.