The Create Spin Lock routine creates and initializes a simple
    (spin) lock, and returns the lock identifier. You use that lock
    identifier to get and free the lock.

    Format

      PPL$CREATE_SPIN_LOCK  lock-id [,lock-name]

1  –  Arguments

 lock-id

    OpenVMS usage identifier
    type          longword (unsigned)
    access        write only
    mechanism     by reference
    Identifier of the newly created lock. The lock-id argument is the
    address of an unsigned longword containing the lock identifier.
    You must use lock-id when getting or freeing the lock.

 lock-name

    OpenVMS usage char_string
    type          character string
    access        read only
    mechanism     by descriptor
    Name of the lock. The lock-name argument is the address of a
    descriptor pointing to a character string containing the name.
    The name of the lock is entirely arbitrary. If you do not specify
    this argument, or if you specify 0, an unnamed lock is created.
    An arbitrary number of unnamed locks can be created by a given
    application.