Lines Matching defs:current_device

149 	env->current_device = d;
157 	env->current_device = d;
245 	ASSERT(env->current_device);
257 	parent_dev = env->current_device->parent;
566 		d = env->current_device;
706 current_device(fcode_env_t *env)
708 	PUSH(DS, (fstack_t)&env->current_device);
736 	if (env->current_device)
737 		push_a_string(env, get_path(env, env->current_device));
745 	if (env->current_device) {
747 		    get_path(env, env->current_device));
758 	if (env->current_device == NULL) {
763 	d = env->current_device->child;
786 	if (env->current_device == NULL) {
792 		p = env->current_device->parent;
794 		device_t *n = env->current_device->child;
852 	if (env->current_device) {
1023 	env->current_device = d;
1027 	env->current_device = NULL;
1064 	FORTH(0,		"current-device",	current_device);