1
0
Fork 0
qemu/roms/SLOF/board-js2x/slof/dma-function.fs
Daniel Baumann ea34ddeea6
Adding upstream version 1:10.0.2+ds.
Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>
2025-06-22 14:27:05 +02:00

31 lines
874 B
Forth

\ *****************************************************************************
\ * Copyright (c) 2004, 2011 IBM Corporation
\ * All rights reserved.
\ * This program and the accompanying materials
\ * are made available under the terms of the BSD License
\ * which accompanies this distribution, and is available at
\ * http://www.opensource.org/licenses/bsd-license.php
\ *
\ * Contributors:
\ * IBM Corporation - initial implementation
\ ****************************************************************************/
: dma-alloc ( ... size -- virt )
\ ." dma-alloc called: " .s cr
alloc-mem
;
: dma-free ( virt size -- )
\ ." dma-free called: " .s cr
free-mem
;
: dma-map-in ( ... virt size cacheable? -- devaddr )
\ ." dma-map-in called: " .s cr
2drop
;
: dma-map-out ( virt devaddr size -- )
\ ." dma-map-out called: " .s cr
2drop drop
;