65 lines
1.2 KiB
C
65 lines
1.2 KiB
C
/*
|
|
** File: hal_8086.c
|
|
**
|
|
** Contents: Rubus OS
|
|
** Tutorial
|
|
** Target Configuration 8086 DOS
|
|
**
|
|
** Version: 1.0
|
|
**
|
|
** Copyright 1996-97 Arcticus Systems AB
|
|
** All Rights Reserved
|
|
*/
|
|
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <sys/stat.h>
|
|
#include <basic/bs_basic.h>
|
|
#include <basic/bs_log.h>
|
|
#include <red/r_thread.h>
|
|
|
|
/*===============================================
|
|
Externals
|
|
================================================*/
|
|
extern halBsInit();
|
|
|
|
/*=========================================================
|
|
halInit
|
|
|
|
=========================================================*/
|
|
INT halInit(void)
|
|
{
|
|
halBsInit();
|
|
return(RCODE_OK);
|
|
}
|
|
|
|
/*=========================================================
|
|
halWrite
|
|
|
|
=========================================================*/
|
|
void halWrite(UCHARP buffer)
|
|
|
|
{
|
|
printf(buffer);
|
|
}
|
|
|
|
|
|
/*=========================================================
|
|
halHalt
|
|
|
|
=========================================================*/
|
|
void halHalt()
|
|
{
|
|
halBsTimerDisable();
|
|
}
|
|
|
|
/*=========================================================
|
|
halExit
|
|
|
|
=========================================================*/
|
|
void halExit()
|
|
{
|
|
halBsExit();
|
|
}
|
|
|