Untitled

// From zmatchmedia in psi/zmedia2.c around line 82:
    switch (code = dict_int_null_param(preq, "MediaPosition", 0, 0x7fff,
				       0, &mepos)) {
	default:
	    return code;
	case 2:
	case 1:
	    dprintf1 ("MediaPosition: (mepos == %d) to be set to -1\n", mepos);
	    mepos = -1;
	case 0:;
    }

#ifdef WMLMOD
    dprintf1 ("MediaPosition: (mepos): %d\n", mepos);
    {
	ref *pdev;
	gx_device *dev;

	// This doesn't seem to work:
	//pdev = &istate->pagedevice;
	pdev = magically_get_pagedevice();

	if (pdev == 0)
	    return_error(e_stackunderflow); // Exits here with stackunderflow

	check_write_type_only(*pdev, t_device);
	dev = pdev->value.pdevice;

	/* gslib.c lines153+: */
	gs_c_param_list list;
	gs_c_param_list_write(&list, imemory);
	code = param_write_int((gs_param_list *)&list, "MediaPosition", &mepos);
	if (code < 0) {
	    lprintf1("writing MediaPosition failed! code = %d\n", code);
	    return code;
	}
	gs_c_param_list_read(&list);
	code = gs_putdeviceparams(dev, (gs_param_list *)&list);
	gs_c_param_list_release(&list);
	if (code < 0) {
	    lprintf1("putdeviceparams failed! code = %d\n", code);
	    return code;
	}
    }
#endif