blob: f6acd7e28fcbfab8a938d535b671ffba3d27eff9 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
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 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
|
