446
447
{"GET-OUTPUT-STREAM-STRING","cl_get_output_stream_string"},
447
448
{"GET-PROPERTIES","cl_get_properties"},
448
449
{"GET-SETF-EXPANSION",NULL},
449
{"GET-UNIVERSAL-TIME","ECL_NAME(cl_get_universal_time)"},
450
{"GET-UNIVERSAL-TIME","cl_get_universal_time"},
450
451
{"GETF","cl_getf"},
451
452
{"GETHASH","cl_gethash"},
1497
1498
#ifdef ECL_THREADS
1498
1499
{MP_ "PROCESS",NULL},
1499
1500
{MP_ "LOCK",NULL},
1501
{MP_ "CONDITION-VARIABLE",NULL},
1500
1502
{MP_ "*CURRENT-PROCESS*",NULL},
1501
1503
{MP_ "ALL-PROCESSES","mp_all_processes"},
1502
1504
{MP_ "EXIT-PROCESS","mp_exit_process"},
1503
1505
{MP_ "MAKE-PROCESS","mp_make_process"},
1504
1506
{MP_ "PROCESS-ACTIVE-P","mp_process_active_p"},
1505
1507
{MP_ "PROCESS-ENABLE","mp_process_enable"},
1508
{MP_ "PROCESS-YIELD","mp_process_yield"},
1506
1509
{MP_ "PROCESS-KILL","mp_process_kill"},
1507
1510
{MP_ "PROCESS-NAME","mp_process_name"},
1508
1511
{MP_ "PROCESS-PRESET","mp_process_preset"},
1509
1512
{MP_ "PROCESS-RUN-FUNCTION","mp_process_run_function"},
1510
1513
{MP_ "PROCESS-WHOSTATE","mp_process_whostate"},
1511
1514
{MP_ "MAKE-LOCK","mp_make_lock"},
1515
{KEY_ "RECURSIVE",NULL},
1516
{MP_ "RECURSIVE-LOCK-P","mp_recursive_lock_p"},
1517
{MP_ "LOCK-NAME","mp_lock_name"},
1518
{MP_ "LOCK-HOLDER","mp_lock_holder"},
1512
1519
{MP_ "GET-LOCK","mp_get_lock"},
1513
1520
{MP_ "GIVEUP-LOCK","mp_giveup_lock"},
1521
{MP_ "MAKE-CONDITION-VARIABLE","mp_make_condition_variable"},
1522
{MP_ "CONDITION-VARIABLE-WAIT","mp_condition_variable_wait"},
1523
{MP_ "CONDITION-VARIABLE-TIMEDWAIT","mp_condition_variable_timedwait"},
1524
{MP_ "CONDITION-VARIABLE-SIGNAL","mp_condition_variable_signal"},
1525
{MP_ "CONDITION-VARIABLE-BROADCAST","mp_condition_variable_broadcast"},
1514
1526
{KEY_ "INITIAL-BINDINGS",NULL},
1515
1527
{MP_ "INTERRUPT-PROCESS","mp_interrupt_process"},
1516
1528
{MP_ "+LOAD-COMPILE-LOCK+",NULL},
1517
1529
{MP_ "WITH-LOCK",NULL},
1518
1530
{MP_ "WITHOUT-INTERRUPTS",NULL},
1531
{MP_ "CHECK-PENDING-INTERRUPTS","si_check_pending_interrupts"},
1521
1534
{SYS_ "WHILE",NULL},
1658
1671
{SYS_ "GC-STATS","si_gc_stats"},
1673
{SYS_ "*CURRENT-FORM*",NULL},
1675
{SYS_ "CODE-BLOCK",NULL},
1678
{SYS_ "CLEAR-GFUN-HASH","si_clear_gfun_hash"},
1681
{SYS_ "FRAME",NULL},
1682
{SYS_ "APPLY-FROM-STACK-FRAME","si_apply_from_stack_frame"},
1660
1684
/* Tag for end of list */