@@ -63,8 +63,8 @@ type upcalls = rec(
63
63
fn declare_upcalls ( type_names tn, ModuleRef llmod) -> @upcalls {
64
64
fn decl ( type_names tn, ModuleRef llmod, str name , vec[ TypeRef ] tys ,
65
65
TypeRef rv) -> ValueRef {
66
- let vec[ TypeRef ] arg_tys = vec ( T_taskptr ( tn) ) ;
67
- for ( TypeRef t in tys) { arg_tys += vec ( t ) ; }
66
+ let vec[ TypeRef ] arg_tys = [ T_taskptr ( tn) ] ;
67
+ for ( TypeRef t in tys) { arg_tys += [ t ] ; }
68
68
auto fn_ty = T_fn ( arg_tys, rv) ;
69
69
ret trans:: decl_cdecl_fn ( llmod, "upcall_" + name, fn_ty) ;
70
70
}
@@ -74,61 +74,61 @@ fn declare_upcalls(type_names tn, ModuleRef llmod) -> @upcalls {
74
74
75
75
// FIXME: Sigh:.. remove this when I fix the typechecker pushdown.
76
76
// --pcwalton
77
- let vec[ TypeRef ] empty_vec = vec ( ) ;
77
+ let vec[ TypeRef ] empty_vec = [ ] ;
78
78
79
79
ret @rec(
80
- grow_task=dv ( "grow_task" , vec ( T_size_t ( ) ) ) ,
81
- log_int=dv ( "log_int" , vec ( T_i32 ( ) , T_i32 ( ) ) ) ,
82
- log_float=dv ( "log_float" , vec ( T_i32 ( ) , T_f32 ( ) ) ) ,
83
- log_double=dv ( "log_double" , vec ( T_i32 ( ) , T_ptr ( T_f64 ( ) ) ) ) ,
84
- log_str=dv ( "log_str" , vec ( T_i32 ( ) , T_ptr ( T_str ( ) ) ) ) ,
85
- trace_word=dv ( "trace_word" , vec ( T_int ( ) ) ) ,
86
- trace_str=dv ( "trace_str" , vec ( T_ptr ( T_i8 ( ) ) ) ) ,
87
- new_port=d ( "new_port" , vec ( T_size_t ( ) ) , T_opaque_port_ptr ( ) ) ,
88
- del_port=dv ( "del_port" , vec ( T_opaque_port_ptr ( ) ) ) ,
89
- new_chan=d ( "new_chan" , vec ( T_opaque_port_ptr ( ) ) , T_opaque_chan_ptr ( ) ) ,
90
- flush_chan=dv ( "flush_chan" , vec ( T_opaque_chan_ptr ( ) ) ) ,
91
- del_chan=dv ( "del_chan" , vec ( T_opaque_chan_ptr ( ) ) ) ,
92
- clone_chan=d ( "clone_chan" , vec ( T_taskptr ( tn) , T_opaque_chan_ptr ( ) ) ,
80
+ grow_task=dv ( "grow_task" , [ T_size_t ( ) ] ) ,
81
+ log_int=dv ( "log_int" , [ T_i32 ( ) , T_i32 ( ) ] ) ,
82
+ log_float=dv ( "log_float" , [ T_i32 ( ) , T_f32 ( ) ] ) ,
83
+ log_double=dv ( "log_double" , [ T_i32 ( ) , T_ptr ( T_f64 ( ) ) ] ) ,
84
+ log_str=dv ( "log_str" , [ T_i32 ( ) , T_ptr ( T_str ( ) ) ] ) ,
85
+ trace_word=dv ( "trace_word" , [ T_int ( ) ] ) ,
86
+ trace_str=dv ( "trace_str" , [ T_ptr ( T_i8 ( ) ) ] ) ,
87
+ new_port=d ( "new_port" , [ T_size_t ( ) ] , T_opaque_port_ptr ( ) ) ,
88
+ del_port=dv ( "del_port" , [ T_opaque_port_ptr ( ) ] ) ,
89
+ new_chan=d ( "new_chan" , [ T_opaque_port_ptr ( ) ] , T_opaque_chan_ptr ( ) ) ,
90
+ flush_chan=dv ( "flush_chan" , [ T_opaque_chan_ptr ( ) ] ) ,
91
+ del_chan=dv ( "del_chan" , [ T_opaque_chan_ptr ( ) ] ) ,
92
+ clone_chan=d ( "clone_chan" , [ T_taskptr ( tn) , T_opaque_chan_ptr ( ) ] ,
93
93
T_opaque_chan_ptr ( ) ) ,
94
94
_yield=dv ( "yield" , empty_vec) ,
95
- sleep=dv ( "sleep" , vec ( T_size_t ( ) ) ) ,
96
- _join=dv ( "join" , vec ( T_taskptr ( tn) ) ) ,
97
- send=dv ( "send" , vec ( T_opaque_chan_ptr ( ) , T_ptr ( T_i8 ( ) ) ) ) ,
98
- recv=dv ( "recv" , vec ( T_ptr ( T_ptr ( T_i8 ( ) ) ) , T_opaque_port_ptr ( ) ) ) ,
99
- _fail=dv ( "fail" , vec ( T_ptr ( T_i8 ( ) ) , T_ptr ( T_i8 ( ) ) , T_size_t ( ) ) ) ,
100
- kill=dv ( "kill" , vec ( T_taskptr ( tn) ) ) ,
95
+ sleep=dv ( "sleep" , [ T_size_t ( ) ] ) ,
96
+ _join=dv ( "join" , [ T_taskptr ( tn) ] ) ,
97
+ send=dv ( "send" , [ T_opaque_chan_ptr ( ) , T_ptr ( T_i8 ( ) ) ] ) ,
98
+ recv=dv ( "recv" , [ T_ptr ( T_ptr ( T_i8 ( ) ) ) , T_opaque_port_ptr ( ) ] ) ,
99
+ _fail=dv ( "fail" , [ T_ptr ( T_i8 ( ) ) , T_ptr ( T_i8 ( ) ) , T_size_t ( ) ] ) ,
100
+ kill=dv ( "kill" , [ T_taskptr ( tn) ] ) ,
101
101
exit=dv ( "exit" , empty_vec) ,
102
- malloc=d ( "malloc" , vec ( T_size_t ( ) , T_ptr ( T_tydesc ( tn) ) ) ,
102
+ malloc=d ( "malloc" , [ T_size_t ( ) , T_ptr ( T_tydesc ( tn) ) ] ,
103
103
T_ptr ( T_i8 ( ) ) ) ,
104
- free=dv ( "free" , vec ( T_ptr ( T_i8 ( ) ) , T_int ( ) ) ) ,
105
- mark=d ( "mark" , vec ( T_ptr ( T_i8 ( ) ) ) , T_int ( ) ) ,
106
- new_str=d ( "new_str" , vec ( T_ptr ( T_i8 ( ) ) , T_size_t ( ) ) , T_ptr ( T_str ( ) ) ) ,
107
- new_vec=d ( "new_vec" , vec ( T_size_t ( ) , T_ptr ( T_tydesc ( tn) ) ) ,
104
+ free=dv ( "free" , [ T_ptr ( T_i8 ( ) ) , T_int ( ) ] ) ,
105
+ mark=d ( "mark" , [ T_ptr ( T_i8 ( ) ) ] , T_int ( ) ) ,
106
+ new_str=d ( "new_str" , [ T_ptr ( T_i8 ( ) ) , T_size_t ( ) ] , T_ptr ( T_str ( ) ) ) ,
107
+ new_vec=d ( "new_vec" , [ T_size_t ( ) , T_ptr ( T_tydesc ( tn) ) ] ,
108
108
T_opaque_vec_ptr ( ) ) ,
109
- vec_grow=d ( "vec_grow" , vec ( T_opaque_vec_ptr ( ) , T_size_t ( ) ,
110
- T_ptr ( T_int ( ) ) , T_ptr ( T_tydesc ( tn) ) ) ,
109
+ vec_grow=d ( "vec_grow" , [ T_opaque_vec_ptr ( ) , T_size_t ( ) ,
110
+ T_ptr ( T_int ( ) ) , T_ptr ( T_tydesc ( tn) ) ] ,
111
111
T_opaque_vec_ptr ( ) ) ,
112
112
require_rust_sym=d ( "require_rust_sym" ,
113
- vec ( T_ptr ( T_crate ( tn) ) , T_size_t ( ) , T_size_t ( ) ,
113
+ [ T_ptr ( T_crate ( tn) ) , T_size_t ( ) , T_size_t ( ) ,
114
114
T_size_t ( ) , T_ptr ( T_i8 ( ) ) ,
115
- T_ptr ( T_ptr ( T_i8 ( ) ) ) ) ,
115
+ T_ptr ( T_ptr ( T_i8 ( ) ) ) ] ,
116
116
T_int ( ) ) ,
117
117
require_c_sym=d ( "require_c_sym" ,
118
- vec ( T_ptr ( T_crate ( tn) ) , T_size_t ( ) , T_size_t ( ) ,
119
- T_ptr ( T_i8 ( ) ) , T_ptr ( T_i8 ( ) ) ) ,
118
+ [ T_ptr ( T_crate ( tn) ) , T_size_t ( ) , T_size_t ( ) ,
119
+ T_ptr ( T_i8 ( ) ) , T_ptr ( T_i8 ( ) ) ] ,
120
120
T_int ( ) ) ,
121
121
get_type_desc=d ( "get_type_desc" ,
122
- vec ( T_ptr ( T_crate ( tn) ) , T_size_t ( ) , T_size_t ( ) ,
123
- T_size_t ( ) , T_ptr ( T_ptr ( T_tydesc ( tn) ) ) ) ,
122
+ [ T_ptr ( T_crate ( tn) ) , T_size_t ( ) , T_size_t ( ) ,
123
+ T_size_t ( ) , T_ptr ( T_ptr ( T_tydesc ( tn) ) ) ] ,
124
124
T_ptr ( T_tydesc ( tn) ) ) ,
125
- new_task=d ( "new_task" , vec ( T_ptr ( T_i8 ( ) ) ) , T_taskptr ( tn) ) ,
126
- start_task=d ( "start_task" , vec ( T_taskptr ( tn) , T_int ( ) , T_int ( ) ,
127
- T_int ( ) , T_size_t ( ) ) ,
125
+ new_task=d ( "new_task" , [ T_ptr ( T_i8 ( ) ) ] , T_taskptr ( tn) ) ,
126
+ start_task=d ( "start_task" , [ T_taskptr ( tn) , T_int ( ) , T_int ( ) ,
127
+ T_int ( ) , T_size_t ( ) ] ,
128
128
T_taskptr ( tn) ) ,
129
- new_thread=d ( "new_thread" , vec ( T_ptr ( T_i8 ( ) ) ) , T_taskptr ( tn) ) ,
130
- start_thread=d ( "start_thread" , vec ( T_taskptr ( tn) , T_int ( ) , T_int ( ) ,
131
- T_int ( ) , T_size_t ( ) ) ,
129
+ new_thread=d ( "new_thread" , [ T_ptr ( T_i8 ( ) ) ] , T_taskptr ( tn) ) ,
130
+ start_thread=d ( "start_thread" , [ T_taskptr ( tn) , T_int ( ) , T_int ( ) ,
131
+ T_int ( ) , T_size_t ( ) ] ,
132
132
T_taskptr ( tn) )
133
133
) ;
134
134
}
0 commit comments