home *** CD-ROM | disk | FTP | other *** search
/ Fish 'n' More 2 / fishmore-publicdomainlibraryvol.ii1991xetec.iso / disks / disk393.lzh / LibTool / CSimple / Simple.c next >
C/C++ Source or Header  |  1990-10-28  |  2KB  |  64 lines
  1. /**************************************************************************
  2.   Simple.c
  3.  
  4.   A set of C routines to be turned into a library called "simple.library".
  5.   We use LibTool to make our lib startup asm code (-m option) to be linked with
  6.   this module. This creates a library. We also use LibTool to create glue
  7.   code for a C application which expects to call C library functions (-c
  8.   option). Note that this module should NOT be compiled with small code/data
  9.   because we do not bother setting up and restoring a4 (which is what you
  10.   would have to do at the start and end of each callable function).
  11.  
  12. Manx 3.6
  13.  
  14. cc +pb Simple.c
  15. LibTool -cmo glue.asm SimpleC.fd
  16. as -cd -o LibStart.o SimpleC.src
  17. ln -o libs:simple.library LibStart.o Simple.o -lcl32
  18.  
  19. Lattice 5.0
  20.  
  21. lc -b0 Simple.c
  22. LibTool -cmo glue.asm SimpleC.fd
  23. assemble SimpleC.src as LibStart.o
  24. blink LibStart.o Simple.o LIB lib:lcnb.lib TO libs:simple.library
  25.  
  26. ***************************************************************************/
  27.  
  28. extern struct LibBase; /* this library's base */
  29.  
  30. #ifdef AZTEC_C
  31. #define NARGS
  32. #define NO_PRAGMAS
  33. #endif
  34.  
  35. #include "exec/types.h"
  36.  
  37. #ifdef AZTEC_C
  38. #include "functions.h"
  39. #else
  40. #include "proto/all.h"
  41. #endif
  42.  
  43. /**************************************************************************
  44.   These are the 3 functions which add, subtract, and multuply 2 passed values.
  45. ***************************************************************************/
  46.  
  47. Add2Numbers(x, y)
  48. ULONG x, y;
  49. {
  50.     return(x + y);
  51. }
  52.  
  53. Sub2Numbers(x, y)
  54. ULONG x, y;
  55. {
  56.     return(x - y);
  57. }
  58.  
  59. Mult2Numbers(x, y)
  60. ULONG x, y;
  61. {
  62.     return(x * y);
  63. }
  64.