stdio.pas

来自「C,C++ To Delphi转换器 C,C++ To Delphi转换器」· PAS 代码 · 共 31 行

{ C2P convertion of SmallC [2-1-2001] by Paul TOTH }
(*
** STDIO.H -- Standard Small C Definitions.
*)
Unit STDIO;
(*
** STDIO.H -- Standard Small C Definitions.
*)
Interface

Const
 stdin =0;    (* file descriptor for standard input file *)
 stdout=1;    (* file descriptor for standard output file *)
 stderr=2;    (* file descriptor for standard error file *)
 stdaux=3;    (* file descriptor for standard auxiliary port *)
 strprn=4;    (* file descriptor for standard printer *)
{#define FILE   char  /* supports "FILE *fp;" declarations */}
 ERR   =-2;   (* return value for errors *)
 EOF   =-1;   (* return value for end-of-file *)
 YES   = 1;   (* true *)
 NO    = 0;   (* false *)
 NULL  = 0;   (* zero *)
 CR     =#13; (* ASCII carriage return *)
 LF     =#10; (* ASCII line feed *)
 BELL   =#7;  (* ASCII bell *)
 SPACE  =' '; (* ASCII space *)
 NEWLINE=LF;  (* Small C newline character *)

Implementation

end.