Statistics
| Revision:

root / trunk / src / linad99 / ptr2.cpp @ 1855

History | View | Annotate | Download (780 Bytes)

1
/*
2
 * $Id: ptr2.cpp 1855 2014-04-04 08:49:38Z johnoel $
3
 *
4
 * Author: David Fournier
5
 * Copyright (c) 2008-2012 Regents of the University of California
6
 */
7
/**
8
 * \file
9
 * Description not yet available.
10
 */
11
#include "fvar.hpp"
12
#ifdef __ZTC__
13
#include <iostream.hpp>
14
#endif
15

    
16
#ifdef __TURBOC__
17
#pragma hdrstop
18
#pragma options -h-
19
#include <iostream.h>
20
#endif
21
#include <stdlib.h>
22

    
23
#ifdef DOS386
24

    
25
#if defined( __NDPX__) || defined(__SUN__)
26
  void * _farptr_fromlong(long int i)
27
#else
28
  void * _farptr_fromlong(unsigned long int i)
29
#endif
30
{
31
  return( (void *) i);
32
}
33

    
34
/**
35
 * Description not yet available.
36
 * \param
37
 */
38
#if !defined(__MINGW64__)
39
long int _farptr_tolong(void * ptr)
40
{
41
  return( (long int) ptr);
42
}
43
#endif
44

    
45
/**
46
 * Description not yet available.
47
 * \param
48
 */
49
void * _farptr_norm(void * ptr)
50
{
51
  return(ptr);
52
}
53
#endif