38     char *format, int level);
41     char *format, int level);
43     char *format, int level);
45     char *format, int level);
47     char *format, int level);
49     char *format, int level);
51     char *format, int level);
53     char *format, int level);
55     char *format, int level);
57     char *format, int level);
59     char *format, int level);
61     char *format, int level);
73 	char *format;  in forth_do_sou()  local
95 			format = chp->format;  in forth_do_sou()
97 			format = NULL;  in forth_do_sou()
100 		switch_on_type(mlp, mlp->fdesc, format, 0);  in forth_do_sou()
122 switch_on_type(struct mlist *mlp, struct tdesc *tdp, char *format, int level)  in switch_on_type()  argument
126 		print_intrinsic(mlp, tdp, format, level);  in switch_on_type()
129 		print_pointer(mlp, tdp, format, level);  in switch_on_type()
132 		print_array(mlp, tdp, format, level);  in switch_on_type()
135 		print_function(mlp, tdp, format, level);  in switch_on_type()
138 		print_union(mlp, tdp, format, level);  in switch_on_type()
141 		print_enum(mlp, tdp, format, level);  in switch_on_type()
144 		print_forward(mlp, tdp, format, level);  in switch_on_type()
147 		print_typeof(mlp, tdp, format, level);  in switch_on_type()
150 		print_struct(mlp, tdp, format, level);  in switch_on_type()
153 		print_volatile(mlp, tdp, format, level);  in switch_on_type()
163 print_forward(struct mlist *mlp, struct tdesc *tdp, char *format, int level)  in print_forward()  argument
170 print_typeof(struct mlist *mlp, struct tdesc *tdp, char *format, int level)  in print_typeof()  argument
172 	switch_on_type(mlp, tdp->data.tdesc, format, level);  in print_typeof()
176 print_volatile(struct mlist *mlp, struct tdesc *tdp, char *format, int level)  in print_volatile()  argument
178 	switch_on_type(mlp, tdp->data.tdesc, format, level);  in print_volatile()
182 print_intrinsic(struct mlist *mlp, struct tdesc *tdp, char *format, int level)  in print_intrinsic()  argument
184 	format = convert_format(format, ".x");  in print_intrinsic()
189 			printf("' c@ ' %s", format);  in print_intrinsic()
192 			printf("' w@ ' %s", format);  in print_intrinsic()
195 			printf("' l@ ' %s", format);  in print_intrinsic()
198 			printf("' x@ ' %s", format);  in print_intrinsic()
212 			format, shift, mask, offset, mlp->name);  in print_intrinsic()
217 				format, mlp->offset / 8, mlp->name);  in print_intrinsic()
221 				format, mlp->offset / 8, mlp->name);  in print_intrinsic()
225 				format, mlp->offset / 8, mlp->name);  in print_intrinsic()
229 				format, mlp->offset / 8, mlp->name);  in print_intrinsic()
236 print_pointer(struct mlist *mlp, struct tdesc *tdp, char *format, int level)  in print_pointer()  argument
238 	format = convert_format(format, ".x");  in print_pointer()
242 			printf("' c@ ' %s", format);  in print_pointer()
245 			printf("' w@ ' %s", format);  in print_pointer()
248 			printf("' l@ ' %s", format);  in print_pointer()
251 			printf("' x@ ' %s", format);  in print_pointer()
256 		    format, mlp->offset / 8, mlp->name);  in print_pointer()
261 print_array(struct mlist *mlp, struct tdesc *tdp, char *format, int level)  in print_array()  argument
272 		switch_on_type(mlp, ap->contents, format, level + 1);  in print_array()
279 print_function(struct mlist *mlp, struct tdesc *tdp, char *format, int level)  in print_function()  argument
286 print_struct(struct mlist *mlp, struct tdesc *tdp, char *format, int level)  in print_struct()  argument
288 	format = convert_format(format, ".x");  in print_struct()
290 		printf("' noop ' %s", format);  in print_struct()
293 			format, mlp->offset / 8, mlp->name);  in print_struct()
298 print_union(struct mlist *mlp, struct tdesc *tdp, char *format, int level)  in print_union()  argument
300 	format = convert_format(format, ".x");  in print_union()
302 		printf("' noop ' %s", format);  in print_union()
305 			format, mlp->offset / 8, mlp->name);  in print_union()
310 print_enum(struct mlist *mlp, struct tdesc *tdp, char *format, int level)  in print_enum()  argument
312 	format = convert_format(format, ".d");  in print_enum()
315 		printf("' l@ ' %s", format);  in print_enum()
318 			format, mlp->offset / 8, mlp->name);  in print_enum()