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

Last change on this file was f261cc8, checked in by Thomas Lopatic <thomas@…>, 3 years ago

Minor cleanup.

  • Property mode set to 100644
File size: 601 bytes
Line 
1/*
2   ============================================================================
3        putl.c -- put a Motorola 68000 long word onto a stream file
4        Version 2 -- 1987-10-15 -- D.N. Lynx Crowe
5
6        WARNING:  This fails if the stream is ASCII.
7   ============================================================================
8*/
9
10#include "ram.h"
11
12void putl(int32_t w, FILE *stream)
13{
14        if (putc(((int16_t)(w >> 24) & 0xFF), stream) < 0)
15                return;
16
17        if (putc((int16_t)((w >> 16) & 0xFF), stream) < 0)
18                return;
19
20        if (putc((int16_t)((w >> 8) & 0xFF), stream) < 0)
21                return;
22
23        putc((int16_t)(w & 0xFF), stream);
24}
25
Note: See TracBrowser for help on using the repository browser.