~ubuntu-branches/ubuntu/lucid/gauche-c-wrapper/lucid

« back to all changes in this revision

Viewing changes to testsuite/objc-test.m

  • Committer: Bazaar Package Importer
  • Author(s): NIIBE Yutaka
  • Date: 2008-04-07 09:15:03 UTC
  • Revision ID: james.westby@ubuntu.com-20080407091503-wu0h414koe95kj4i
Tags: upstream-0.5.2
ImportĀ upstreamĀ versionĀ 0.5.2

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
#import "objc-test.h"
 
2
 
 
3
@implementation OBJCTest
 
4
 
 
5
+ (int)staticMethod
 
6
{
 
7
    return 5;
 
8
}
 
9
 
 
10
- (unsigned char)incrementUnsignedChar:(unsigned char)v
 
11
{
 
12
    return v + 1;
 
13
}
 
14
 
 
15
- (signed char)incrementSignedChar:(signed char)v
 
16
{
 
17
    return v + 1;
 
18
}
 
19
 
 
20
- (unsigned short)incrementUnsignedShort:(unsigned short)v
 
21
{
 
22
    return v + 1;
 
23
}
 
24
 
 
25
- (signed short)incrementSignedShort:(signed short)v
 
26
{
 
27
    return v + 1;
 
28
}
 
29
 
 
30
- (unsigned int)incrementUnsignedInt:(unsigned int)v
 
31
{
 
32
    return v + 1;
 
33
}
 
34
 
 
35
- (signed int)incrementSignedInt:(signed int)v
 
36
{
 
37
    return v + 1;
 
38
}
 
39
 
 
40
- (unsigned long)incrementUnsignedLong:(unsigned long)v
 
41
{
 
42
    return v + 1;
 
43
}
 
44
 
 
45
- (signed long)incrementSignedLong:(signed long)v
 
46
{
 
47
    return v + 1;
 
48
}
 
49
 
 
50
- (unsigned long long)incrementUnsignedLongLong:(unsigned long long)v
 
51
{
 
52
    return v + 1;
 
53
}
 
54
 
 
55
- (signed long long)incrementSignedLongLong:(signed long long)v
 
56
{
 
57
    return v + 1;
 
58
}
 
59
 
 
60
- (float)addFloat:(float)v1 and:(float)v2
 
61
{
 
62
    return v1 + v2;
 
63
}
 
64
 
 
65
- (double)addDouble:(double)v1 and:(double)v2
 
66
{
 
67
    return v1 + v2;
 
68
}
 
69
 
 
70
- (NSString*)appendString:(NSString*)str1 and:(NSString*)str2
 
71
{
 
72
    NSMutableString *ret = [NSMutableString stringWithString:str1];
 
73
    [ret appendString:str2];
 
74
 
 
75
    return ret;
 
76
}
 
77
    
 
78
- (TestLarge)addLargeStruct:(TestLarge)data valA:(int)a valB:(int)b
 
79
{
 
80
    TestLarge ret;
 
81
    ret.a = data.a + a;
 
82
    ret.b = data.b + b;
 
83
    return ret;
 
84
}
 
85
 
 
86
- (TestSmall)addSmallStruct:(TestSmall)data valA:(char)a valB:(char)b;
 
87
{
 
88
    TestSmall ret;
 
89
    ret.a = data.a + a;
 
90
    ret.b = data.b + b;
 
91
    return ret;
 
92
}
 
93
 
 
94
- (TestLargeUnion)addLargeUnion:(TestLargeUnion)data valA:(int)a
 
95
{
 
96
    TestLargeUnion ret;
 
97
    ret.a = data.a + a;
 
98
    return ret;
 
99
}
 
100
 
 
101
- (TestSmallUnion)addSmallUnion:(TestSmallUnion)data valA:(char)a
 
102
{
 
103
    TestSmallUnion ret;
 
104
    ret.a = data.a + a;
 
105
    return ret;
 
106
}
 
107
 
 
108
- (void)overwriteData:(TestLarge*)data
 
109
{
 
110
    data->a = 1;
 
111
    data->b = 2;
 
112
}
 
113
 
 
114
@end
 
115
 
 
116