blob: 278a7c0d2509dbdb202d2e2879ae31d66a46e14e (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
new-device
VALUE sudev
s" slofdev.fs" included
sudev slof-dev>port l@ dup set-unit encode-phys " reg" property
sudev slof-dev>udev @ VALUE udev
s" usb-mouse" device-name
s" mouse" device-type
\ .S cr
\ dup slof-dev>udev dup . @ . cr
\ dup slof-dev>port dup . l@ . cr
\ dup slof-dev>devaddr dup . l@ . cr
\ dup slof-dev>hcitype dup . l@ . cr
\ dup slof-dev>num dup . l@ . cr
\ dup slof-dev>devtype dup . l@ . cr
." USB mouse " cr
finish-device
|