home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PASCAL / TGTP60.ZIP / INTROPAK.EXE / SWITCHES.INC < prev    next >
Encoding:
Text File  |  1991-08-16  |  2.8 KB  |  110 lines
  1.  
  2.        {-- Defaults }
  3. {$A-}  {-- A- byte alignment }
  4. {$B-}  {-- B- short circuit boolean evaluation }
  5. {$D+}  {-- D- No debug info }
  6. {$E-}  {-- E- No emulation }
  7. {$F-}  {-- F- Far calls only when necessary }
  8. {$I-}  {-- I- I/O error checking done internally }
  9. {$L+}  {-- L- No local symbols }
  10. {$N-}  {-- N- Software reals }
  11. {$R-}  {-- R- Range checking off }
  12. {$S-}  {-- S- Stack overflow off }
  13. {$V-}  {-- V- No strict type checking }
  14.  
  15. {define debug}    { -- virtual memory debugging code }
  16. {define semi}    { -- more virtual memory debugging code, requires debug too }
  17. {define light}    { -- virtual memory debugging code }
  18.  
  19. {$IFDEF debug}
  20. {$define debugcode}
  21. {$ENDIF}
  22.  
  23. {$IFDEF semi}
  24. {$define debugcode}
  25. {$define debug}
  26. {$ENDIF}
  27.  
  28. {$IFDEF light}
  29. {$define debugcode}
  30. {$ENDIF}
  31.  
  32. {-- Define Quick if you are using Quick Pascal and you want to use }
  33. {-- the MSGRAPH unit. }
  34. {-- NO LONGER SUPPORTED }
  35. {define Quick }
  36.  
  37. {-- Define NoGr if you don't want to use Turbo's Graph unit. }
  38. {-- or if you are using Quick Pascal }
  39.  
  40. {$define NoGr }
  41.  
  42. {-- The following defines select which graphics adaptors you don't }
  43. {-- want to support. }
  44. {-- Each adaptor supported adds about 3K to program size. You cannot }
  45. {-- define ALL of these }
  46.  
  47. {define NoCGA }
  48. {define NoHerc }
  49. {define NoEVga }
  50. {define NoSVga }
  51.  
  52. {-- Define NoVirt if you don't want to use the Virtual Memory }
  53. {-- manager. Programs are about 8K smaller but cannot open as }
  54. {-- many windows. }
  55.  
  56. {define NoVirt }
  57.  
  58.  
  59. {-- Define for building the demonstrator version of the library }
  60.  
  61. {$define TeglDemo }
  62.  
  63. {$ifdef NoCGA}
  64. {$ifdef NoHerc}
  65. {$ifdef NoEVga}
  66. {$ifdef NoSVga}
  67. ERROR: You are attempting to build the library without any support
  68.        for graphics adaptors! Disable one of the defines above.
  69. {$endif}
  70. {$endif}
  71. {$endif}
  72. {$endif}
  73.  
  74. { -- if VER10 is defined then we are using Quick Pascal }
  75. { -- NoGr must be defined. }
  76.  
  77. {$ifdef VER10}
  78. {$ifndef NoGr}
  79. {$define NoGr}
  80. {$endif}
  81. {$endif}
  82.  
  83. {-- if Quick is defined then NoGr must be defined also to use }
  84. {-- TGraph in place of Graph. This is redunant if the above test }
  85. {-- works but might be needed if a later version of Quick Pascal }
  86. {-- is used. }
  87.  
  88. {$ifdef Quick}
  89. {$ifndef NoGr}
  90. {$define NoGr}
  91. {$endif}
  92. {$endif}
  93.  
  94. {$DEFINE twWorld}   {-- define if world coordinates system is used. }
  95.  
  96. {$IFDEF twWorld}
  97. {-- if using world coordinates then define ONLY one of the following }
  98. {-- for the world coordinate system precision. }
  99.  
  100. {DEFINE wcFloatLint}      {-- long integer }
  101. {$DEFINE wcFloatReal}       {-- standard 6 byte real }
  102. {-- if either of these is defined then the 8087 must be available }
  103. {-- or the emulator must be enabled. }
  104. {DEFINE wcFloatSingle }   {-- single precision float }
  105. {DEFINE wcFloatDouble }   {-- double precision float }
  106.  
  107. {$ENDIF}
  108.  
  109.  
  110.