123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101 |
- {
- $Id$
- This file is part of the Free Pascal run time library and compiler.
- Copyright (c) 1993,98 by the Free Pascal development team
- See the file COPYING.FPC, included in this distribution,
- for details about the copyright.
- This program is distributed in the hope that it will be useful,
- but WITHOUT ANY WARRANTY; without even the implied warranty of
- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
- **********************************************************************}
- const
- in_lo_word = 1;
- in_hi_word = 2;
- in_lo_long = 3;
- in_hi_long = 4;
- { to be able to compile with ord intern or not }
- in_ord_char = 5;
- in_ord_x = 5;
- in_length_string = 6;
- in_chr_byte = 7;
- in_inc_byte = 8;
- in_inc_word = 9;
- in_inc_dword = 10;
- in_dec_byte = 11;
- in_dec_word = 12;
- in_dec_dword = 13;
- in_write_x = 14;
- in_writeln_x = 15;
- in_read_x = 16;
- in_readln_x = 17;
- in_concat_x = 18;
- in_assigned_x = 19;
- in_str_x_string = 20;
- in_ofs_x = 21;
- in_sizeof_x = 22;
- in_typeof_x = 23;
- in_val_x = 24;
- in_reset_x = 25;
- in_rewrite_x = 26;
- in_low_x = 27;
- in_high_x = 28;
- in_seg_x = 29;
- in_pred_x = 30;
- in_succ_x = 31;
- in_reset_typedfile = 32;
- in_rewrite_typedfile = 33;
- in_settextbuf_file_x = 34;
- in_inc_x = 35;
- in_dec_x = 36;
- in_include_x_y = 37;
- in_exclude_x_y = 38;
- in_break = 39;
- in_continue = 40;
- {
- $Log$
- Revision 1.4 1998-05-01 16:38:44 florian
- * handling of private and protected fixed
- + change_keywords_to_tp implemented to remove
- keywords which aren't supported by tp
- * break and continue are now symbols of the system unit
- + widestring, longstring and ansistring type released
- Revision 1.3 1998/04/14 23:27:03 florian
- + exclude/include with constant second parameter added
- Revision 1.2 1998/04/08 16:58:02 pierre
- * several bugfixes
- ADD ADC and AND are also sign extended
- nasm output OK (program still crashes at end
- and creates wrong assembler files !!)
- procsym types sym in tdef removed !!
- Revision 1.1.1.1 1998/03/25 11:18:12 root
- * Restored version
- Revision 1.2 1998/02/24 16:50:03 peter
- * stackframe ommiting generated 'ret $-4'
- + timer.pp bp7 version
- * innr.inc are now the same files
- Revision 1.3 1998/01/26 11:59:37 michael
- + Added log at the end
- revision 1.2
- date: 1997/12/01 12:08:04; author: michael; state: Exp; lines: +8 -17
- + added copyright reference header.
- ----------------------------
- revision 1.1
- date: 1997/11/27 08:33:46; author: michael; state: Exp;
- Initial revision
- ----------------------------
- revision 1.1.1.1
- date: 1997/11/27 08:33:46; author: michael; state: Exp; lines: +0 -0
- FPC RTL CVS start
- }
|