3 # unless explicitly casted via {{u}int{8,16,32,64},double,single},
4 # octave will take numeric literals as doubles.
6 if (!strcmp(foo(3),"foo:int"))
10 if (!strcmp(foo(3.1),"foo:double"))
14 if (!strcmp(foo("hello"),"foo:char *"))
21 if (!strcmp(foo(f),"foo:Foo *"))
25 if (!strcmp(foo(b),"foo:Bar *"))
31 if (!strcmp(foo(v),"foo:void *"))
37 if (!strcmp(s.foo(3),"foo:int"))
38 error("Spam::foo(int)")
41 if (!strcmp(s.foo(3.1),"foo:double"))
42 error("Spam::foo(double)")
45 if (!strcmp(s.foo("hello"),"foo:char *"))
46 error("Spam::foo(char *)")
49 if (!strcmp(s.foo(f),"foo:Foo *"))
50 error("Spam::foo(Foo *)")
53 if (!strcmp(s.foo(b),"foo:Bar *"))
54 error("Spam::foo(Bar *)")
57 if (!strcmp(s.foo(v),"foo:void *"))
58 error("Spam::foo(void *)")
61 if (!strcmp(Spam_bar(3),"bar:int"))
62 error("Spam::bar(int)")
65 if (!strcmp(Spam_bar(3.1),"bar:double"))
66 error("Spam::bar(double)")
69 if (!strcmp(Spam_bar("hello"),"bar:char *"))
70 error("Spam::bar(char *)")
73 if (!strcmp(Spam_bar(f),"bar:Foo *"))
74 error("Spam::bar(Foo *)")
77 if (!strcmp(Spam_bar(b),"bar:Bar *"))
78 error("Spam::bar(Bar *)")
81 if (!strcmp(Spam_bar(v),"bar:void *"))
82 error("Spam::bar(void *)")
88 if (!strcmp(s.type,"none"))
93 if (!strcmp(s.type,"int"))
98 if (!strcmp(s.type,"double"))
103 if (!strcmp(s.type,"char *"))
104 error("Spam(char *)")
108 if (!strcmp(s.type,"Foo *"))
113 if (!strcmp(s.type,"Bar *"))
118 if (!strcmp(s.type,"void *"))
119 error("Spam(void *)")