diff options
author | 2023-10-10 14:33:42 +0000 | |
---|---|---|
committer | 2023-10-10 14:33:42 +0000 | |
commit | af1a266670d040d2f4083ff309d732d648afba2a (patch) | |
tree | 2fc46203448ddcc6f81546d379abfaeb323575e9 /roms/openbios/libopenbios/helpers.fs | |
parent | e02cda008591317b1625707ff8e115a4841aa889 (diff) |
Change-Id: Iaf8d18082d3991dec7c0ebbea540f092188eb4ec
Diffstat (limited to 'roms/openbios/libopenbios/helpers.fs')
-rw-r--r-- | roms/openbios/libopenbios/helpers.fs | 35 |
1 files changed, 35 insertions, 0 deletions
diff --git a/roms/openbios/libopenbios/helpers.fs b/roms/openbios/libopenbios/helpers.fs new file mode 100644 index 000000000..8f5db9ffc --- /dev/null +++ b/roms/openbios/libopenbios/helpers.fs @@ -0,0 +1,35 @@ +\ tag: helper functions +\ +\ deblocker / filesystem support +\ +\ Copyright (C) 2003 Samuel Rydh +\ +\ See the file "COPYING" for further information about +\ the copyright and warranty status of this work. +\ + + +\ create device node and any missing parents. +\ The new node becomes the active package + +: create-node ( nodepath -- ) + recursive + ascii / right-split + 2dup find-dev if + active-package! + 2drop + else + ( nodename path ) + dup if + create-node + else + device-tree @ active-package! + 2drop + then + then + new-device + device-name + active-package + finish-device + active-package! +; |