Mercurial > emacs
view src/m/orion.h @ 73932:242a56e8b2c0
Replace conditional (require 'ispell) with defvar.
(ada-language-version): Rename ada05 -> ada2005.
(ada-83-string-keywords, ada-95-string-keywords, ada-2005-string-keywords):
Delete unneeded `eval-when-compile'.
(ada-align-region-separate): Add `eval-when-compile'.
(ada-name-regexp): Remove unneeded escapes in regexp character alternative.
(ada-compile-goto-error-file-linenr-re): New constant.
(ada-matching-start-re): Handle additional cases `declare', `procedure',
`function'.
(ada-compile-goto-error): Handle "... at line nn".
(ada-mode): Clearer syntax, comments for ff-special-constructs.
Delete support for old versions of `align'.
(ada-search-prev-end-stmt): Handle additional keyword `private'.
(ada-check-defun-name): Simplify handling of `declare'.
(ada-goto-matching-start): Handle nested `begin ... end'. Handle `declare',
`protected', `procedure', `function'.
(ada-create-menu): Presence of arm95 is not conditional on using GNAT compiler.
author | Juanma Barranquero <lekktu@gmail.com> |
---|---|
date | Sun, 12 Nov 2006 16:55:38 +0000 |
parents | 3bd95f4f2941 |
children | e90d04cd455a c5406394f567 |
line wrap: on
line source
/* machine description file for HLH Orion. Copyright (C) 1985, 2002, 2003, 2004, 2005, 2006 Free Software Foundation, Inc. This file is part of GNU Emacs. GNU Emacs is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2, or (at your option) any later version. GNU Emacs 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. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with GNU Emacs; see the file COPYING. If not, write to the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. */ /* The following line tells the configuration script what sort of operating system this machine is likely to run. USUAL-OPSYS="bsd4-2" */ /* Define WORDS_BIG_ENDIAN iff lowest-numbered byte in a word is the most significant byte. */ #undef WORDS_BIG_ENDIAN /* Now define a symbol for the cpu type, if your compiler does not define it automatically. */ #ifndef orion #define orion #endif /* Define NO_ARG_ARRAY if you cannot take the address of the first of a * group of arguments and treat it as an array of the arguments. */ #define NO_ARG_ARRAY /* Define WORD_MACHINE if addresses and such have * to be corrected before they can be used as byte counts. */ #define WORD_MACHINE /* Use type int rather than a union, to represent Lisp_Object */ /* This is desirable for most machines. */ #define NO_UNION_TYPE /* Define EXPLICIT_SIGN_EXTEND if XINT must explicitly sign-extend */ #define EXPLICIT_SIGN_EXTEND /* Data type of load average, as read out of kmem. */ #define LOAD_AVE_TYPE double /* Convert that into an integer that is 100 for a load average of 1.0 */ #ifndef FSCALE #define FSCALE 1.0 #endif #define LOAD_AVE_CVT(x) (int) (((double) (x)) * 100.0 / FSCALE) /* arch-tag: 4fcf38ad-d6b0-434b-bc10-16647d5a7fb6 (do not change this comment) */