source: buchla-68k/libcio/conwr.c

Last change on this file was 1d174fb, checked in by Thomas Lopatic <thomas@…>, 7 years ago

Cast fix.

  • Property mode set to 100644
File size: 845 bytes
Line 
1/*
2 ============================================================================
3 conwr.c -- write on the console
4 Version 4 -- 1987-06-29 -- D.N. Lynx Crowe
5 ============================================================================
6*/
7
8#define _FS_DEF_ /* to avoid unnecessary externals */
9
10#include "ram.h"
11
12/*
13 ============================================================================
14 _conwr(kind, buff, len) -- write 'len' bytes from 'buff' on the console
15 using op 'kind' as the BIOS argument.
16 ============================================================================
17*/
18int16_t _conwr(io_arg arg, void *buff, int16_t len)
19{
20 int16_t kind;
21 int8_t *buff8;
22 register int16_t count;
23
24 kind = (int16_t)(int32_t)arg;
25 buff8 = buff;
26
27 for (count = 0; count < len; ++count)
28 BIOS(B_PUTC, kind, *buff8++);
29
30 return(count);
31}
32
Note: See TracBrowser for help on using the repository browser.