view release on metacpan or  search on metacpan

perllib/sdf/home/stdlib/langdefs.sdm  view on Meta::CPAN

# Copyright (c) 1992-1996, Ian Clatworthy (ianc@mincom.com).
# You may distribute under the terms specified in the LICENSE file.
#
# >>History::
# -----------------------------------------------------------------------
# Date      Who     Change
# 12-Oct-98 ianc    fixed Java keywords, removed case-sensitive names,
#                   improved Perl keywords (thanks to Colin Jitlal)
# 29-Feb-96 ianc    SDF 2.000
# -----------------------------------------------------------------------
#
# >>Purpose::
# {{MOD:langdefs}} defines language definitions used in [[SDF]]
# documents.
#
# >>Description::
# Language names are case insensitive.
#
# >>Limitations::
#

!block langdefs
# For SDF, treat the built-in macros as keywords.
# We also need to put all the keywords on one line to get around
# parsing problems related to lines beginning with !.
sdf|sdm|sds|sdn|sdl|sde:\
    :cb=#:ce=$:sb=":se=\e":lb=':\
    :le=\e':\
    :kw=!build_title !block !endblock !include !execute !import !use !inherit !on !off !if !elsif !elseif !else !endif !init !define !default !undef !restrict !export !class !macro !endmacro !message !line !script !insert !getdoc !getcode !getusage !...

# From the Perl FAQ
# The list of keywords is taken from cperl-mode.el
perl|pl|pm|sdp|sdr:\
    :pb=^\d?(sub|package)\d\p\d:\
    :bb={:be=}:cb=#:ce=$:sb=":se=\e":lb=':\
    :le=\e':tl:\
    :id=_:\
    :kw=\
           AUTOLOAD BEGIN DESTROY END __END__ chomp \
           chop defined delete do each else elsif \
           eval exists for foreach format goto \
           grep if keys last local map my next \
           no package pop pos print printf push \
           q qq qw qx redo return scalar shift \
           sort splice split study sub tie tr \
           undef unless unshift untie until use \
           while y \
           CORE __FILE__ __LINE__ abs accept alarm \
           and atan2 bind binmode bless caller \
           chdir chmod chown chr chroot close \
           closedir cmp connect continue cos crypt \
           dbmclose dbmopen die dump endgrent \
           endhostent endnetent endprotoent endpwent \
           endservent eof eq exec exit exp fcntl \
           fileno flock fork formline ge getc \
           getgrent getgrgid getgrnam gethostbyaddr \
           gethostbyname gethostent getlogin \
           getnetbyaddr getnetbyname getnetent \
           getpeername getpgrp getppid getpriority \
           getprotobyname getprotobynumber getprotoent \
           getpwent getpwnam getpwuid getservbyname \
           getservbyport getservent getsockname \
           getsockopt glob gmtime gt hex index int \
           ioctl join kill lc lcfirst le length \
           link listen localtime log lstat lt \
           mkdir msgctl msgget msgrcv msgsnd ne \
           not oct open opendir or ord pack pipe \
           quotemeta rand read readdir readline \
           readlink readpipe recv ref rename require \
           reset reverse rewinddir rindex rmdir seek \
           seekdir select semctl semget semop send \
           setgrent sethostent setnetent setpgrp \
           setpriority setprotoent setpwent setservent \
           setsockopt shmctl shmget shmread shmwrite \
           shutdown sin sleep socket socketpair \
           sprintf sqrt srand stat substr symlink \
           syscall sysread system syswrite tell \
           telldir time times truncate uc ucfirst \
           umask unlink unpack utime values vec \
           wait waitpid wantarray warn write x xor

# From Kent Sandvik (sandvik@sgi.com) and Sect 3.9 of the language spec.
# Note: null and super are treated as keywords.
java:\
        :pb=^\d?*?\d?\p\d?\(\a?\)(\d|{):bb={:be=}:cb=/*:ce=*/:ab=//:\
        :ae=$:sb=":se=\e":lb=':\
        :le=\e':tl:\
        :kw=abstract boolean break byte case catch char class const continue\
        default do double else extends final finally float for goto\
        if implements import instanceof int interface long native new null\
        package private protected public return short\
        static super switch synchronized this throw throws transient try\
        void volatile while

# From Prachin Ranavat (prachin@mincom.com)
c:\
    :pb=^\d?*?\d?\p\d?\(\a?\)(\d|{):bb={:be=}:cb=/*:ce=*/:sb=":se=\e":lb=':\
    :le=\e':tl:\
    :kw=asm auto break case char continue default do double else enum\
    extern float for fortran goto if int long register return short\
    sizeof static struct switch typedef union unsigned void while #define\
    #else #endif #if #ifdef #ifndef #include #undef # define endif\
    ifdef ifndef include undef defined:

c++|cpp|hpp|cc|h:\
    :pb=^\d?*?\d?\p\d?\(\a?\)(\d|{):bb={:be=}:cb=/*:ce=*/:ab=//:\
    :ae=$:sb=":se=\e":lb=':\
    :le=\e':tl:\
    :kw=asm auto break case char continue default do double else enum\
    extern float for fortran goto if int long register return short\
    sizeof static struct switch typedef union unsigned while void #define\
    #else #endif #if #ifdef #ifndef #include #undef # define endif\
    ifdef ifndef include undef defined\
    catch class const delete friend inline new operator overload private\
    protected public throw try virtual:

# Note: extensible is a Visibroker extension to the OMG standard
idl:\
	:pb=^\d?*?\d?\p\d?\(\a?\)(\d|{):bb={:be=}:cb=/*:ce=*/:ab=//:\
	:ae=$:sb=":se=\e":lb=':\
	:le=\e':tl:\