[1b87ea]: src / c / symbols_list.h Maximize Restore History

Download this file

symbols_list.h    1465 lines (1443 with data), 76.8 kB

   1
   2
   3
   4
   5
   6
   7
   8
   9
  10
  11
  12
  13
  14
  15
  16
  17
  18
  19
  20
  21
  22
  23
  24
  25
  26
  27
  28
  29
  30
  31
  32
  33
  34
  35
  36
  37
  38
  39
  40
  41
  42
  43
  44
  45
  46
  47
  48
  49
  50
  51
  52
  53
  54
  55
  56
  57
  58
  59
  60
  61
  62
  63
  64
  65
  66
  67
  68
  69
  70
  71
  72
  73
  74
  75
  76
  77
  78
  79
  80
  81
  82
  83
  84
  85
  86
  87
  88
  89
  90
  91
  92
  93
  94
  95
  96
  97
  98
  99
 100
 101
 102
 103
 104
 105
 106
 107
 108
 109
 110
 111
 112
 113
 114
 115
 116
 117
 118
 119
 120
 121
 122
 123
 124
 125
 126
 127
 128
 129
 130
 131
 132
 133
 134
 135
 136
 137
 138
 139
 140
 141
 142
 143
 144
 145
 146
 147
 148
 149
 150
 151
 152
 153
 154
 155
 156
 157
 158
 159
 160
 161
 162
 163
 164
 165
 166
 167
 168
 169
 170
 171
 172
 173
 174
 175
 176
 177
 178
 179
 180
 181
 182
 183
 184
 185
 186
 187
 188
 189
 190
 191
 192
 193
 194
 195
 196
 197
 198
 199
 200
 201
 202
 203
 204
 205
 206
 207
 208
 209
 210
 211
 212
 213
 214
 215
 216
 217
 218
 219
 220
 221
 222
 223
 224
 225
 226
 227
 228
 229
 230
 231
 232
 233
 234
 235
 236
 237
 238
 239
 240
 241
 242
 243
 244
 245
 246
 247
 248
 249
 250
 251
 252
 253
 254
 255
 256
 257
 258
 259
 260
 261
 262
 263
 264
 265
 266
 267
 268
 269
 270
 271
 272
 273
 274
 275
 276
 277
 278
 279
 280
 281
 282
 283
 284
 285
 286
 287
 288
 289
 290
 291
 292
 293
 294
 295
 296
 297
 298
 299
 300
 301
 302
 303
 304
 305
 306
 307
 308
 309
 310
 311
 312
 313
 314
 315
 316
 317
 318
 319
 320
 321
 322
 323
 324
 325
 326
 327
 328
 329
 330
 331
 332
 333
 334
 335
 336
 337
 338
 339
 340
 341
 342
 343
 344
 345
 346
 347
 348
 349
 350
 351
 352
 353
 354
 355
 356
 357
 358
 359
 360
 361
 362
 363
 364
 365
 366
 367
 368
 369
 370
 371
 372
 373
 374
 375
 376
 377
 378
 379
 380
 381
 382
 383
 384
 385
 386
 387
 388
 389
 390
 391
 392
 393
 394
 395
 396
 397
 398
 399
 400
 401
 402
 403
 404
 405
 406
 407
 408
 409
 410
 411
 412
 413
 414
 415
 416
 417
 418
 419
 420
 421
 422
 423
 424
 425
 426
 427
 428
 429
 430
 431
 432
 433
 434
 435
 436
 437
 438
 439
 440
 441
 442
 443
 444
 445
 446
 447
 448
 449
 450
 451
 452
 453
 454
 455
 456
 457
 458
 459
 460
 461
 462
 463
 464
 465
 466
 467
 468
 469
 470
 471
 472
 473
 474
 475
 476
 477
 478
 479
 480
 481
 482
 483
 484
 485
 486
 487
 488
 489
 490
 491
 492
 493
 494
 495
 496
 497
 498
 499
 500
 501
 502
 503
 504
 505
 506
 507
 508
 509
 510
 511
 512
 513
 514
 515
 516
 517
 518
 519
 520
 521
 522
 523
 524
 525
 526
 527
 528
 529
 530
 531
 532
 533
 534
 535
 536
 537
 538
 539
 540
 541
 542
 543
 544
 545
 546
 547
 548
 549
 550
 551
 552
 553
 554
 555
 556
 557
 558
 559
 560
 561
 562
 563
 564
 565
 566
 567
 568
 569
 570
 571
 572
 573
 574
 575
 576
 577
 578
 579
 580
 581
 582
 583
 584
 585
 586
 587
 588
 589
 590
 591
 592
 593
 594
 595
 596
 597
 598
 599
 600
 601
 602
 603
 604
 605
 606
 607
 608
 609
 610
 611
 612
 613
 614
 615
 616
 617
 618
 619
 620
 621
 622
 623
 624
 625
 626
 627
 628
 629
 630
 631
 632
 633
 634
 635
 636
 637
 638
 639
 640
 641
 642
 643
 644
 645
 646
 647
 648
 649
 650
 651
 652
 653
 654
 655
 656
 657
 658
 659
 660
 661
 662
 663
 664
 665
 666
 667
 668
 669
 670
 671
 672
 673
 674
 675
 676
 677
 678
 679
 680
 681
 682
 683
 684
 685
 686
 687
 688
 689
 690
 691
 692
 693
 694
 695
 696
 697
 698
 699
 700
 701
 702
 703
 704
 705
 706
 707
 708
 709
 710
 711
 712
 713
 714
 715
 716
 717
 718
 719
 720
 721
 722
 723
 724
 725
 726
 727
 728
 729
 730
 731
 732
 733
 734
 735
 736
 737
 738
 739
 740
 741
 742
 743
 744
 745
 746
 747
 748
 749
 750
 751
 752
 753
 754
 755
 756
 757
 758
 759
 760
 761
 762
 763
 764
 765
 766
 767
 768
 769
 770
 771
 772
 773
 774
 775
 776
 777
 778
 779
 780
 781
 782
 783
 784
 785
 786
 787
 788
 789
 790
 791
 792
 793
 794
 795
 796
 797
 798
 799
 800
 801
 802
 803
 804
 805
 806
 807
 808
 809
 810
 811
 812
 813
 814
 815
 816
 817
 818
 819
 820
 821
 822
 823
 824
 825
 826
 827
 828
 829
 830
 831
 832
 833
 834
 835
 836
 837
 838
 839
 840
 841
 842
 843
 844
 845
 846
 847
 848
 849
 850
 851
 852
 853
 854
 855
 856
 857
 858
 859
 860
 861
 862
 863
 864
 865
 866
 867
 868
 869
 870
 871
 872
 873
 874
 875
 876
 877
 878
 879
 880
 881
 882
 883
 884
 885
 886
 887
 888
 889
 890
 891
 892
 893
 894
 895
 896
 897
 898
 899
 900
 901
 902
 903
 904
 905
 906
 907
 908
 909
 910
 911
 912
 913
 914
 915
 916
 917
 918
 919
 920
 921
 922
 923
 924
 925
 926
 927
 928
 929
 930
 931
 932
 933
 934
 935
 936
 937
 938
 939
 940
 941
 942
 943
 944
 945
 946
 947
 948
 949
 950
 951
 952
 953
 954
 955
 956
 957
 958
 959
 960
 961
 962
 963
 964
 965
 966
 967
 968
 969
 970
 971
 972
 973
 974
 975
 976
 977
 978
 979
 980
 981
 982
 983
 984
 985
 986
 987
 988
 989
 990
 991
 992
 993
 994
 995
 996
 997
 998
 999
1000
1001
1002
1003
1004
1005
1006
1007
1008
1009
1010
1011
1012
1013
1014
1015
1016
1017
1018
1019
1020
1021
1022
1023
1024
1025
1026
1027
1028
1029
1030
1031
1032
1033
1034
1035
1036
1037
1038
1039
1040
1041
1042
1043
1044
1045
1046
1047
1048
1049
1050
1051
1052
1053
1054
1055
1056
1057
1058
1059
1060
1061
1062
1063
1064
1065
1066
1067
1068
1069
1070
1071
1072
1073
1074
1075
1076
1077
1078
1079
1080
1081
1082
1083
1084
1085
1086
1087
1088
1089
1090
1091
1092
1093
1094
1095
1096
1097
1098
1099
1100
1101
1102
1103
1104
1105
1106
1107
1108
1109
1110
1111
1112
1113
1114
1115
1116
1117
1118
1119
1120
1121
1122
1123
1124
1125
1126
1127
1128
1129
1130
1131
1132
1133
1134
1135
1136
1137
1138
1139
1140
1141
1142
1143
1144
1145
1146
1147
1148
1149
1150
1151
1152
1153
1154
1155
1156
1157
1158
1159
1160
1161
1162
1163
1164
1165
1166
1167
1168
1169
1170
1171
1172
1173
1174
1175
1176
1177
1178
1179
1180
1181
1182
1183
1184
1185
1186
1187
1188
1189
1190
1191
1192
1193
1194
1195
1196
1197
1198
1199
1200
1201
1202
1203
1204
1205
1206
1207
1208
1209
1210
1211
1212
1213
1214
1215
1216
1217
1218
1219
1220
1221
1222
1223
1224
1225
1226
1227
1228
1229
1230
1231
1232
1233
1234
1235
1236
1237
1238
1239
1240
1241
1242
1243
1244
1245
1246
1247
1248
1249
1250
1251
1252
1253
1254
1255
1256
1257
1258
1259
1260
1261
1262
1263
1264
1265
1266
1267
1268
1269
1270
1271
1272
1273
1274
1275
1276
1277
1278
1279
1280
1281
1282
1283
1284
1285
1286
1287
1288
1289
1290
1291
1292
1293
1294
1295
1296
1297
1298
1299
1300
1301
1302
1303
1304
1305
1306
1307
1308
1309
1310
1311
1312
1313
1314
1315
1316
1317
1318
1319
1320
1321
1322
1323
1324
1325
1326
1327
1328
1329
1330
1331
1332
1333
1334
1335
1336
1337
1338
1339
1340
1341
1342
1343
1344
1345
1346
1347
1348
1349
1350
1351
1352
1353
1354
1355
1356
1357
1358
1359
1360
1361
1362
1363
1364
1365
1366
1367
1368
1369
1370
1371
1372
1373
1374
1375
1376
1377
1378
1379
1380
1381
1382
1383
1384
1385
1386
1387
1388
1389
1390
1391
1392
1393
1394
1395
1396
1397
1398
1399
1400
1401
1402
1403
1404
1405
1406
1407
1408
1409
1410
1411
1412
1413
1414
1415
1416
1417
1418
1419
1420
1421
1422
1423
1424
1425
1426
1427
1428
1429
1430
1431
1432
1433
1434
1435
1436
1437
1438
1439
1440
1441
1442
1443
1444
1445
1446
1447
1448
1449
1450
1451
1452
1453
1454
1455
1456
1457
1458
1459
1460
1461
1462
1463
#ifdef DPP
#define EXT_ "EXT::"
#define SYS_ "SI::"
#define MP_ "MP::"
#define KEY_ ":"
struct {
const char *name, *translation;
}
#else
#define EXT_
#define SYS_
#define MP_
#define KEY_
cl_symbol_initializer
#endif
cl_symbols[] = {
{"NIL", CL_ORDINARY, NULL, -1, OBJNULL},
{"T", CL_ORDINARY, NULL, -1, OBJNULL},
#ifdef CLOS
{SYS_ "UNBOUND", SI_ORDINARY, si_unbound, 0, OBJNULL},
#else
{SYS_ "UNBOUND", SI_ORDINARY, NULL, -1, OBJNULL},
#endif
/* LISP PACKAGE */
{"&ALLOW-OTHER-KEYS", CL_ORDINARY, NULL, -1, OBJNULL},
{"&AUX", CL_ORDINARY, NULL, -1, OBJNULL},
{"&BODY", CL_ORDINARY, NULL, -1, OBJNULL},
{"&ENVIRONMENT", CL_ORDINARY, NULL, -1, OBJNULL},
{"&KEY", CL_ORDINARY, NULL, -1, OBJNULL},
{"&OPTIONAL", CL_ORDINARY, NULL, -1, OBJNULL},
{"&REST", CL_ORDINARY, NULL, -1, OBJNULL},
{"&WHOLE", CL_ORDINARY, NULL, -1, OBJNULL},
{"+", CL_SPECIAL, cl_P, -1, Cnil},
{"++", CL_SPECIAL, NULL, -1, Cnil},
{"+++", CL_SPECIAL, NULL, -1, Cnil},
{"-", CL_SPECIAL, cl_M, -1, Cnil},
{"*", CL_SPECIAL, cl_X, -1, Cnil},
{"**", CL_SPECIAL, NULL, -1, Cnil},
{"***", CL_SPECIAL, NULL, -1, Cnil},
{"/", CL_SPECIAL, cl_N, -1, Cnil},
{"//", CL_SPECIAL, NULL, -1, Cnil},
{"///", CL_SPECIAL, NULL, -1, Cnil},
{"/=", CL_ORDINARY, cl_NE, -1, OBJNULL},
{"*BREAK-ON-SIGNALS*", CL_SPECIAL, NULL, -1, Cnil},
{"*COMPILE-FILE-PATHNAME*", CL_SPECIAL, NULL, -1, Cnil},
{"*COMPILE-FILE-TRUENAME*", CL_SPECIAL, NULL, -1, Cnil},
{"*COMPILE-PRINT*", CL_SPECIAL, NULL, -1, OBJNULL},
{"*COMPILE-VERBOSE*", CL_SPECIAL, NULL, -1, OBJNULL},
{"*DEBUG-IO*", CL_SPECIAL, NULL, -1, OBJNULL},
{"*DEBUGGER-HOOK*", CL_SPECIAL, NULL, -1, Cnil},
{"*DEFAULT-PATHNAME-DEFAULTS*", CL_SPECIAL, NULL, -1, OBJNULL},
{"*ERROR-OUTPUT*", CL_SPECIAL, NULL, -1, OBJNULL},
{"*FEATURES*", CL_SPECIAL, NULL, -1, OBJNULL},
{"*GENSYM-COUNTER*", CL_SPECIAL, NULL, -1, MAKE_FIXNUM(0)},
{"*LOAD-PATHNAME*", CL_SPECIAL, NULL, -1, OBJNULL},
{"*LOAD-PRINT*", CL_SPECIAL, NULL, -1, Cnil},
{"*LOAD-TRUENAME*", CL_SPECIAL, NULL, -1, OBJNULL},
{"*LOAD-VERBOSE*", CL_SPECIAL, NULL, -1, Ct},
{"*MACROEXPAND-HOOK*", CL_SPECIAL, NULL, -1, OBJNULL},
{"*MODULES*", CL_SPECIAL, NULL, -1, OBJNULL},
{"*PACKAGE*", CL_SPECIAL, NULL, -1, OBJNULL},
{"*PRINT-ARRAY*", CL_SPECIAL, NULL, -1, Ct},
{"*PRINT-BASE*", CL_SPECIAL, NULL, -1, MAKE_FIXNUM(10)},
{"*PRINT-CASE*", CL_SPECIAL, NULL, -1, OBJNULL},
{"*PRINT-CIRCLE*", CL_SPECIAL, NULL, -1, Cnil},
{"*PRINT-ESCAPE*", CL_SPECIAL, NULL, -1, Ct},
{"*PRINT-GENSYM*", CL_SPECIAL, NULL, -1, Ct},
{"*PRINT-LENGTH*", CL_SPECIAL, NULL, -1, Cnil},
{"*PRINT-LEVEL*", CL_SPECIAL, NULL, -1, Cnil},
{"*PRINT-LINES*", CL_SPECIAL, NULL, -1, Cnil},
{"*PRINT-MISER-WIDTH*", CL_SPECIAL, NULL, -1, Cnil},
{"*PRINT-PPRINT-DISPATCH*", CL_SPECIAL, NULL, -1, Cnil},
#if defined(ECL_CMU_FORMAT)
{"*PRINT-PRETTY*", CL_SPECIAL, NULL, -1, Cnil},
#else
{"*PRINT-PRETTY*", CL_SPECIAL, NULL, -1, Ct},
#endif
{"*PRINT-RADIX*", CL_SPECIAL, NULL, -1, Cnil},
{"*PRINT-READABLY*", CL_SPECIAL, NULL, -1, Cnil},
{"*PRINT-RIGHT-MARGIN*", CL_SPECIAL, NULL, -1, Cnil},
{"*QUERY-IO*", CL_SPECIAL, NULL, -1, OBJNULL},
{"*RANDOM-STATE*", CL_SPECIAL, NULL, -1, OBJNULL},
{"*READ-BASE*", CL_SPECIAL, NULL, -1, MAKE_FIXNUM(10)},
{"*READ-DEFAULT-FLOAT-FORMAT*", CL_SPECIAL, NULL, -1, OBJNULL},
{"*READ-EVAL*", CL_SPECIAL, NULL, -1, Ct},
{"*READ-SUPPRESS*", CL_SPECIAL, NULL, -1, Cnil},
{"*READTABLE*", CL_SPECIAL, NULL, -1, OBJNULL},
{"*STANDARD-INPUT*", CL_SPECIAL, NULL, -1, OBJNULL},
{"*STANDARD-OUTPUT*", CL_SPECIAL, NULL, -1, OBJNULL},
{"*TERMINAL-IO*", CL_SPECIAL, NULL, -1, OBJNULL},
{"*TRACE-OUTPUT*", CL_SPECIAL, NULL, -1, OBJNULL},
{"1+", CL_ORDINARY, cl_1P, 1, OBJNULL},
{"1-", CL_ORDINARY, cl_1M, 1, OBJNULL},
{"<", CL_ORDINARY, cl_L, -1, OBJNULL},
{"<=", CL_ORDINARY, cl_LE, -1, OBJNULL},
{"=", CL_ORDINARY, cl_E, -1, OBJNULL},
{">", CL_ORDINARY, cl_G, -1, OBJNULL},
{">=", CL_ORDINARY, cl_GE, -1, OBJNULL},
{"ABORT", CL_ORDINARY, NULL, -1, OBJNULL},
{"ABS", CL_ORDINARY, NULL, -1, OBJNULL},
{"ACONS", CL_ORDINARY, cl_acons, 3, OBJNULL},
{"ACOS", CL_ORDINARY, NULL, -1, OBJNULL},
{"ACOSH", CL_ORDINARY, NULL, -1, OBJNULL},
{"ADJOIN", CL_ORDINARY, cl_adjoin, -1, OBJNULL},
{"ADJUST-ARRAY", CL_ORDINARY, NULL, -1, OBJNULL},
{"ADJUSTABLE-ARRAY-P", CL_ORDINARY, cl_adjustable_array_p, 1, OBJNULL},
{"ALPHA-CHAR-P", CL_ORDINARY, cl_alpha_char_p, 1, OBJNULL},
{"ALPHANUMERICP", CL_ORDINARY, cl_alphanumericp, 1, OBJNULL},
{"AND", CL_ORDINARY, NULL, -1, OBJNULL},
{"APPEND", CL_ORDINARY, cl_append, -1, OBJNULL},
{"APPLY", CL_ORDINARY, cl_apply, -1, OBJNULL},
{"APROPOS", CL_ORDINARY, NULL, -1, OBJNULL},
{"APROPOS-LIST", CL_ORDINARY, NULL, -1, OBJNULL},
{"AREF", CL_ORDINARY, cl_aref, -1, OBJNULL},
{"ARITHMETIC-ERROR", CL_ORDINARY, NULL, -1, OBJNULL},
{"ARITHMETIC-ERROR-OPERANDS", CL_ORDINARY, NULL, -1, OBJNULL},
{"ARITHMETIC-ERROR-OPERATION", CL_ORDINARY, NULL, -1, OBJNULL},
{"ARRAY", CL_ORDINARY, NULL, -1, OBJNULL},
{"ARRAY-DIMENSION", CL_ORDINARY, cl_array_dimension, 2, OBJNULL},
{"ARRAY-DIMENSION-LIMIT", CL_CONSTANT, NULL, -1, MAKE_FIXNUM(ADIMLIM)},
{"ARRAY-DIMENSIONS", CL_ORDINARY, NULL, -1, OBJNULL},
{"ARRAY-DISPLACEMENT", CL_ORDINARY, cl_array_displacement, 1, OBJNULL},
{"ARRAY-ELEMENT-TYPE", CL_ORDINARY, cl_array_element_type, 1, OBJNULL},
{"ARRAY-HAS-FILL-POINTER-P", CL_ORDINARY, cl_array_has_fill_pointer_p, 1, OBJNULL},
{"ARRAY-IN-BOUNDS-P", CL_ORDINARY, NULL, -1, OBJNULL},
{"ARRAY-RANK", CL_ORDINARY, cl_array_rank, 1, OBJNULL},
{"ARRAY-RANK-LIMIT", CL_CONSTANT, NULL, -1, MAKE_FIXNUM(ARANKLIM)},
{"ARRAY-ROW-MAJOR-INDEX", CL_ORDINARY, NULL, -1, OBJNULL},
{"ARRAY-TOTAL-SIZE", CL_ORDINARY, cl_array_total_size, 1, OBJNULL},
{"ARRAY-TOTAL-SIZE-LIMIT", CL_CONSTANT, NULL, -1, MAKE_FIXNUM(ATOTLIM)},
{"ARRAYP", CL_ORDINARY, cl_arrayp, 1, OBJNULL},
{"ASH", CL_ORDINARY, cl_ash, 2, OBJNULL},
{"ASIN", CL_ORDINARY, NULL, -1, OBJNULL},
{"ASINH", CL_ORDINARY, NULL, -1, OBJNULL},
{"ASSERT", CL_ORDINARY, NULL, -1, OBJNULL},
{"ASSOC", CL_ORDINARY, cl_assoc, -1, OBJNULL},
{"ASSOC-IF", CL_ORDINARY, NULL, -1, OBJNULL},
{"ASSOC-IF-NOT", CL_ORDINARY, NULL, -1, OBJNULL},
{"ATAN", CL_ORDINARY, cl_atan, -1, OBJNULL},
{"ATANH", CL_ORDINARY, NULL, -1, OBJNULL},
{"ATOM", CL_ORDINARY, cl_atom, 1, OBJNULL},
{"BASE-CHAR", CL_ORDINARY, NULL, -1, OBJNULL},
{"BASE-STRING", CL_ORDINARY, NULL, -1, OBJNULL},
{"BIGNUM", CL_ORDINARY, NULL, -1, OBJNULL},
{"BIT", CL_ORDINARY, NULL, -1, OBJNULL},
{"BIT-AND", CL_ORDINARY, NULL, -1, OBJNULL},
{"BIT-ANDC1", CL_ORDINARY, NULL, -1, OBJNULL},
{"BIT-ANDC2", CL_ORDINARY, NULL, -1, OBJNULL},
{"BIT-EQV", CL_ORDINARY, NULL, -1, OBJNULL},
{"BIT-IOR", CL_ORDINARY, NULL, -1, OBJNULL},
{"BIT-NAND", CL_ORDINARY, NULL, -1, OBJNULL},
{"BIT-NOR", CL_ORDINARY, NULL, -1, OBJNULL},
{"BIT-NOT", CL_ORDINARY, NULL, -1, OBJNULL},
{"BIT-ORC1", CL_ORDINARY, NULL, -1, OBJNULL},
{"BIT-ORC2", CL_ORDINARY, NULL, -1, OBJNULL},
{"BIT-VECTOR", CL_ORDINARY, NULL, -1, OBJNULL},
{"BIT-VECTOR-P", CL_ORDINARY, cl_bit_vector_p, 1, OBJNULL},
{"BIT-XOR", CL_ORDINARY, NULL, -1, OBJNULL},
{"BLOCK", CL_FORM, NULL, -1, OBJNULL},
{"BOOLE", CL_ORDINARY, cl_boole, 3, OBJNULL},
{"BOOLE-1", CL_CONSTANT, NULL, -1, MAKE_FIXNUM(BOOL1)},
{"BOOLE-2", CL_CONSTANT, NULL, -1, MAKE_FIXNUM(BOOL2)},
{"BOOLE-AND", CL_CONSTANT, NULL, -1, MAKE_FIXNUM(BOOLAND)},
{"BOOLE-ANDC1", CL_CONSTANT, NULL, -1, MAKE_FIXNUM(BOOLANDC1)},
{"BOOLE-ANDC2", CL_CONSTANT, NULL, -1, MAKE_FIXNUM(BOOLANDC2)},
{"BOOLE-C1", CL_CONSTANT, NULL, -1, MAKE_FIXNUM(BOOLC1)},
{"BOOLE-C2", CL_CONSTANT, NULL, -1, MAKE_FIXNUM(BOOLC2)},
{"BOOLE-CLR", CL_CONSTANT, NULL, -1, MAKE_FIXNUM(BOOLCLR)},
{"BOOLE-EQV", CL_CONSTANT, NULL, -1, MAKE_FIXNUM(BOOLEQV)},
{"BOOLE-IOR", CL_CONSTANT, NULL, -1, MAKE_FIXNUM(BOOLIOR)},
{"BOOLE-NAND", CL_CONSTANT, NULL, -1, MAKE_FIXNUM(BOOLNAND)},
{"BOOLE-NOR", CL_CONSTANT, NULL, -1, MAKE_FIXNUM(BOOLNOR)},
{"BOOLE-ORC1", CL_CONSTANT, NULL, -1, MAKE_FIXNUM(BOOLORC1)},
{"BOOLE-ORC2", CL_CONSTANT, NULL, -1, MAKE_FIXNUM(BOOLORC2)},
{"BOOLE-SET", CL_CONSTANT, NULL, -1, MAKE_FIXNUM(BOOLSET)},
{"BOOLE-XOR", CL_CONSTANT, NULL, -1, MAKE_FIXNUM(BOOLXOR)},
{"BOOLEAN", CL_ORDINARY, NULL, -1, OBJNULL},
{"BOTH-CASE-P", CL_ORDINARY, cl_both_case_p, 1, OBJNULL},
{"BOUNDP", CL_ORDINARY, cl_boundp, 1, OBJNULL},
{"BREAK", CL_ORDINARY, NULL, -1, OBJNULL},
{"BROADCAST-STREAM", CL_ORDINARY, NULL, -1, OBJNULL},
{"BROADCAST-STREAM-STREAMS", CL_ORDINARY, cl_broadcast_stream_streams, 1, OBJNULL},
{"BUTLAST", CL_ORDINARY, cl_butlast, -1, OBJNULL},
{"BYTE", CL_ORDINARY, NULL, -1, OBJNULL},
{"BYTE-POSITION", CL_ORDINARY, NULL, -1, OBJNULL},
{"BYTE-SIZE", CL_ORDINARY, NULL, -1, OBJNULL},
{"CAAAAR", CL_ORDINARY, cl_caaaar, 1, OBJNULL},
{"CAAADR", CL_ORDINARY, cl_caaadr, 1, OBJNULL},
{"CAAAR", CL_ORDINARY, cl_caaar, 1, OBJNULL},
{"CAADAR", CL_ORDINARY, cl_caadar, 1, OBJNULL},
{"CAADDR", CL_ORDINARY, cl_caaddr, 1, OBJNULL},
{"CAADR", CL_ORDINARY, cl_caadr, 1, OBJNULL},
{"CAAR", CL_ORDINARY, cl_caar, 1, OBJNULL},
{"CADAAR", CL_ORDINARY, cl_cadaar, 1, OBJNULL},
{"CADADR", CL_ORDINARY, cl_cadadr, 1, OBJNULL},
{"CADAR", CL_ORDINARY, cl_cadar, 1, OBJNULL},
{"CADDAR", CL_ORDINARY, cl_caddar, 1, OBJNULL},
{"CADDDR", CL_ORDINARY, cl_cadddr, 1, OBJNULL},
{"CADDR", CL_ORDINARY, cl_caddr, 1, OBJNULL},
{"CADR", CL_ORDINARY, cl_cadr, 1, OBJNULL},
{"CALL-ARGUMENTS-LIMIT", CL_CONSTANT, NULL, -1, MAKE_FIXNUM(CALL_ARGUMENTS_LIMIT)},
{"CAR", CL_ORDINARY, cl_car, 1, OBJNULL},
{"CASE", CL_FORM, NULL, -1, OBJNULL},
{"CATCH", CL_FORM, NULL, -1, OBJNULL},
{"CCASE", CL_ORDINARY, NULL, -1, OBJNULL},
{"CDAAAR", CL_ORDINARY, cl_cdaaar, 1, OBJNULL},
{"CDAADR", CL_ORDINARY, cl_cdaadr, 1, OBJNULL},
{"CDAAR", CL_ORDINARY, cl_cdaar, 1, OBJNULL},
{"CDADAR", CL_ORDINARY, cl_cdadar, 1, OBJNULL},
{"CDADDR", CL_ORDINARY, cl_cdaddr, 1, OBJNULL},
{"CDADR", CL_ORDINARY, cl_cdadr, 1, OBJNULL},
{"CDAR", CL_ORDINARY, cl_cdar, 1, OBJNULL},
{"CDDAAR", CL_ORDINARY, cl_cddaar, 1, OBJNULL},
{"CDDADR", CL_ORDINARY, cl_cddadr, 1, OBJNULL},
{"CDDAR", CL_ORDINARY, cl_cddar, 1, OBJNULL},
{"CDDDAR", CL_ORDINARY, cl_cdddar, 1, OBJNULL},
{"CDDDDR", CL_ORDINARY, cl_cddddr, 1, OBJNULL},
{"CDDDR", CL_ORDINARY, cl_cdddr, 1, OBJNULL},
{"CDDR", CL_ORDINARY, cl_cddr, 1, OBJNULL},
{"CDR", CL_ORDINARY, cl_cdr, 1, OBJNULL},
{"CEILING", CL_ORDINARY, cl_ceiling, -1, OBJNULL},
{"CELL-ERROR", CL_ORDINARY, NULL, -1, OBJNULL},
{"CELL-ERROR-NAME", CL_ORDINARY, NULL, -1, OBJNULL},
{"CERROR", CL_ORDINARY, cl_cerror, -1, OBJNULL},
{"CHAR", CL_ORDINARY, cl_char, 2, OBJNULL},
{"CHAR-CODE", CL_ORDINARY, cl_char_code, 1, OBJNULL},
{"CHAR-CODE-LIMIT", CL_CONSTANT, NULL, -1, MAKE_FIXNUM(CHAR_CODE_LIMIT)},
{"CHAR-DOWNCASE", CL_ORDINARY, cl_char_downcase, 1, OBJNULL},
{"CHAR-EQUAL", CL_ORDINARY, cl_char_equal, -1, OBJNULL},
{"CHAR-GREATERP", CL_ORDINARY, cl_char_greaterp, -1, OBJNULL},
{"CHAR-INT", CL_ORDINARY, cl_char_int, 1, OBJNULL},
{"CHAR-LESSP", CL_ORDINARY, cl_char_lessp, -1, OBJNULL},
{"CHAR-NAME", CL_ORDINARY, cl_char_name, 1, OBJNULL},
{"CHAR-NOT-EQUAL", CL_ORDINARY, cl_char_not_equal, -1, OBJNULL},
{"CHAR-NOT-GREATERP", CL_ORDINARY, cl_char_not_greaterp, -1, OBJNULL},
{"CHAR-NOT-LESSP", CL_ORDINARY, cl_char_not_lessp, -1, OBJNULL},
{"CHAR-UPCASE", CL_ORDINARY, cl_char_upcase, 1, OBJNULL},
{"CHAR/=", CL_ORDINARY, cl_charNE, -1, OBJNULL},
{"CHAR<", CL_ORDINARY, cl_charL, -1, OBJNULL},
{"CHAR<=", CL_ORDINARY, cl_charLE, -1, OBJNULL},
{"CHAR=", CL_ORDINARY, cl_charE, -1, OBJNULL},
{"CHAR>", CL_ORDINARY, cl_charG, -1, OBJNULL},
{"CHAR>=", CL_ORDINARY, cl_charGE, -1, OBJNULL},
{"CHARACTER", CL_ORDINARY, cl_character, 1, OBJNULL},
{"CHARACTERP", CL_ORDINARY, cl_characterp, 1, OBJNULL},
{"CHECK-TYPE", CL_ORDINARY, NULL, -1, OBJNULL},
{"CIS", CL_ORDINARY, NULL, -1, OBJNULL},
{"CLEAR-INPUT", CL_ORDINARY, cl_clear_input, -1, OBJNULL},
{"CLEAR-OUTPUT", CL_ORDINARY, cl_clear_output, -1, OBJNULL},
{"CLOSE", CL_ORDINARY, cl_close, -1, OBJNULL},
{"CLRHASH", CL_ORDINARY, cl_clrhash, 1, OBJNULL},
{"CODE-CHAR", CL_ORDINARY, cl_code_char, 1, OBJNULL},
{"COERCE", CL_ORDINARY, NULL, -1, OBJNULL},
{"COMPILATION-SPEED", CL_ORDINARY, NULL, -1, OBJNULL},
{"COMPILE", CL_ORDINARY, NULL, -1, OBJNULL},
{"COMPILE-FILE", CL_ORDINARY, NULL, -1, OBJNULL},
{"COMPILE-FILE-PATHNAME", CL_ORDINARY, NULL, -1, OBJNULL},
{"COMPILED-FUNCTION", CL_ORDINARY, NULL, -1, OBJNULL},
{"COMPILED-FUNCTION-P", CL_ORDINARY, cl_compiled_function_p, 1, OBJNULL},
{"COMPILER-MACRO", CL_ORDINARY, NULL, -1, OBJNULL},
{"COMPILER-MACRO-FUNCTION", CL_ORDINARY, NULL, -1, OBJNULL},
{"COMPLEMENT", CL_ORDINARY, NULL, -1, OBJNULL},
{"COMPLEX", CL_ORDINARY, cl_complex, -1, OBJNULL},
{"COMPLEXP", CL_ORDINARY, cl_complexp, 1, OBJNULL},
{"COMPUTE-RESTARTS", CL_ORDINARY, NULL, 1, OBJNULL},
{"CONCATENATE", CL_ORDINARY, NULL, -1, OBJNULL},
{"CONCATENATED-STREAM", CL_ORDINARY, NULL, -1, OBJNULL},
{"CONCATENATED-STREAM-STREAMS", CL_ORDINARY, cl_concatenated_stream_streams, 1, OBJNULL},
{"COND", CL_FORM, NULL, -1, OBJNULL},
{"CONDITION", CL_ORDINARY, NULL, -1, OBJNULL},
{"CONJUGATE", CL_ORDINARY, cl_conjugate, 1, OBJNULL},
{"CONTINUE", CL_ORDINARY, NULL, -1, OBJNULL},
{"CONS", CL_ORDINARY, cl_cons, 2, OBJNULL},
{"CONSP", CL_ORDINARY, cl_consp, 1, OBJNULL},
{"CONSTANTLY", CL_ORDINARY, NULL, -1, OBJNULL},
{"CONSTANTP", CL_ORDINARY, cl_constantp, -1, OBJNULL},
{"CONTROL-ERROR", CL_ORDINARY, NULL, -1, OBJNULL},
{"COPY-ALIST", CL_ORDINARY, cl_copy_alist, 1, OBJNULL},
{"COPY-LIST", CL_ORDINARY, cl_copy_list, 1, OBJNULL},
{"COPY-PPRINT-DISPATCH", CL_ORDINARY, NULL, -1, OBJNULL},
{"COPY-READTABLE", CL_ORDINARY, cl_copy_readtable, -1, OBJNULL},
{"COPY-SEQ", CL_ORDINARY, cl_copy_seq, 1, OBJNULL},
{"COPY-STRUCTURE", CL_ORDINARY, cl_copy_structure, 1, OBJNULL},
{"COPY-SYMBOL", CL_ORDINARY, cl_copy_symbol, -1, OBJNULL},
{"COPY-TREE", CL_ORDINARY, cl_copy_tree, 1, OBJNULL},
{"COS", CL_ORDINARY, cl_cos, 1, OBJNULL},
{"COSH", CL_ORDINARY, cl_cosh, 1, OBJNULL},
{"COUNT", CL_ORDINARY, NULL, -1, OBJNULL},
{"COUNT-IF", CL_ORDINARY, NULL, -1, OBJNULL},
{"COUNT-IF-NOT", CL_ORDINARY, NULL, -1, OBJNULL},
{"CTYPECASE", CL_ORDINARY, NULL, -1, OBJNULL},
{"DEBUG", CL_ORDINARY, NULL, -1, OBJNULL},
{"DECF", CL_ORDINARY, NULL, -1, OBJNULL},
{"DECLAIM", CL_ORDINARY, NULL, -1, OBJNULL},
{"DECLARATION", CL_ORDINARY, NULL, -1, OBJNULL},
{"DECLARE", CL_ORDINARY, NULL, -1, OBJNULL},
{"DECODE-FLOAT", CL_ORDINARY, cl_decode_float, 1, OBJNULL},
{"DECODE-UNIVERSAL-TIME", CL_ORDINARY, NULL, -1, OBJNULL},
{"DEFCONSTANT", CL_ORDINARY, NULL, -1, OBJNULL},
{"DEFINE-CONDITION", CL_ORDINARY, NULL, -1, OBJNULL},
{"DEFINE-COMPILER-MACRO", CL_ORDINARY, NULL, -1, OBJNULL},
{"DEFINE-MODIFY-MACRO", CL_ORDINARY, NULL, -1, OBJNULL},
{"DEFINE-SETF-EXPANDER", CL_ORDINARY, NULL, -1, OBJNULL},
{"DEFINE-SYMBOL-MACRO", CL_ORDINARY, NULL, -1, OBJNULL},
{"DEFMACRO", CL_ORDINARY, NULL, -1, OBJNULL},
{"DEFPACKAGE", CL_ORDINARY, NULL, -1, OBJNULL},
{"DEFPARAMETER", CL_ORDINARY, NULL, -1, OBJNULL},
{"DEFSETF", CL_ORDINARY, NULL, -1, OBJNULL},
{"DEFSTRUCT", CL_ORDINARY, NULL, -1, OBJNULL},
{"DEFTYPE", CL_ORDINARY, NULL, -1, OBJNULL},
{"DEFUN", CL_ORDINARY, NULL, -1, OBJNULL},
{"DEFVAR", CL_ORDINARY, NULL, -1, OBJNULL},
{"DELETE", CL_ORDINARY, NULL, -1, OBJNULL},
{"DELETE-DUPLICATES", CL_ORDINARY, NULL, -1, OBJNULL},
{"DELETE-FILE", CL_ORDINARY, cl_delete_file, 1, OBJNULL},
{"DELETE-IF", CL_ORDINARY, NULL, -1, OBJNULL},
{"DELETE-IF-NOT", CL_ORDINARY, NULL, -1, OBJNULL},
{"DELETE-PACKAGE", CL_ORDINARY, cl_delete_package, 1, OBJNULL},
{"DENOMINATOR", CL_ORDINARY, cl_denominator, 1, OBJNULL},
{"DEPOSIT-FIELD", CL_ORDINARY, NULL, -1, OBJNULL},
{"DESCRIBE", CL_ORDINARY, NULL, -1, OBJNULL},
{"DESTRUCTURING-BIND", CL_ORDINARY, NULL, -1, OBJNULL},
{"DIGIT-CHAR", CL_ORDINARY, cl_digit_char, -1, OBJNULL},
{"DIGIT-CHAR-P", CL_ORDINARY, cl_digit_char_p, -1, OBJNULL},
{"DIRECTORY", CL_ORDINARY, cl_directory, -1, OBJNULL},
{"DIRECTORY-NAMESTRING", CL_ORDINARY, cl_directory_namestring, 1, OBJNULL},
{"DISASSEMBLE", CL_ORDINARY, NULL, -1, OBJNULL},
{"DIVISION-BY-ZERO", CL_ORDINARY, NULL, -1, OBJNULL},
{"DO", CL_FORM, NULL, -1, OBJNULL},
{"DO*", CL_FORM, NULL, -1, OBJNULL},
{"DO-ALL-SYMBOLS", CL_ORDINARY, NULL, -1, OBJNULL},
{"DO-EXTERNAL-SYMBOLS", CL_ORDINARY, NULL, -1, OBJNULL},
{"DO-SYMBOLS", CL_ORDINARY, NULL, -1, OBJNULL},
{"DOCUMENTATION", CL_ORDINARY, NULL, -1, OBJNULL},
{"DOLIST", CL_FORM, NULL, -1, OBJNULL},
{"DOTIMES", CL_FORM, NULL, -1, OBJNULL},
{"DOUBLE-FLOAT", CL_ORDINARY, NULL, -1, OBJNULL},
{"DOUBLE-FLOAT-EPSILON", CL_CONSTANT, NULL, -1, OBJNULL},
{"DOUBLE-FLOAT-NEGATIVE-EPSILON", CL_CONSTANT, NULL, -1, OBJNULL},
{"DPB", CL_ORDINARY, NULL, -1, OBJNULL},
{"DRIBBLE", CL_ORDINARY, NULL, -1, OBJNULL},
{"DYNAMIC-EXTENT", CL_ORDINARY, NULL, -1, OBJNULL},
{"ECASE", CL_ORDINARY, NULL, -1, OBJNULL},
{"ECHO-STREAM", CL_ORDINARY, NULL, -1, OBJNULL},
{"ECHO-STREAM-INPUT-STREAM", CL_ORDINARY, cl_echo_stream_input_stream, 1, OBJNULL},
{"ECHO-STREAM-OUTPUT-STREAM", CL_ORDINARY, cl_echo_stream_output_stream, 1, OBJNULL},
{"ED", CL_ORDINARY, NULL, -1, OBJNULL},
{"EIGHTH", CL_ORDINARY, cl_eighth, 1, OBJNULL},
{"ELT", CL_ORDINARY, cl_elt, 2, OBJNULL},
{"ENCODE-UNIVERSAL-TIME", CL_ORDINARY, NULL, -1, OBJNULL},
{"END-OF-FILE", CL_ORDINARY, NULL, -1, OBJNULL},
{"ENDP", CL_ORDINARY, cl_endp, 1, OBJNULL},
{"ENOUGH-NAMESTRING", CL_ORDINARY, cl_enough_namestring, -1, OBJNULL},
{"ENSURE-DIRECTORIES-EXIST", CL_ORDINARY, NULL, -1, OBJNULL},
{"EQ", CL_ORDINARY, cl_eq, 2, OBJNULL},
{"EQL", CL_ORDINARY, cl_eql, 2, OBJNULL},
{"EQUAL", CL_ORDINARY, cl_equal, 2, OBJNULL},
{"EQUALP", CL_ORDINARY, cl_equalp, 2, OBJNULL},
{"ERROR", CL_ORDINARY, cl_error, -1, OBJNULL},
{"ETYPECASE", CL_ORDINARY, NULL, -1, OBJNULL},
{"EVAL", CL_ORDINARY, cl_eval, 1, OBJNULL},
{"EVAL-WHEN", CL_FORM, NULL, -1, OBJNULL},
{"EVENP", CL_ORDINARY, cl_evenp, 1, OBJNULL},
{"EVERY", CL_ORDINARY, NULL, -1, OBJNULL},
{"EXP", CL_ORDINARY, cl_exp, 1, OBJNULL},
{"EXPORT", CL_ORDINARY, cl_export, -1, OBJNULL},
{"EXPT", CL_ORDINARY, cl_expt, 2, OBJNULL},
{"EXTENDED-CHAR", CL_ORDINARY, NULL, -1, OBJNULL},
{"FBOUNDP", CL_ORDINARY, cl_fboundp, 1, OBJNULL},
{"FCEILING", CL_ORDINARY, NULL, -1, OBJNULL},
{"FDEFINITION", CL_ORDINARY, cl_fdefinition, 1, OBJNULL},
{"FFLOOR", CL_ORDINARY, NULL, -1, OBJNULL},
{"FIFTH", CL_ORDINARY, cl_fifth, 1, OBJNULL},
{"FILE-AUTHOR", CL_ORDINARY, cl_file_author, 1, OBJNULL},
{"FILE-ERROR", CL_ORDINARY, NULL, -1, OBJNULL},
{"FILE-ERROR-PATHNAME", CL_ORDINARY, NULL, -1, OBJNULL},
{"FILE-LENGTH", CL_ORDINARY, cl_file_length, 1, OBJNULL},
{"FILE-NAMESTRING", CL_ORDINARY, cl_file_namestring, 1, OBJNULL},
{"FILE-POSITION", CL_ORDINARY, cl_file_position, -1, OBJNULL},
{"FILE-STREAM", CL_ORDINARY, NULL, -1, OBJNULL},
{"FILE-STRING-LENGTH", CL_ORDINARY, cl_file_string_length, 2, OBJNULL},
{"FILE-WRITE-DATE", CL_ORDINARY, cl_file_write_date, 1, OBJNULL},
{"FILL", CL_ORDINARY, NULL, -1, OBJNULL},
{"FILL-POINTER", CL_ORDINARY, cl_fill_pointer, 1, OBJNULL},
{"FIND", CL_ORDINARY, NULL, -1, OBJNULL},
{"FIND-ALL-SYMBOLS", CL_ORDINARY, NULL, -1, OBJNULL},
{"FIND-IF", CL_ORDINARY, NULL, -1, OBJNULL},
{"FIND-IF-NOT", CL_ORDINARY, NULL, -1, OBJNULL},
{"FIND-PACKAGE", CL_ORDINARY, cl_find_package, 1, OBJNULL},
{"FIND-RESTART", CL_ORDINARY, NULL, -1, OBJNULL},
{"FIND-SYMBOL", CL_ORDINARY, cl_find_symbol, -1, OBJNULL},
{"FINISH-OUTPUT", CL_ORDINARY, cl_force_output, -1, OBJNULL},
{"FIRST", CL_ORDINARY, cl_car, 1, OBJNULL},
{"FIXNUM", CL_ORDINARY, NULL, -1, OBJNULL},
{"FLET", CL_FORM, NULL, -1, OBJNULL},
{"FLOAT", CL_ORDINARY, cl_float, -1, OBJNULL},
{"FLOAT-DIGITS", CL_ORDINARY, cl_float_digits, 1, OBJNULL},
{"FLOAT-PRECISION", CL_ORDINARY, cl_float_precision, 1, OBJNULL},
{"FLOAT-RADIX", CL_ORDINARY, cl_float_radix, 1, OBJNULL},
{"FLOAT-SIGN", CL_ORDINARY, cl_float_sign, -1, OBJNULL},
{"FLOATING-POINT-INEXACT", CL_ORDINARY, NULL, -1, OBJNULL},
{"FLOATING-POINT-INVALID-OPERATION", CL_ORDINARY, NULL, -1, OBJNULL},
{"FLOATING-POINT-OVERFLOW", CL_ORDINARY, NULL, -1, OBJNULL},
{"FLOATING-POINT-UNDERFLOW", CL_ORDINARY, NULL, -1, OBJNULL},
{"FLOATP", CL_ORDINARY, cl_floatp, 1, OBJNULL},
{"FLOOR", CL_ORDINARY, cl_floor, -1, OBJNULL},
{"FMAKUNBOUND", CL_ORDINARY, cl_fmakunbound, 1, OBJNULL},
{"FORCE-OUTPUT", CL_ORDINARY, cl_force_output, -1, OBJNULL},
{"FORMAT", CL_ORDINARY, cl_format, -1, OBJNULL},
{"FORMATTER", CL_ORDINARY, NULL, -1, OBJNULL},
{"FOURTH", CL_ORDINARY, cl_cadddr, 1, OBJNULL},
{"FRESH-LINE", CL_ORDINARY, cl_fresh_line, -1, OBJNULL},
{"FROUND", CL_ORDINARY, NULL, -1, OBJNULL},
{"FTRUNCATE", CL_ORDINARY, NULL, -1, OBJNULL},
{"FTYPE", CL_ORDINARY, NULL, -1, OBJNULL},
{"FUNCALL", CL_ORDINARY, cl_funcall, -1, OBJNULL},
{"FUNCTION-LAMBDA-EXPRESSION", CL_ORDINARY, cl_function_lambda_expression, 1, OBJNULL},
{"FUNCTION", CL_FORM, NULL, -1, OBJNULL},
{"FUNCTION-KEYWORDS", CL_ORDINARY, NULL, -1, OBJNULL},
{"FUNCTIONP", CL_ORDINARY, cl_functionp, 1, OBJNULL},
{"GCD", CL_ORDINARY, cl_gcd, -1, OBJNULL},
{"GENSYM", CL_ORDINARY, cl_gensym, -1, OBJNULL},
{"GENTEMP", CL_ORDINARY, cl_gentemp, -1, OBJNULL},
{"GET", CL_ORDINARY, cl_get, -1, OBJNULL},
{"GET-DECODED-TIME", CL_ORDINARY, NULL, -1, OBJNULL},
{"GET-DISPATCH-MACRO-CHARACTER", CL_ORDINARY, cl_get_dispatch_macro_character, -1, OBJNULL},
{"GET-INTERNAL-REAL-TIME", CL_ORDINARY, cl_get_internal_real_time, 0, OBJNULL},
{"GET-INTERNAL-RUN-TIME", CL_ORDINARY, cl_get_internal_run_time, 0, OBJNULL},
{"GET-MACRO-CHARACTER", CL_ORDINARY, cl_get_macro_character, -1, OBJNULL},
{"GET-OUTPUT-STREAM-STRING", CL_ORDINARY, cl_get_output_stream_string, 1, OBJNULL},
{"GET-PROPERTIES", CL_ORDINARY, cl_get_properties, 2, OBJNULL},
{"GET-SETF-EXPANSION", CL_ORDINARY, NULL, -1, OBJNULL},
{"GET-UNIVERSAL-TIME", CL_ORDINARY, cl_get_universal_time, 0, OBJNULL},
{"GETF", CL_ORDINARY, cl_getf, -1, OBJNULL},
{"GETHASH", CL_ORDINARY, cl_gethash, -1, OBJNULL},
{"GO", CL_FORM, NULL, -1, OBJNULL},
{"GRAPHIC-CHAR-P", CL_ORDINARY, cl_graphic_char_p, 1, OBJNULL},
{"HANDLER-CASE", CL_ORDINARY, NULL, -1, OBJNULL},
{"HANDLER-BIND", CL_ORDINARY, NULL, -1, OBJNULL},
{"HASH-TABLE", CL_ORDINARY, NULL, -1, OBJNULL},
{"HASH-TABLE-COUNT", CL_ORDINARY, cl_hash_table_count, 1, OBJNULL},
{"HASH-TABLE-P", CL_ORDINARY, cl_hash_table_p, 1, OBJNULL},
{"HASH-TABLE-REHASH-SIZE", CL_ORDINARY, cl_hash_table_rehash_size, 1, OBJNULL},
{"HASH-TABLE-REHASH-THRESHOLD", CL_ORDINARY, cl_hash_table_rehash_threshold, 1, OBJNULL},
{"HASH-TABLE-SIZE", CL_ORDINARY, cl_hash_table_size, 1, OBJNULL},
{"HASH-TABLE-TEST", CL_ORDINARY, cl_hash_table_test, 1, OBJNULL},
{"HOST-NAMESTRING", CL_ORDINARY, cl_host_namestring, 1, OBJNULL},
{"IDENTITY", CL_ORDINARY, cl_identity, 1, OBJNULL},
{"IGNORABLE", CL_ORDINARY, NULL, -1, OBJNULL},
{"IGNORE", CL_ORDINARY, NULL, -1, OBJNULL},
{"IGNORE-ERRORS", CL_ORDINARY, NULL, -1, OBJNULL},
{"IMAGPART", CL_ORDINARY, cl_imagpart, 1, OBJNULL},
{"IMPORT", CL_ORDINARY, cl_import, -1, OBJNULL},
{"IN-PACKAGE", CL_ORDINARY, NULL, -1, OBJNULL},
{"INCF", CL_ORDINARY, NULL, -1, OBJNULL},
{"INLINE", CL_ORDINARY, NULL, -1, OBJNULL},
{"INPUT-STREAM-P", CL_ORDINARY, cl_input_stream_p, 1, OBJNULL},
{"INSPECT", CL_ORDINARY, NULL, -1, OBJNULL},
{"INTEGER", CL_ORDINARY, NULL, -1, OBJNULL},
{"INTEGER-DECODE-FLOAT", CL_ORDINARY, cl_integer_decode_float, 1, OBJNULL},
{"INTEGER-LENGTH", CL_ORDINARY, cl_integer_length, 1, OBJNULL},
{"INTEGERP", CL_ORDINARY, cl_integerp, 1, OBJNULL},
{"INTERACTIVE-STREAM-P", CL_ORDINARY, cl_interactive_stream_p, 1, OBJNULL},
{"INTERN", CL_ORDINARY, cl_intern, -1, OBJNULL},
{"INTERNAL-TIME-UNITS-PER-SECOND", CL_CONSTANT, NULL, -1, OBJNULL},
{"INTERSECTION", CL_ORDINARY, NULL, -1, OBJNULL},
{"INVOKE-DEBUGGER", CL_ORDINARY, NULL, -1, OBJNULL},
{"INVOKE-RESTART", CL_ORDINARY, NULL, -1, OBJNULL},
{"INVOKE-RESTART-INTERACTIVELY", CL_ORDINARY, NULL, -1, OBJNULL},
{"ISQRT", CL_ORDINARY, NULL, -1, OBJNULL},
{"KEYWORD", CL_ORDINARY, NULL, -1, OBJNULL},
{"KEYWORDP", CL_ORDINARY, cl_keywordp, 1, OBJNULL},
{"LABELS", CL_FORM, NULL, -1, OBJNULL},
{"LAMBDA", CL_FORM, NULL, -1, OBJNULL},
{"LAMBDA-LIST-KEYWORDS", CL_CONSTANT, NULL, -1, OBJNULL},
{"LAMBDA-PARAMETERS-LIMIT", CL_CONSTANT, NULL, -1, MAKE_FIXNUM(LAMBDA_PARAMETERS_LIMIT)},
{"LAST", CL_ORDINARY, cl_last, -1, OBJNULL},
{"LCM", CL_ORDINARY, cl_lcm, -1, OBJNULL},
{"LDB", CL_ORDINARY, NULL, -1, OBJNULL},
{"LDB-TEST", CL_ORDINARY, NULL, -1, OBJNULL},
{"LDIFF", CL_ORDINARY, cl_ldiff, 2, OBJNULL},
{"LEAST-NEGATIVE-DOUBLE-FLOAT", CL_CONSTANT, NULL, -1, OBJNULL},
{"LEAST-NEGATIVE-LONG-FLOAT", CL_CONSTANT, NULL, -1, OBJNULL},
{"LEAST-NEGATIVE-NORMALIZED-DOUBLE-FLOAT", CL_CONSTANT, NULL, -1, OBJNULL},
{"LEAST-NEGATIVE-NORMALIZED-LONG-FLOAT", CL_CONSTANT, NULL, -1, OBJNULL},
{"LEAST-NEGATIVE-NORMALIZED-SHORT-FLOAT", CL_CONSTANT, NULL, -1, OBJNULL},
{"LEAST-NEGATIVE-NORMALIZED-SINGLE-FLOAT", CL_CONSTANT, NULL, -1, OBJNULL},
{"LEAST-NEGATIVE-SHORT-FLOAT", CL_CONSTANT, NULL, -1, OBJNULL},
{"LEAST-NEGATIVE-SINGLE-FLOAT", CL_CONSTANT, NULL, -1, OBJNULL},
{"LEAST-POSITIVE-DOUBLE-FLOAT", CL_CONSTANT, NULL, -1, OBJNULL},
{"LEAST-POSITIVE-LONG-FLOAT", CL_CONSTANT, NULL, -1, OBJNULL},
{"LEAST-POSITIVE-NORMALIZED-DOUBLE-FLOAT", CL_CONSTANT, NULL, -1, OBJNULL},
{"LEAST-POSITIVE-NORMALIZED-LONG-FLOAT", CL_CONSTANT, NULL, -1, OBJNULL},
{"LEAST-POSITIVE-NORMALIZED-SHORT-FLOAT", CL_CONSTANT, NULL, -1, OBJNULL},
{"LEAST-POSITIVE-NORMALIZED-SINGLE-FLOAT", CL_CONSTANT, NULL, -1, OBJNULL},
{"LEAST-POSITIVE-SHORT-FLOAT", CL_CONSTANT, NULL, -1, OBJNULL},
{"LEAST-POSITIVE-SINGLE-FLOAT", CL_CONSTANT, NULL, -1, OBJNULL},
{"LENGTH", CL_ORDINARY, cl_length, 1, OBJNULL},
{"LET", CL_FORM, NULL, -1, OBJNULL},
{"LET*", CL_FORM, NULL, -1, OBJNULL},
{"LISP-IMPLEMENTATION-TYPE", CL_ORDINARY, NULL, -1, OBJNULL},
{"LISP-IMPLEMENTATION-VERSION", CL_ORDINARY, NULL, -1, OBJNULL},
{"LIST", CL_ORDINARY, cl_list, -1, OBJNULL},
{"LIST*", CL_ORDINARY, cl_listX, -1, OBJNULL},
{"LIST-ALL-PACKAGES", CL_ORDINARY, cl_list_all_packages, 0, OBJNULL},
{"LIST-LENGTH", CL_ORDINARY, cl_list_length, 1, OBJNULL},
{"LISTEN", CL_ORDINARY, cl_listen, -1, OBJNULL},
{"LISTP", CL_ORDINARY, cl_listp, 1, OBJNULL},
{"LOAD", CL_ORDINARY, cl_load, -1, OBJNULL},
{"LOAD-LOGICAL-PATHNAME-TRANSLATIONS", CL_ORDINARY, NULL, -1, OBJNULL},
{"LOAD-TIME-VALUE", CL_FORM, NULL, -1, OBJNULL},
{"LOCALLY", CL_FORM, NULL, -1, OBJNULL},
{"LOG", CL_ORDINARY, cl_log, -1, OBJNULL},
{"LOGAND", CL_ORDINARY, cl_logand, -1, OBJNULL},
{"LOGANDC1", CL_ORDINARY, cl_logandc1, 2, OBJNULL},
{"LOGANDC2", CL_ORDINARY, cl_logandc2, 2, OBJNULL},
{"LOGBITP", CL_ORDINARY, cl_logbitp, 2, OBJNULL},
{"LOGCOUNT", CL_ORDINARY, cl_logcount, 1, OBJNULL},
{"LOGEQV", CL_ORDINARY, cl_logeqv, -1, OBJNULL},
{"LOGICAL-PATHNAME", CL_ORDINARY, cl_logical_pathname, 1, OBJNULL},
{"LOGICAL-PATHNAME-TRANSLATIONS", CL_ORDINARY, NULL, -1, OBJNULL},
{"LOGIOR", CL_ORDINARY, cl_logior, -1, OBJNULL},
{"LOGNAND", CL_ORDINARY, cl_lognand, 2, OBJNULL},
{"LOGNOR", CL_ORDINARY, cl_lognor, 2, OBJNULL},
{"LOGNOT", CL_ORDINARY, cl_lognot, 1, OBJNULL},
{"LOGORC1", CL_ORDINARY, cl_logorc1, 2, OBJNULL},
{"LOGORC2", CL_ORDINARY, cl_logorc2, 2, OBJNULL},
{"LOGTEST", CL_ORDINARY, NULL, -1, OBJNULL},
{"LOGXOR", CL_ORDINARY, cl_logxor, -1, OBJNULL},
{"LONG-FLOAT", CL_ORDINARY, NULL, -1, OBJNULL},
{"LONG-FLOAT-EPSILON", CL_CONSTANT, NULL, -1, OBJNULL},
{"LONG-FLOAT-NEGATIVE-EPSILON", CL_CONSTANT, NULL, -1, OBJNULL},
{"LONG-SITE-NAME", CL_ORDINARY, NULL, -1, OBJNULL},
{"LOOP", CL_ORDINARY, NULL, -1, OBJNULL},
{"LOOP-FINISH", CL_ORDINARY, NULL, -1, OBJNULL},
{"LOWER-CASE-P", CL_ORDINARY, cl_lower_case_p, 1, OBJNULL},
{"MACHINE-INSTANCE", CL_ORDINARY, NULL, -1, OBJNULL},
{"MACHINE-TYPE", CL_ORDINARY, NULL, -1, OBJNULL},
{"MACHINE-VERSION", CL_ORDINARY, NULL, -1, OBJNULL},
{"MACRO-FUNCTION", CL_ORDINARY, cl_macro_function, -1, OBJNULL},
{"MACROEXPAND", CL_ORDINARY, cl_macroexpand, -1, OBJNULL},
{"MACROEXPAND-1", CL_ORDINARY, cl_macroexpand_1, -1, OBJNULL},
{"MACROLET", CL_FORM, NULL, -1, OBJNULL},
{"MAKE-ARRAY", CL_ORDINARY, NULL, -1, OBJNULL},
{"MAKE-BROADCAST-STREAM", CL_ORDINARY, cl_make_broadcast_stream, -1, OBJNULL},
{"MAKE-CONDITION", CL_ORDINARY, NULL, -1, OBJNULL},
{"MAKE-CONCATENATED-STREAM", CL_ORDINARY, cl_make_concatenated_stream, -1, OBJNULL},
{"MAKE-DISPATCH-MACRO-CHARACTER", CL_ORDINARY, cl_make_dispatch_macro_character, -1, OBJNULL},
{"MAKE-ECHO-STREAM", CL_ORDINARY, cl_make_echo_stream, 2, OBJNULL},
{"MAKE-HASH-TABLE", CL_ORDINARY, cl_make_hash_table, -1, OBJNULL},
{"MAKE-LIST", CL_ORDINARY, cl_make_list, -1, OBJNULL},
{"MAKE-PACKAGE", CL_ORDINARY, cl_make_package, -1, OBJNULL},
{"MAKE-PATHNAME", CL_ORDINARY, cl_make_pathname, -1, OBJNULL},
{"MAKE-RANDOM-STATE", CL_ORDINARY, cl_make_random_state, -1, OBJNULL},
{"MAKE-SEQUENCE", CL_ORDINARY, NULL, -1, OBJNULL},
{"MAKE-STRING", CL_ORDINARY, cl_make_string, -1, OBJNULL},
{"MAKE-STRING-INPUT-STREAM", CL_ORDINARY, cl_make_string_input_stream, -1, OBJNULL},
{"MAKE-STRING-OUTPUT-STREAM", CL_ORDINARY, cl_make_string_output_stream, -1, OBJNULL},
{"MAKE-SYMBOL", CL_ORDINARY, cl_make_symbol, 1, OBJNULL},
{"MAKE-SYNONYM-STREAM", CL_ORDINARY, cl_make_synonym_stream, 1, OBJNULL},
{"MAKE-TWO-WAY-STREAM", CL_ORDINARY, cl_make_two_way_stream, 2, OBJNULL},
{"MAKUNBOUND", CL_ORDINARY, cl_makunbound, 1, OBJNULL},
{"MAP", CL_ORDINARY, NULL, -1, OBJNULL},
{"MAP-INTO", CL_ORDINARY, NULL, -1, OBJNULL},
{"MAPC", CL_ORDINARY, cl_mapc, -1, OBJNULL},
{"MAPCAN", CL_ORDINARY, cl_mapcan, -1, OBJNULL},
{"MAPCAR", CL_ORDINARY, cl_mapcar, -1, OBJNULL},
{"MAPCON", CL_ORDINARY, cl_mapcon, -1, OBJNULL},
{"MAPHASH", CL_ORDINARY, cl_maphash, 2, OBJNULL},
{"MAPL", CL_ORDINARY, cl_mapl, -1, OBJNULL},
{"MAPLIST", CL_ORDINARY, cl_maplist, -1, OBJNULL},
{"MASK-FIELD", CL_ORDINARY, NULL, -1, OBJNULL},
{"MAX", CL_ORDINARY, cl_max, -1, OBJNULL},
{"MEMBER", CL_ORDINARY, cl_member, -1, OBJNULL},
{"MEMBER-IF", CL_ORDINARY, NULL, -1, OBJNULL},
{"MEMBER-IF-NOT", CL_ORDINARY, NULL, -1, OBJNULL},
{"MERGE", CL_ORDINARY, NULL, -1, OBJNULL},
{"MERGE-PATHNAMES", CL_ORDINARY, cl_merge_pathnames, -1, OBJNULL},
{"MIN", CL_ORDINARY, cl_min, -1, OBJNULL},
{"MINUSP", CL_ORDINARY, cl_minusp, 1, OBJNULL},
{"MISMATCH", CL_ORDINARY, NULL, -1, OBJNULL},
{"MOD", CL_ORDINARY, cl_mod, 2, OBJNULL},
{"MOST-NEGATIVE-DOUBLE-FLOAT", CL_CONSTANT, NULL, -1, OBJNULL},
{"MOST-NEGATIVE-FIXNUM", CL_CONSTANT, NULL, -1, MAKE_FIXNUM(MOST_NEGATIVE_FIXNUM)},
{"MOST-NEGATIVE-LONG-FLOAT", CL_CONSTANT, NULL, -1, OBJNULL},
{"MOST-NEGATIVE-SHORT-FLOAT", CL_CONSTANT, NULL, -1, OBJNULL},
{"MOST-NEGATIVE-SINGLE-FLOAT", CL_CONSTANT, NULL, -1, OBJNULL},
{"MOST-POSITIVE-DOUBLE-FLOAT", CL_CONSTANT, NULL, -1, OBJNULL},
{"MOST-POSITIVE-FIXNUM", CL_CONSTANT, NULL, -1, MAKE_FIXNUM(MOST_POSITIVE_FIXNUM)},
{"MOST-POSITIVE-LONG-FLOAT", CL_CONSTANT, NULL, -1, OBJNULL},
{"MOST-POSITIVE-SHORT-FLOAT", CL_CONSTANT, NULL, -1, OBJNULL},
{"MOST-POSITIVE-SINGLE-FLOAT", CL_CONSTANT, NULL, -1, OBJNULL},
{"MUFFLE-WARNING", CL_ORDINARY, NULL, -1, OBJNULL},
{"MULTIPLE-VALUE-BIND", CL_FORM, NULL, -1, OBJNULL},
{"MULTIPLE-VALUE-CALL", CL_FORM, NULL, -1, OBJNULL},
{"MULTIPLE-VALUE-LIST", CL_FORM, NULL, -1, OBJNULL},
{"MULTIPLE-VALUE-PROG1", CL_FORM, NULL, -1, OBJNULL},
{"MULTIPLE-VALUE-SETQ", CL_FORM, NULL, -1, OBJNULL},
{"MULTIPLE-VALUES-LIMIT", CL_CONSTANT, NULL, -1, MAKE_FIXNUM(ECL_MULTIPLE_VALUES_LIMIT)},
{"NAME-CHAR", CL_ORDINARY, cl_name_char, 1, OBJNULL},
{"NAMESTRING", CL_ORDINARY, cl_namestring, 1, OBJNULL},
{"NBUTLAST", CL_ORDINARY, cl_nbutlast, -1, OBJNULL},
{"NCONC", CL_ORDINARY, cl_nconc, -1, OBJNULL},
{"NINTERSECTION", CL_ORDINARY, NULL, -1, OBJNULL},
{"NINTH", CL_ORDINARY, cl_ninth, 1, OBJNULL},
{"NOT", CL_ORDINARY, cl_not, 1, OBJNULL},
{"NOTANY", CL_ORDINARY, NULL, -1, OBJNULL},
{"NOTEVERY", CL_ORDINARY, NULL, -1, OBJNULL},
{"NOTINLINE", CL_ORDINARY, NULL, -1, OBJNULL},
{"NRECONC", CL_ORDINARY, cl_nreconc, 2, OBJNULL},
{"NREVERSE", CL_ORDINARY, cl_nreverse, 1, OBJNULL},
{"NSET-DIFFERENCE", CL_ORDINARY, NULL, -1, OBJNULL},
{"NSET-EXCLUSIVE-OR", CL_ORDINARY, NULL, -1, OBJNULL},
{"NSTRING-CAPITALIZE", CL_ORDINARY, cl_nstring_capitalize, -1, OBJNULL},
{"NSTRING-DOWNCASE", CL_ORDINARY, cl_nstring_downcase, -1, OBJNULL},
{"NSTRING-UPCASE", CL_ORDINARY, cl_nstring_upcase, -1, OBJNULL},
{"NSUBLIS", CL_ORDINARY, cl_nsublis, -1, OBJNULL},
{"NSUBST", CL_ORDINARY, cl_nsubst, -1, OBJNULL},
{"NSUBST-IF", CL_ORDINARY, NULL, -1, OBJNULL},
{"NSUBST-IF-NOT", CL_ORDINARY, NULL, -1, OBJNULL},
{"NSUBSTITUTE", CL_ORDINARY, NULL, -1, OBJNULL},
{"NSUBSTITUTE-IF", CL_ORDINARY, NULL, -1, OBJNULL},
{"NSUBSTITUTE-IF-NOT", CL_ORDINARY, NULL, -1, OBJNULL},
{"NTH", CL_ORDINARY, cl_nth, 2, OBJNULL},
{"NTH-VALUE", CL_FORM, NULL, -1, OBJNULL},
{"NTHCDR", CL_ORDINARY, cl_nthcdr, 2, OBJNULL},
{"NULL", CL_ORDINARY, cl_null, 1, OBJNULL},
{"NUMBER", CL_ORDINARY, NULL, -1, OBJNULL},
{"NUMBERP", CL_ORDINARY, cl_numberp, 1, OBJNULL},
{"NUMERATOR", CL_ORDINARY, cl_numerator, 1, OBJNULL},
{"NUNION", CL_ORDINARY, NULL, -1, OBJNULL},
{"ODDP", CL_ORDINARY, cl_oddp, 1, OBJNULL},
{"OPEN", CL_ORDINARY, cl_open, -1, OBJNULL},
{"OPEN-STREAM-P", CL_ORDINARY, cl_open_stream_p, 1, OBJNULL},
{"OPTIMIZE", CL_ORDINARY, NULL, -1, OBJNULL},
{"OR", CL_ORDINARY, NULL, -1, OBJNULL},
{"OTHERWISE", CL_ORDINARY, NULL, -1, OBJNULL},
{"OUTPUT-STREAM-P", CL_ORDINARY, cl_output_stream_p, 1, OBJNULL},
{"PACKAGE", CL_ORDINARY, NULL, -1, OBJNULL},
{"PACKAGE-ERROR", CL_ORDINARY, NULL, -1, OBJNULL},
{"PACKAGE-ERROR-PACKAGE", CL_ORDINARY, NULL, -1, OBJNULL},
{"PACKAGE-NAME", CL_ORDINARY, cl_package_name, 1, OBJNULL},
{"PACKAGE-NICKNAMES", CL_ORDINARY, cl_package_nicknames, 1, OBJNULL},
{"PACKAGE-SHADOWING-SYMBOLS", CL_ORDINARY, cl_package_shadowing_symbols, 1, OBJNULL},
{"PACKAGE-USE-LIST", CL_ORDINARY, cl_package_use_list, 1, OBJNULL},
{"PACKAGE-USED-BY-LIST", CL_ORDINARY, cl_package_used_by_list, 1, OBJNULL},
{"PACKAGEP", CL_ORDINARY, cl_packagep, 1, OBJNULL},
{"PAIRLIS", CL_ORDINARY, cl_pairlis, -1, OBJNULL},
{"PARSE-ERROR", CL_ORDINARY, NULL, -1, OBJNULL},
{"PARSE-INTEGER", CL_ORDINARY, cl_parse_integer, -1, OBJNULL},
{"PARSE-NAMESTRING", CL_ORDINARY, cl_parse_namestring, -1, OBJNULL},
{"PATHNAME", CL_ORDINARY, cl_pathname, 1, OBJNULL},
{"PATHNAME-DEVICE", CL_ORDINARY, cl_pathname_device, -1, OBJNULL},
{"PATHNAME-DIRECTORY", CL_ORDINARY, cl_pathname_directory, -1, OBJNULL},
{"PATHNAME-HOST", CL_ORDINARY, cl_pathname_host, -1, OBJNULL},
{"PATHNAME-MATCH-P", CL_ORDINARY, cl_pathname_match_p, 2, OBJNULL},
{"PATHNAME-NAME", CL_ORDINARY, cl_pathname_name, -1, OBJNULL},
{"PATHNAME-TYPE", CL_ORDINARY, cl_pathname_type, -1, OBJNULL},
{"PATHNAME-VERSION", CL_ORDINARY, cl_pathname_version, 1, OBJNULL},
{"PATHNAMEP", CL_ORDINARY, cl_pathnamep, 1, OBJNULL},
{"PEEK-CHAR", CL_ORDINARY, cl_peek_char, -1, OBJNULL},
{"PHASE", CL_ORDINARY, NULL, -1, OBJNULL},
{"PI", CL_CONSTANT, NULL, -1, OBJNULL},
{"PLUSP", CL_ORDINARY, cl_plusp, 1, OBJNULL},
{"POP", CL_ORDINARY, NULL, -1, OBJNULL},
{"POSITION", CL_ORDINARY, NULL, -1, OBJNULL},
{"POSITION-IF", CL_ORDINARY, NULL, -1, OBJNULL},
{"POSITION-IF-NOT", CL_ORDINARY, NULL, -1, OBJNULL},
{"PPRINT", CL_ORDINARY, cl_pprint, -1, OBJNULL},
{"PPRINT-DISPATCH", CL_ORDINARY, NULL, -1, OBJNULL},
{"PPRINT-EXIT-IF-LIST-EXHAUSTED", CL_ORDINARY, NULL, -1, OBJNULL},
{"PPRINT-FILL", CL_ORDINARY, NULL, -1, OBJNULL},
{"PPRINT-INDENT", CL_ORDINARY, NULL, -1, OBJNULL},
{"PPRINT-LINEAR", CL_ORDINARY, NULL, -1, OBJNULL},
{"PPRINT-LOGICAL-BLOCK", CL_ORDINARY, NULL, -1, OBJNULL},
{"PPRINT-NEWLINE", CL_ORDINARY, NULL, -1, OBJNULL},
{"PPRINT-POP", CL_ORDINARY, NULL, -1, OBJNULL},
{"PPRINT-TAB", CL_ORDINARY, NULL, -1, OBJNULL},
{"PPRINT-TABULAR", CL_ORDINARY, NULL, -1, OBJNULL},
{"PRIN1", CL_ORDINARY, cl_prin1, -1, OBJNULL},
{"PRIN1-TO-STRING", CL_ORDINARY, NULL, -1, OBJNULL},
{"PRINC", CL_ORDINARY, cl_princ, -1, OBJNULL},
{"PRINC-TO-STRING", CL_ORDINARY, NULL, -1, OBJNULL},
{"PRINT", CL_ORDINARY, cl_print, -1, OBJNULL},
{"PRINT-NOT-READABLE", CL_ORDINARY, NULL, -1, OBJNULL},
{"PRINT-NOT-READABLE-OBJECT", CL_ORDINARY, NULL, -1, OBJNULL},
{"PROBE-FILE", CL_ORDINARY, cl_probe_file, 1, OBJNULL},
{"PROCLAIM", CL_ORDINARY, NULL, -1, OBJNULL},
{"PROG", CL_FORM, NULL, -1, OBJNULL},
{"PROG*", CL_FORM, NULL, -1, OBJNULL},
{"PROG1", CL_FORM, NULL, -1, OBJNULL},
{"PROG2", CL_FORM, NULL, -1, OBJNULL},
{"PROGN", CL_FORM, NULL, -1, OBJNULL},
{"PROGRAM-ERROR", CL_ORDINARY, NULL, -1, OBJNULL},
{"PROGV", CL_FORM, NULL, -1, OBJNULL},
{"PROVIDE", CL_ORDINARY, NULL, -1, OBJNULL},
{"PSETF", CL_ORDINARY, NULL, -1, OBJNULL},
{"PSETQ", CL_FORM, NULL, -1, OBJNULL},
{"PUSH", CL_ORDINARY, NULL, -1, OBJNULL},
{"PUSHNEW", CL_ORDINARY, NULL, -1, OBJNULL},
{"QUOTE", CL_FORM, NULL, -1, OBJNULL},
{"RANDOM", CL_ORDINARY, cl_random, -1, OBJNULL},
{"RANDOM-STATE", CL_ORDINARY, NULL, -1, OBJNULL},
{"RANDOM-STATE-P", CL_ORDINARY, cl_random_state_p, 1, OBJNULL},
{"RASSOC", CL_ORDINARY, cl_rassoc, -1, OBJNULL},
{"RASSOC-IF", CL_ORDINARY, NULL, -1, OBJNULL},
{"RASSOC-IF-NOT", CL_ORDINARY, NULL, -1, OBJNULL},
{"RATIO", CL_ORDINARY, NULL, -1, OBJNULL},
{"RATIONAL", CL_ORDINARY, cl_rational, 1, OBJNULL},
{"RATIONALIZE", CL_ORDINARY, cl_rationalize, 1, OBJNULL},
{"RATIONALP", CL_ORDINARY, cl_rationalp, 1, OBJNULL},
{"READ", CL_ORDINARY, cl_read, -1, OBJNULL},
{"READ-BYTE", CL_ORDINARY, cl_read_byte, -1, OBJNULL},
{"READ-CHAR", CL_ORDINARY, cl_read_char, -1, OBJNULL},
{"READ-CHAR-NO-HANG", CL_ORDINARY, cl_read_char_no_hang, -1, OBJNULL},
{"READ-DELIMITED-LIST", CL_ORDINARY, cl_read_delimited_list, -1, OBJNULL},
{"READ-FROM-STRING", CL_ORDINARY, NULL, -1, OBJNULL},
{"READ-LINE", CL_ORDINARY, cl_read_line, -1, OBJNULL},
{"READ-PRESERVING-WHITESPACE", CL_ORDINARY, cl_read_preserving_whitespace, -1, OBJNULL},
{"READ-SEQUENCE", CL_ORDINARY, cl_read_sequence, -1, OBJNULL},
{"READER-ERROR", CL_ORDINARY, NULL, -1, OBJNULL},
{"READTABLE", CL_ORDINARY, NULL, -1, OBJNULL},
{"READTABLE-CASE", CL_ORDINARY, NULL, -1, OBJNULL},
{"READTABLEP", CL_ORDINARY, cl_readtablep, 1, OBJNULL},
{"REAL", CL_ORDINARY, NULL, -1, OBJNULL},
{"REALP", CL_ORDINARY, cl_realp, 1, OBJNULL},
{"REALPART", CL_ORDINARY, cl_realpart, 1, OBJNULL},
{"REDUCE", CL_ORDINARY, NULL, -1, OBJNULL},
{"REM", CL_ORDINARY, cl_rem, 2, OBJNULL},
{"REMF", CL_ORDINARY, NULL, -1, OBJNULL},
{"REMHASH", CL_ORDINARY, cl_remhash, 2, OBJNULL},
{"REMOVE", CL_ORDINARY, NULL, -1, OBJNULL},
{"REMOVE-DUPLICATES", CL_ORDINARY, NULL, -1, OBJNULL},
{"REMOVE-IF", CL_ORDINARY, NULL, -1, OBJNULL},
{"REMOVE-IF-NOT", CL_ORDINARY, NULL, -1, OBJNULL},
{"REMPROP", CL_ORDINARY, cl_remprop, 2, OBJNULL},
{"RENAME-FILE", CL_ORDINARY, cl_rename_file, 2, OBJNULL},
{"RENAME-PACKAGE", CL_ORDINARY, cl_rename_package, -1, OBJNULL},
{"REPLACE", CL_ORDINARY, NULL, -1, OBJNULL},
{"REQUIRE", CL_ORDINARY, NULL, -1, OBJNULL},
{"REST", CL_ORDINARY, cl_cdr, 1, OBJNULL},
{"RESTART", CL_ORDINARY, NULL, 1, OBJNULL},
{"RESTART-BIND", CL_ORDINARY, NULL, 1, OBJNULL},
{"RESTART-CASE", CL_ORDINARY, NULL, 1, OBJNULL},
{"RESTART-NAME", CL_ORDINARY, NULL, 1, OBJNULL},
{"RETURN", CL_FORM, NULL, -1, OBJNULL},
{"RETURN-FROM", CL_FORM, NULL, -1, OBJNULL},
{"REVAPPEND", CL_ORDINARY, cl_revappend, 2, OBJNULL},
{"REVERSE", CL_ORDINARY, cl_reverse, 1, OBJNULL},
{"ROOM", CL_ORDINARY, NULL, -1, OBJNULL},
{"ROTATEF", CL_ORDINARY, NULL, -1, OBJNULL},
{"ROUND", CL_ORDINARY, cl_round, -1, OBJNULL},
{"ROW-MAJOR-AREF", CL_ORDINARY, cl_row_major_aref, 2, OBJNULL},
{"RPLACA", CL_ORDINARY, cl_rplaca, 2, OBJNULL},
{"RPLACD", CL_ORDINARY, cl_rplacd, 2, OBJNULL},
{"SAFETY", CL_ORDINARY, NULL, -1, OBJNULL},
{"SATISFIES", CL_ORDINARY, NULL, -1, OBJNULL},
{"SBIT", CL_ORDINARY, NULL, -1, OBJNULL},
{"SCALE-FLOAT", CL_ORDINARY, cl_scale_float, 2, OBJNULL},
{"SCHAR", CL_ORDINARY, cl_char, 2, OBJNULL},
{"SEARCH", CL_ORDINARY, NULL, -1, OBJNULL},
{"SECOND", CL_ORDINARY, cl_cadr, 1, OBJNULL},
{"SEQUENCE", CL_ORDINARY, NULL, -1, OBJNULL},
{"SERIOUS-CONDITION", CL_ORDINARY, NULL, -1, OBJNULL},
{"SET", CL_ORDINARY, cl_set, 2, OBJNULL},
{"SET-DIFFERENCE", CL_ORDINARY, NULL, -1, OBJNULL},
{"SET-DISPATCH-MACRO-CHARACTER", CL_ORDINARY, cl_set_dispatch_macro_character, -1, OBJNULL},
{"SET-EXCLUSIVE-OR", CL_ORDINARY, NULL, -1, OBJNULL},
{"SET-MACRO-CHARACTER", CL_ORDINARY, cl_set_macro_character, -1, OBJNULL},
{"SET-PPRINT-DISPATCH", CL_ORDINARY, NULL, -1, OBJNULL},
{"SET-SYNTAX-FROM-CHAR", CL_ORDINARY, cl_set_syntax_from_char, -1, OBJNULL},
{"SETF", CL_ORDINARY, NULL, -1, OBJNULL},
{"SETQ", CL_FORM, NULL, -1, OBJNULL},
{"SEVENTH", CL_ORDINARY, cl_seventh, 1, OBJNULL},
{"SHADOW", CL_ORDINARY, cl_shadow, -1, OBJNULL},
{"SHADOWING-IMPORT", CL_ORDINARY, cl_shadowing_import, -1, OBJNULL},
{"SHIFTF", CL_ORDINARY, NULL, -1, OBJNULL},
{"SHORT-FLOAT", CL_ORDINARY, NULL, -1, OBJNULL},
{"SHORT-FLOAT-EPSILON", CL_CONSTANT, NULL, -1, OBJNULL},
{"SHORT-FLOAT-NEGATIVE-EPSILON", CL_CONSTANT, NULL, -1, OBJNULL},
{"SHORT-SITE-NAME", CL_ORDINARY, NULL, -1, OBJNULL},
{"SIGNAL", CL_ORDINARY, NULL, -1, OBJNULL},
{"SIGNED-BYTE", CL_ORDINARY, NULL, -1, OBJNULL},
{"SIGNUM", CL_ORDINARY, NULL, -1, OBJNULL},
{"SIMPLE-ARRAY", CL_ORDINARY, NULL, -1, OBJNULL},
{"SIMPLE-BASE-STRING", CL_ORDINARY, NULL, -1, OBJNULL},
{"SIMPLE-BIT-VECTOR", CL_ORDINARY, NULL, -1, OBJNULL},
{"SIMPLE-BIT-VECTOR-P", CL_ORDINARY, cl_simple_bit_vector_p, 1, OBJNULL},
{"SIMPLE-CONDITION", CL_ORDINARY, NULL, -1, OBJNULL},
{"SIMPLE-CONDITION-FORMAT-CONTROL", CL_ORDINARY, NULL, -1, OBJNULL},
{"SIMPLE-CONDITION-FORMAT-ARGUMENTS", CL_ORDINARY, NULL, -1, OBJNULL},
{"SIMPLE-ERROR", CL_ORDINARY, NULL, -1, OBJNULL},
{"SIMPLE-STRING", CL_ORDINARY, NULL, -1, OBJNULL},
{"SIMPLE-STRING-P", CL_ORDINARY, cl_simple_string_p, 1, OBJNULL},
{"SIMPLE-TYPE-ERROR", CL_ORDINARY, NULL, -1, OBJNULL},
{"SIMPLE-VECTOR", CL_ORDINARY, NULL, -1, OBJNULL},
{"SIMPLE-VECTOR-P", CL_ORDINARY, cl_simple_vector_p, 1, OBJNULL},
{"SIMPLE-WARNING", CL_ORDINARY, NULL, -1, OBJNULL},
{"SIN", CL_ORDINARY, cl_sin, 1, OBJNULL},
{"SINGLE-FLOAT", CL_ORDINARY, NULL, -1, OBJNULL},
{"SINGLE-FLOAT-EPSILON", CL_CONSTANT, NULL, -1, OBJNULL},
{"SINGLE-FLOAT-NEGATIVE-EPSILON", CL_CONSTANT, NULL, -1, OBJNULL},
{"SINH", CL_ORDINARY, cl_sinh, 1, OBJNULL},
{"SIXTH", CL_ORDINARY, cl_sixth, 1, OBJNULL},
{"SLEEP", CL_ORDINARY, cl_sleep, 1, OBJNULL},
{"SOFTWARE-TYPE", CL_ORDINARY, NULL, -1, OBJNULL},
{"SOFTWARE-VERSION", CL_ORDINARY, NULL, -1, OBJNULL},
{"SOME", CL_ORDINARY, NULL, -1, OBJNULL},
{"SORT", CL_ORDINARY, NULL, -1, OBJNULL},
{"SPACE", CL_ORDINARY, NULL, -1, OBJNULL},
{"SPECIAL", CL_ORDINARY, NULL, -1, OBJNULL},
{"SPECIAL-OPERATOR-P", CL_ORDINARY, cl_special_operator_p, 1, OBJNULL},
{"SPEED", CL_ORDINARY, NULL, -1, OBJNULL},
{"SQRT", CL_ORDINARY, cl_sqrt, 1, OBJNULL},
{"STABLE-SORT", CL_ORDINARY, NULL, -1, OBJNULL},
{"STANDARD-CHAR", CL_ORDINARY, NULL, -1, OBJNULL},
{"STANDARD-CHAR-P", CL_ORDINARY, cl_standard_char_p, 1, OBJNULL},
{"STEP", CL_ORDINARY, NULL, -1, OBJNULL},
{"STORAGE-CONDITION", CL_ORDINARY, NULL, -1, OBJNULL},
{"STORE-VALUE", CL_ORDINARY, NULL, -1, OBJNULL},
{"STREAM", CL_ORDINARY, NULL, -1, OBJNULL},
{"STREAM-ELEMENT-TYPE", CL_ORDINARY, cl_stream_element_type, 1, OBJNULL},
{"STREAM-ERROR", CL_ORDINARY, NULL, -1, OBJNULL},
{"STREAM-ERROR-STREAM", CL_ORDINARY, NULL, -1, OBJNULL},
{"STREAM-EXTERNAL-FORMAT", CL_ORDINARY, cl_stream_external_format, 1, OBJNULL},
{"STREAMP", CL_ORDINARY, cl_streamp, 1, OBJNULL},
{"STRING", CL_ORDINARY, cl_string, 1, OBJNULL},
{"STRING-CAPITALIZE", CL_ORDINARY, cl_string_capitalize, -1, OBJNULL},
{"STRING-DOWNCASE", CL_ORDINARY, cl_string_downcase, -1, OBJNULL},
{"STRING-EQUAL", CL_ORDINARY, cl_string_equal, -1, OBJNULL},
{"STRING-GREATERP", CL_ORDINARY, cl_string_greaterp, -1, OBJNULL},
{"STRING-LEFT-TRIM", CL_ORDINARY, cl_string_left_trim, 2, OBJNULL},
{"STRING-LESSP", CL_ORDINARY, cl_string_lessp, -1, OBJNULL},
{"STRING-NOT-EQUAL", CL_ORDINARY, cl_string_not_equal, -1, OBJNULL},
{"STRING-NOT-GREATERP", CL_ORDINARY, cl_string_not_greaterp, -1, OBJNULL},
{"STRING-NOT-LESSP", CL_ORDINARY, cl_string_not_lessp, -1, OBJNULL},
{"STRING-RIGHT-TRIM", CL_ORDINARY, cl_string_right_trim, 2, OBJNULL},
{"STRING-STREAM", CL_ORDINARY, NULL, -1, OBJNULL},
{"STRING-TRIM", CL_ORDINARY, cl_string_trim, 2, OBJNULL},
{"STRING-UPCASE", CL_ORDINARY, cl_string_upcase, -1, OBJNULL},
{"STRING/=", CL_ORDINARY, cl_stringNE, -1, OBJNULL},
{"STRING<", CL_ORDINARY, cl_stringL, -1, OBJNULL},
{"STRING<=", CL_ORDINARY, cl_stringLE, -1, OBJNULL},
{"STRING=", CL_ORDINARY, cl_stringE, -1, OBJNULL},
{"STRING>", CL_ORDINARY, cl_stringG, -1, OBJNULL},
{"STRING>=", CL_ORDINARY, cl_stringGE, -1, OBJNULL},
{"STRINGP", CL_ORDINARY, cl_stringp, 1, OBJNULL},
{"STRUCTURE", CL_ORDINARY, NULL, -1, OBJNULL},
{"STYLE-WARNING", CL_ORDINARY, NULL, -1, OBJNULL},
{"SUBLIS", CL_ORDINARY, cl_sublis, -1, OBJNULL},
{"SUBSEQ", CL_ORDINARY, cl_subseq, -1, OBJNULL},
{"SUBSETP", CL_ORDINARY, NULL, -1, OBJNULL},
{"SUBST", CL_ORDINARY, cl_subst, -1, OBJNULL},
{"SUBST-IF", CL_ORDINARY, NULL, -1, OBJNULL},
{"SUBST-IF-NOT", CL_ORDINARY, NULL, -1, OBJNULL},
{"SUBSTITUTE", CL_ORDINARY, NULL, -1, OBJNULL},
{"SUBSTITUTE-IF", CL_ORDINARY, NULL, -1, OBJNULL},
{"SUBSTITUTE-IF-NOT", CL_ORDINARY, NULL, -1, OBJNULL},
{"SUBTYPEP", CL_ORDINARY, NULL, -1, OBJNULL},
{"SVREF", CL_ORDINARY, cl_svref, 2, OBJNULL},
{"SXHASH", CL_ORDINARY, cl_sxhash, 1, OBJNULL},
{"SYMBOL", CL_ORDINARY, NULL, -1, OBJNULL},
{"SYMBOL-FUNCTION", CL_ORDINARY, cl_symbol_function, 1, OBJNULL},
{"SYMBOL-MACROLET", CL_FORM, NULL, -1, OBJNULL},
{"SYMBOL-NAME", CL_ORDINARY, cl_symbol_name, 1, OBJNULL},
{"SYMBOL-PACKAGE", CL_ORDINARY, cl_symbol_package, 1, OBJNULL},
{"SYMBOL-PLIST", CL_ORDINARY, cl_symbol_plist, 1, OBJNULL},
{"SYMBOL-VALUE", CL_ORDINARY, cl_symbol_value, 1, OBJNULL},
{"SYMBOLP", CL_ORDINARY, cl_symbolp, 1, OBJNULL},
{"SYNONYM-STREAM", CL_ORDINARY, NULL, -1, OBJNULL},
{"SYNONYM-STREAM-SYMBOL", CL_ORDINARY, cl_synonym_stream_symbol, 1, OBJNULL},
{"TAGBODY", CL_FORM, NULL, -1, OBJNULL},
{"TAILP", CL_ORDINARY, cl_tailp, 2, OBJNULL},
{"TAN", CL_ORDINARY, cl_tan, 1, OBJNULL},
{"TANH", CL_ORDINARY, cl_tanh, 1, OBJNULL},
{"TENTH", CL_ORDINARY, cl_tenth, 1, OBJNULL},
{"TERPRI", CL_ORDINARY, cl_terpri, -1, OBJNULL},
{"THE", CL_FORM, NULL, -1, OBJNULL},
{"THIRD", CL_ORDINARY, cl_caddr, 1, OBJNULL},
{"THROW", CL_FORM, NULL, -1, OBJNULL},
{"TIME", CL_ORDINARY, NULL, -1, OBJNULL},
{"TRACE", CL_ORDINARY, NULL, -1, OBJNULL},
{"TRANSLATE-LOGICAL-PATHNAME", CL_ORDINARY, cl_translate_logical_pathname, -1, OBJNULL},
{"TRANSLATE-PATHNAME", CL_ORDINARY, cl_translate_pathname, -1, OBJNULL},
{"TREE-EQUAL", CL_ORDINARY, cl_tree_equal, -1, OBJNULL},
{"TRUENAME", CL_ORDINARY, cl_truename, 1, OBJNULL},
{"TRUNCATE", CL_ORDINARY, cl_truncate, -1, OBJNULL},
{"TWO-WAY-STREAM", CL_ORDINARY, NULL, -1, OBJNULL},
{"TWO-WAY-STREAM-INPUT-STREAM", CL_ORDINARY, cl_two_way_stream_input_stream, 1, OBJNULL},
{"TWO-WAY-STREAM-OUTPUT-STREAM", CL_ORDINARY, cl_two_way_stream_output_stream, 1, OBJNULL},
{"TYPE", CL_ORDINARY, NULL, -1, OBJNULL},
{"TYPE-ERROR", CL_ORDINARY, NULL, -1, OBJNULL},
{"TYPE-ERROR-DATUM", CL_ORDINARY, NULL, -1, OBJNULL},
{"TYPE-ERROR-EXPECTED-TYPE", CL_ORDINARY, NULL, -1, OBJNULL},
{"TYPE-OF", CL_ORDINARY, cl_type_of, 1, OBJNULL},
{"TYPECASE", CL_ORDINARY, NULL, -1, OBJNULL},
{"TYPEP", CL_ORDINARY, NULL, -1, OBJNULL},
{"UNBOUND-SLOT", CL_ORDINARY, NULL, -1, OBJNULL},
{"UNBOUND-SLOT-INSTANCE", CL_ORDINARY, NULL, -1, OBJNULL},
{"UNBOUND-VARIABLE", CL_ORDINARY, NULL, -1, OBJNULL},
{"UNDEFINED-FUNCTION", CL_ORDINARY, NULL, -1, OBJNULL},
{"UNEXPORT", CL_ORDINARY, cl_unexport, -1, OBJNULL},
{"UNINTERN", CL_ORDINARY, cl_unintern, -1, OBJNULL},
{"UNION", CL_ORDINARY, NULL, -1, OBJNULL},
{"UNLESS", CL_FORM, NULL, -1, OBJNULL},
{"UNREAD-CHAR", CL_ORDINARY, cl_unread_char, -1, OBJNULL},
{"UNSIGNED-BYTE", CL_ORDINARY, NULL, -1, OBJNULL},
{"UNTRACE", CL_ORDINARY, NULL, -1, OBJNULL},
{"UNUSE-PACKAGE", CL_ORDINARY, cl_unuse_package, -1, OBJNULL},
{"UNWIND-PROTECT", CL_FORM, NULL, -1, OBJNULL},
{"UPGRADED-ARRAY-ELEMENT-TYPE", CL_ORDINARY, NULL, -1, OBJNULL},
{"UPGRADED-COMPLEX-PART-TYPE", CL_ORDINARY, NULL, -1, OBJNULL},
{"UPPER-CASE-P", CL_ORDINARY, cl_upper_case_p, 1, OBJNULL},
{"USE-PACKAGE", CL_ORDINARY, cl_use_package, -1, OBJNULL},
{"USE-VALUE", CL_ORDINARY, NULL, -1, OBJNULL},
{"USER-HOMEDIR-PATHNAME", CL_ORDINARY, cl_user_homedir_pathname, -1, OBJNULL},
{"VALUES", CL_ORDINARY, cl_values, -1, OBJNULL},
{"VALUES-LIST", CL_ORDINARY, cl_values_list, 1, OBJNULL},
{"VARIABLE", CL_ORDINARY, NULL, -1, OBJNULL},
{"VECTOR", CL_ORDINARY, NULL, -1, OBJNULL},
{"VECTOR-POP", CL_ORDINARY, NULL, -1, OBJNULL},
{"VECTOR-PUSH", CL_ORDINARY, NULL, -1, OBJNULL},
{"VECTOR-PUSH-EXTEND", CL_ORDINARY, NULL, -1, OBJNULL},
{"VECTORP", CL_ORDINARY, cl_vectorp, 1, OBJNULL},
{"WARN", CL_ORDINARY, NULL, -1, OBJNULL},
{"WARNING", CL_ORDINARY, NULL, -1, OBJNULL},
{"WHEN", CL_FORM, NULL, -1, OBJNULL},
{"WILD-PATHNAME-P", CL_ORDINARY, cl_wild_pathname_p, -1, OBJNULL},
{"WITH-COMPILATION-UNIT", CL_ORDINARY, NULL, -1, OBJNULL},
{"WITH-CONDITION-RESTARTS", CL_ORDINARY, NULL, -1, OBJNULL},
{"WITH-HASH-TABLE-ITERATOR", CL_ORDINARY, NULL, -1, OBJNULL},
{"WITH-INPUT-FROM-STRING", CL_ORDINARY, NULL, -1, OBJNULL},
{"WITH-OPEN-FILE", CL_ORDINARY, NULL, -1, OBJNULL},
{"WITH-OPEN-STREAM", CL_ORDINARY, NULL, -1, OBJNULL},
{"WITH-OUTPUT-TO-STRING", CL_ORDINARY, NULL, -1, OBJNULL},
{"WITH-PACKAGE-ITERATOR", CL_ORDINARY, NULL, -1, OBJNULL},
{"WITH-SIMPLE-RESTART", CL_ORDINARY, NULL, -1, OBJNULL},
{"WITH-STANDARD-IO-SYNTAX", CL_ORDINARY, NULL, -1, OBJNULL},
{"WRITE", CL_ORDINARY, cl_write, -1, OBJNULL},
{"WRITE-BYTE", CL_ORDINARY, cl_write_byte, 2, OBJNULL},
{"WRITE-CHAR", CL_ORDINARY, cl_write_char, -1, OBJNULL},
{"WRITE-LINE", CL_ORDINARY, cl_write_line, -1, OBJNULL},
{"WRITE-SEQUENCE", CL_ORDINARY, cl_write_sequence, -1, OBJNULL},
{"WRITE-STRING", CL_ORDINARY, cl_write_string, -1, OBJNULL},
{"WRITE-TO-STRING", CL_ORDINARY, NULL, -1, OBJNULL},
{"Y-OR-N-P", CL_ORDINARY, NULL, -1, OBJNULL},
{"YES-OR-NO-P", CL_ORDINARY, NULL, -1, OBJNULL},
{"ZEROP", CL_ORDINARY, cl_zerop, 1, OBJNULL},
#ifdef CLOS
{"ALLOCATE-INSTANCE", CL_ORDINARY, NULL, 2, OBJNULL},
{"ADD-METHOD", CL_ORDINARY, NULL, -1, OBJNULL},
{"BUILT-IN-CLASS", CL_ORDINARY, NULL, -1, OBJNULL},
{"CALL-METHOD", CL_ORDINARY, NULL, -1, OBJNULL},
{"CALL-NEXT-METHOD", CL_ORDINARY, NULL, -1, OBJNULL},
{"CHANGE-CLASS", CL_ORDINARY, NULL, -1, OBJNULL},
{"CLASS", CL_ORDINARY, NULL, -1, OBJNULL},
{"CLASS-NAME", CL_ORDINARY, NULL, -1, OBJNULL},
{"CLASS-OF", CL_ORDINARY, cl_class_of, 1, OBJNULL},
{"COMPUTE-APPLICABLE-METHODS", CL_ORDINARY, NULL, -1, OBJNULL},
{"DEFCLASS", CL_ORDINARY, NULL, -1, OBJNULL},
{"DEFGENERIC", CL_ORDINARY, NULL, -1, OBJNULL},
{"DEFINE-METHOD-COMBINATION", CL_ORDINARY, NULL, -1, OBJNULL},
{"DEFMETHOD", CL_ORDINARY, NULL, -1, OBJNULL},
{"DESCRIBE-OBJECT", CL_ORDINARY, NULL, -1, OBJNULL},
{"ENSURE-GENERIC-FUNCTION", CL_ORDINARY, NULL, -1, OBJNULL},
{"FIND-CLASS", CL_ORDINARY, cl_find_class, -1, OBJNULL},
{"FIND-METHOD", CL_ORDINARY, NULL, -1, OBJNULL},
{"GENERIC-FUNCTION", CL_ORDINARY, NULL, -1, OBJNULL},
{"IF", CL_FORM, NULL, -1, OBJNULL},
{"INITIALIZE-INSTANCE", CL_ORDINARY, NULL, -1, OBJNULL},
{"INVALID-METHOD-ERROR", CL_ORDINARY, NULL, -1, OBJNULL},
{"MAKE-INSTANCE", CL_ORDINARY, NULL, -1, OBJNULL},
{"MAKE-INSTANCES-OBSOLETE", CL_ORDINARY, NULL, -1, OBJNULL},
{"MAKE-LOAD-FORM", CL_ORDINARY, NULL, -1, OBJNULL},
{"MAKE-LOAD-FORM-SAVING-SLOTS", CL_ORDINARY, NULL, -1, OBJNULL},
{"MAKE-METHOD", CL_ORDINARY, NULL, -1, OBJNULL},
{"METHOD", CL_ORDINARY, NULL, -1, OBJNULL},
{"METHOD-COMBINATION-ERROR", CL_ORDINARY, NULL, -1, OBJNULL},
{"METHOD-COMBINATION", CL_ORDINARY, NULL, -1, OBJNULL},
{"METHOD-QUALIFIERS", CL_ORDINARY, NULL, -1, OBJNULL},
{"NEXT-METHOD-P", CL_ORDINARY, NULL, -1, OBJNULL},
{"NO-APPLICABLE-METHOD", CL_ORDINARY, NULL, -1, OBJNULL},
{"NO-NEXT-METHOD", CL_ORDINARY, NULL, -1, OBJNULL},
{"PRINT-OBJECT", CL_ORDINARY, NULL, -1, OBJNULL},
{"PRINT-UNREADABLE-OBJECT", CL_ORDINARY, NULL, -1, OBJNULL},
{"REINITIALIZE-INSTANCE", CL_ORDINARY, NULL, -1, OBJNULL},
{"REMOVE-METHOD", CL_ORDINARY, NULL, -1, OBJNULL},
{"SHARED-INITIALIZE", CL_ORDINARY, NULL, -1, OBJNULL},
{"SLOT-BOUNDP", CL_ORDINARY, NULL, -1, OBJNULL},
{"SLOT-EXISTS-P", CL_ORDINARY, NULL, -1, OBJNULL},
{"SLOT-MAKUNBOUND", CL_ORDINARY, NULL, -1, OBJNULL},
{"SLOT-MISSING", CL_ORDINARY, NULL, -1, OBJNULL},
{"SLOT-UNBOUND", CL_ORDINARY, NULL, -1, OBJNULL},
{"SLOT-VALUE", CL_ORDINARY, NULL, -1, OBJNULL},
{"STANDARD", CL_ORDINARY, NULL, -1, OBJNULL},
{"STANDARD-CLASS", CL_ORDINARY, NULL, -1, OBJNULL},
{"STANDARD-GENERIC-FUNCTION", CL_ORDINARY, NULL, -1, OBJNULL},
{"STANDARD-METHOD", CL_ORDINARY, NULL, -1, OBJNULL},
{"STANDARD-OBJECT", CL_ORDINARY, NULL, -1, OBJNULL},
{"STRUCTURE-CLASS", CL_ORDINARY, NULL, -1, OBJNULL},
{"STRUCTURE-OBJECT", CL_ORDINARY, NULL, -1, OBJNULL},
{"UPDATE-INSTANCE-FOR-DIFFERENT-CLASS", CL_ORDINARY, NULL, -1, OBJNULL},
{"UPDATE-INSTANCE-FOR-REDEFINED-CLASS", CL_ORDINARY, NULL, -1, OBJNULL},
{"WITH-ACCESSORS", CL_ORDINARY, NULL, -1, OBJNULL},
{"WITH-SLOTS", CL_ORDINARY, NULL, -1, OBJNULL},
{KEY_ "ARGUMENT-PRECEDENCE-ORDER", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "DECLARE", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "DEFAULT-INITARGS", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "DIRECT-DEFAULT-INITARGS", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "DIRECT-SLOTS", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "DIRECT-SUPERCLASSES", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "DOCUMENTATION", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "GENERIC-FUNCTION-CLASS", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "LAMBDA-LIST", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "METHOD-CLASS", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "METHOD-COMBINATION", KEYWORD, NULL, -1, OBJNULL},
#endif
/* SYSTEM PACKAGE */
{SYS_ "#!", SI_ORDINARY, NULL, -1, OBJNULL},
{SYS_ "*BACKQ-LEVEL*", SI_SPECIAL, NULL, -1, MAKE_FIXNUM(0)},
{SYS_ "*CBLOCK*", SI_SPECIAL, NULL, -1, Cnil},
{SYS_ "*CIRCLE-COUNTER*", SI_SPECIAL, NULL, -1, Cnil},
{SYS_ "*CIRCLE-STACK*", SI_SPECIAL, NULL, -1, OBJNULL},
{SYS_ "*CLASS-NAME-HASH-TABLE*", SI_SPECIAL, NULL, -1, OBJNULL},
{SYS_ "*GC-MESSAGE*", SI_SPECIAL, NULL, -1, Cnil},
{SYS_ "*GC-VERBOSE*", SI_SPECIAL, NULL, -1, Cnil},
{SYS_ "*IGNORE-ERRORS*", SI_SPECIAL, NULL, -1, Cnil},
{SYS_ "*IGNORE-EOF-ON-TERMINAL-IO*", SI_SPECIAL, NULL, -1, Cnil},
{SYS_ "*INDENT-FORMATTED-OUTPUT*", SI_SPECIAL, NULL, -1, Cnil},
{SYS_ "*INIT-FUNCTION-PREFIX*", SI_SPECIAL, NULL, -1, Cnil},
{SYS_ "*INTERRUPT-ENABLE*", SI_SPECIAL, NULL, 1, Ct},
{SYS_ "*KEEP-DEFINITIONS*", SI_SPECIAL, NULL, -1, Ct},
{SYS_ "*LOAD-HOOKS*", SI_SPECIAL, NULL, -1, OBJNULL},
{SYS_ "*LOAD-SEARCH-LIST*", SI_SPECIAL, NULL, -1, Cnil},
{SYS_ "*MAKE-CONSTANT", SI_ORDINARY, si_Xmake_constant, 2, OBJNULL},
{SYS_ "*MAKE-SPECIAL", SI_ORDINARY, si_Xmake_special, 1, OBJNULL},
{SYS_ "*PRINT-PACKAGE*", SI_SPECIAL, NULL, -1, Cnil},
{SYS_ "*PRINT-STRUCTURE*", SI_SPECIAL, NULL, -1, Cnil},
{SYS_ "*SHARP-EQ-CONTEXT*", SI_SPECIAL, NULL, -1, Cnil},
{SYS_ "*STEP-LEVEL*", SI_SPECIAL, OBJNULL, -1, MAKE_FIXNUM(0)},
{SYS_ "*STEP-ACTION*", SI_SPECIAL, OBJNULL, -1, Cnil},
{SYS_ ".", SI_ORDINARY, NULL, -1, OBJNULL},
{SYS_ ",", SI_ORDINARY, NULL, -1, OBJNULL},
{SYS_ ",.", SI_ORDINARY, NULL, -1, OBJNULL},
{SYS_ ",@", SI_ORDINARY, NULL, -1, OBJNULL},
{SYS_ "ALLOCATE-RAW-INSTANCE", SI_ORDINARY, si_allocate_raw_instance, 3, OBJNULL},
{SYS_ "ARGC", SI_ORDINARY, si_argc, 0, OBJNULL},
{SYS_ "ARGV", SI_ORDINARY, si_argv, 1, OBJNULL},
{SYS_ "ASET", SI_ORDINARY, si_aset, -1, OBJNULL},
{SYS_ "BC-DISASSEMBLE", SI_ORDINARY, si_bc_disassemble, 1, OBJNULL},
{SYS_ "BC-SPLIT", SI_ORDINARY, si_bc_split, 1, OBJNULL},
{SYS_ "BDS-TOP", SI_ORDINARY, si_bds_top, 0, OBJNULL},
{SYS_ "BDS-VAL", SI_ORDINARY, si_bds_val, 1, OBJNULL},
{SYS_ "BDS-VAR", SI_ORDINARY, si_bds_var, 1, OBJNULL},
{SYS_ "BIT-ARRAY-OP", SI_ORDINARY, si_bit_array_op, 4, OBJNULL},
{SYS_ "C-ARGUMENTS-LIMIT", SI_ORDINARY, NULL, -1, MAKE_FIXNUM(C_ARGUMENTS_LIMIT)},
{SYS_ "CHAR-SET", SI_ORDINARY, si_char_set, 3, OBJNULL},
{SYS_ "CHDIR", SI_ORDINARY, si_chdir, -1, OBJNULL},
{SYS_ "CLEAR-COMPILER-PROPERTIES", SI_ORDINARY, cl_identity, 1, OBJNULL},
{SYS_ "CLOSE-PIPE", SI_ORDINARY, si_close_pipe, 1, OBJNULL},
{SYS_ "COERCE-TO-FILENAME", SI_ORDINARY, si_coerce_to_filename, 1, OBJNULL},
{SYS_ "COERCE-TO-FUNCTION", SI_ORDINARY, si_coerce_to_function, 1, OBJNULL},
{SYS_ "COERCE-TO-PACKAGE", SI_ORDINARY, si_coerce_to_package, 1, OBJNULL},
{SYS_ "COMPILED-FUNCTION-BLOCK", SI_ORDINARY, si_compiled_function_block, 1, OBJNULL},
{SYS_ "COMPILED-FUNCTION-NAME", SI_ORDINARY, si_compiled_function_name, 1, OBJNULL},
{SYS_ "COPY-STREAM", SI_ORDINARY, si_copy_stream, 1, OBJNULL},
{SYS_ "DAYLIGHT-SAVING-TIME-P", SI_ORDINARY, si_daylight_saving_time_p, -1, OBJNULL},
{SYS_ "DO-READ-SEQUENCE", SI_ORDINARY, si_do_read_sequence, 4, OBJNULL},
{SYS_ "DO-WRITE-SEQUENCE", SI_ORDINARY, si_do_write_sequence, 4, OBJNULL},
{SYS_ "ELT-SET", SI_ORDINARY, si_elt_set, 3, OBJNULL},
{SYS_ "EVAL-WITH-ENV", SI_ORDINARY, si_eval_with_env, -1, OBJNULL},
{SYS_ "EXPAND-DEFMACRO", SI_ORDINARY, NULL, -1, OBJNULL},
{SYS_ "FILE-COLUMN", SI_ORDINARY, si_file_column, 1, OBJNULL},
{SYS_ "FILE-KIND", SI_ORDINARY, si_file_kind, 2, OBJNULL},
{SYS_ "FILL-POINTER-SET", SI_ORDINARY, si_fill_pointer_set, 2, OBJNULL},
{SYS_ "FIXNUMP", SI_ORDINARY, si_fixnump, 1, OBJNULL},
{SYS_ "FORMAT-ERROR", SI_ORDINARY, NULL, -1, OBJNULL},
#ifdef ECL_CMU_FORMAT
{SYS_ "FORMATTER-AUX", SI_ORDINARY, NULL, -1, OBJNULL},
#else
{SYS_ "FORMATTER-AUX", SI_ORDINARY, si_formatter_aux, -1, OBJNULL},
#endif
{SYS_ "FRS-BDS", SI_ORDINARY, si_frs_bds, 1, OBJNULL},
{SYS_ "FRS-CLASS", SI_ORDINARY, si_frs_class, 1, OBJNULL},
{SYS_ "FRS-IHS", SI_ORDINARY, si_frs_ihs, 1, OBJNULL},
{SYS_ "FRS-TAG", SI_ORDINARY, si_frs_tag, 1, OBJNULL},
{SYS_ "FRS-TOP", SI_ORDINARY, si_frs_top, 0, OBJNULL},
{SYS_ "FSET", SI_ORDINARY, si_fset, -1, OBJNULL},
{SYS_ "FUNCTION-BLOCK-NAME", SI_ORDINARY, si_function_block_name, 1, OBJNULL},
{SYS_ "GET-LOCAL-TIME-ZONE", SI_ORDINARY, si_get_local_time_zone, 0, OBJNULL},
{SYS_ "GET-SYSPROP", SI_ORDINARY, si_get_sysprop, 2, OBJNULL},
{SYS_ "GET-STRING-INPUT-STREAM-INDEX", SI_ORDINARY, si_get_string_input_stream_index, 1, OBJNULL},
{SYS_ "GETENV", SI_ORDINARY, si_getenv, 1, OBJNULL},
{SYS_ "GETCWD", SI_ORDINARY, si_getcwd, 0, OBJNULL},
#ifdef _MSC_VER
{SYS_ "GET-LIBRARY-PATHNAME", SI_ORDINARY, si_get_library_pathname, 0, OBJNULL},
#endif
{SYS_ "HASH-SET", SI_ORDINARY, si_hash_set, 3, OBJNULL},
{SYS_ "HASH-TABLE-ITERATOR", SI_ORDINARY, si_hash_table_iterator, 1, OBJNULL},
{SYS_ "IHS-ENV", SI_ORDINARY, si_ihs_env, 1, OBJNULL},
{SYS_ "IHS-FUN", SI_ORDINARY, si_ihs_fun, 1, OBJNULL},
{SYS_ "IHS-NEXT", SI_ORDINARY, si_ihs_next, 1, OBJNULL},
{SYS_ "IHS-PREV", SI_ORDINARY, si_ihs_prev, 1, OBJNULL},
{SYS_ "IHS-TOP", SI_ORDINARY, si_ihs_top, 1, OBJNULL},
{SYS_ "INTERPRETER-STACK", SI_ORDINARY, si_interpreter_stack, -1, OBJNULL},
{SYS_ "LINK-FROM", SI_ORDINARY, NULL, -1, OBJNULL},
{SYS_ "LINK-TO", SI_ORDINARY, NULL, -1, OBJNULL},
{SYS_ "LIST-NTH", SI_ORDINARY, si_list_nth, 2, OBJNULL},
{SYS_ "LOAD-SOURCE", SI_ORDINARY, si_load_source, 3, OBJNULL},
{SYS_ "LOGICAL-PATHNAME-P", SI_ORDINARY, si_logical_pathname_p, 1, OBJNULL},
{SYS_ "MACRO", SI_ORDINARY, NULL, -1, OBJNULL},
{SYS_ "MAKE-LAMBDA", SI_ORDINARY, si_make_lambda, 2, OBJNULL},
{SYS_ "MAKE-PURE-ARRAY", SI_ORDINARY, si_make_pure_array, -1, OBJNULL},
{SYS_ "MAKE-STRING-OUTPUT-STREAM-FROM-STRING", SI_ORDINARY, si_make_string_output_stream_from_string, 1, OBJNULL},
{SYS_ "MAKE-STRUCTURE", SI_ORDINARY, si_make_structure, -1, OBJNULL},
{SYS_ "MAKE-VECTOR", SI_ORDINARY, si_make_vector, 6, OBJNULL},
{SYS_ "MANGLE-NAME", SI_ORDINARY, si_mangle_name, -1, OBJNULL},
{SYS_ "MEMBER1", SI_ORDINARY, si_member1, 5, OBJNULL},
{SYS_ "MEMQ", SI_ORDINARY, si_memq, 2, OBJNULL},
{SYS_ "MKDIR", SI_ORDINARY, si_mkdir, 2, OBJNULL},
{SYS_ "MKSTEMP", SI_ORDINARY, si_mkstemp, 1, OBJNULL},
{SYS_ "OPEN-PIPE", SI_ORDINARY, si_open_pipe, 1, OBJNULL},
{SYS_ "OUTPUT-STREAM-STRING", SI_ORDINARY, si_output_stream_string, 1, OBJNULL},
{SYS_ "PACKAGE-LOCK", SI_ORDINARY, si_package_lock, 2, OBJNULL},
{SYS_ "PACKAGE-HASH-TABLES", SI_ORDINARY, si_package_hash_tables, 1, OBJNULL},
{SYS_ "PATHNAME-TRANSLATIONS", SI_ORDINARY, si_pathname_translations, -1, OBJNULL},
{SYS_ "POINTER", SI_ORDINARY, si_pointer, 1, OBJNULL},
{SYS_ "PRETTY-PRINT-FORMAT", SI_ORDINARY, NULL, -1, OBJNULL},
{SYS_ "PROCESS-DECLARATIONS", SI_ORDINARY, si_process_declarations, -1, OBJNULL},
{SYS_ "PROCESS-LAMBDA", SI_ORDINARY, si_process_lambda, 1, OBJNULL},
{SYS_ "PROCESS-LAMBDA-LIST", SI_ORDINARY, si_process_lambda_list, 2, OBJNULL},
{SYS_ "PUT-F", SI_ORDINARY, si_put_f, 3, OBJNULL},
{SYS_ "PUT-PROPERTIES", SI_ORDINARY, si_put_properties, -1, OBJNULL},
{SYS_ "PUT-SYSPROP", SI_ORDINARY, si_put_sysprop, 3, OBJNULL},
{SYS_ "PUTPROP", SI_ORDINARY, si_putprop, 3, OBJNULL},
{SYS_ "REM-F", SI_ORDINARY, si_rem_f, 2, OBJNULL},
{SYS_ "REM-SYSPROP", SI_ORDINARY, si_rem_sysprop, 2, OBJNULL},
{SYS_ "REPLACE-ARRAY", SI_ORDINARY, si_replace_array, 2, OBJNULL},
{SYS_ "RESET-STACK-LIMITS", SI_ORDINARY, si_reset_stack_limits, 0, OBJNULL},
{SYS_ "ROW-MAJOR-ASET", SI_ORDINARY, si_row_major_aset, 3, OBJNULL},
{SYS_ "RPLACA-NTHCDR", SI_ORDINARY, si_rplaca_nthcdr, 3, OBJNULL},
{SYS_ "SAFE-EVAL", SI_ORDINARY, si_safe_eval, -1, OBJNULL},
{SYS_ "SCH-FRS-BASE", SI_ORDINARY, si_sch_frs_base, 2, OBJNULL},
{SYS_ "SCHAR-SET", SI_ORDINARY, si_char_set, 3, OBJNULL},
{SYS_ "SHARP-A-READER", SI_ORDINARY, NULL, -1, OBJNULL},
{SYS_ "SHARP-S-READER", SI_ORDINARY, NULL, -1, OBJNULL},
{SYS_ "SELECT-PACKAGE", SI_ORDINARY, si_select_package, 1, OBJNULL},
{SYS_ "SET-SYMBOL-PLIST", SI_ORDINARY, si_set_symbol_plist, 2, OBJNULL},
#if defined(HAVE_PUTENV) || defined(HAVE_SETENV)
{SYS_ "SETENV", SI_ORDINARY, si_setenv, 2, OBJNULL},
#endif
{SYS_ "SETF-LAMBDA", SI_ORDINARY, NULL, -1, OBJNULL},
{SYS_ "SETF-METHOD", SI_ORDINARY, NULL, -1, OBJNULL},
{SYS_ "SETF-NAMEP", SI_ORDINARY, NULL, -1, OBJNULL},
{SYS_ "SETF-SYMBOL", SI_ORDINARY, NULL, -1, OBJNULL},
{SYS_ "SETF-UPDATE", SI_ORDINARY, NULL, -1, OBJNULL},
{SYS_ "SIMPLE-CONTROL-ERROR", SI_ORDINARY, NULL, -1, OBJNULL},
{SYS_ "SIMPLE-PACKAGE-ERROR", SI_ORDINARY, NULL, -1, OBJNULL},
{SYS_ "SIMPLE-PROGRAM-ERROR", SI_ORDINARY, NULL, -1, OBJNULL},
{SYS_ "SIMPLE-READER-ERROR", SI_ORDINARY, NULL, -1, OBJNULL},
{SYS_ "SPECIALP", SI_ORDINARY, si_specialp, 1, OBJNULL},
{SYS_ "STANDARD-READTABLE", SI_ORDINARY, si_standard_readtable, 0, OBJNULL},
{SYS_ "STEPPER", SI_ORDINARY, OBJNULL, -1, OBJNULL},
{SYS_ "STRING-CONCATENATE", SI_ORDINARY, si_string_concatenate, -1, OBJNULL},
{SYS_ "STRING-TO-OBJECT", SI_ORDINARY, si_string_to_object, 1, OBJNULL},
{SYS_ "STRUCTURE-NAME", SI_ORDINARY, si_structure_name, 1, OBJNULL},
{SYS_ "STRUCTURE-PRINT-FUNCTION", SI_ORDINARY, NULL, -1, OBJNULL},
{SYS_ "STRUCTURE-REF", SI_ORDINARY, si_structure_ref, 3, OBJNULL},
{SYS_ "STRUCTURE-SET", SI_ORDINARY, si_structure_set, 4, OBJNULL},
{SYS_ "STRUCTURE-SLOT-DESCRIPTIONS", SI_ORDINARY, NULL, -1, OBJNULL},
{SYS_ "STRUCTURE-SUBTYPE-P", SI_ORDINARY, si_structure_subtype_p, 2, OBJNULL},
{SYS_ "STRUCTUREP", SI_ORDINARY, si_structurep, 1, OBJNULL},
{SYS_ "SVSET", SI_ORDINARY, si_svset, 3, OBJNULL},
{SYS_ "SYMBOL-MACRO", SI_ORDINARY, NULL, -1, OBJNULL},
{SYS_ "SYSTEM", SI_ORDINARY, si_system, 1, OBJNULL},
{SYS_ "TERMINAL-INTERRUPT", SI_ORDINARY, NULL, -1, OBJNULL},
{SYS_ "TOP-LEVEL", SI_ORDINARY, NULL, -1, OBJNULL},
/*{SYS_ "VALID-FUNCTION-NAME-P", SI_ORDINARY, si_valid_function_name_p, 1, OBJNULL},*/
{SYS_ "UNIVERSAL-ERROR-HANDLER", SI_ORDINARY, NULL, -1, OBJNULL},
{SYS_ "UNLINK-SYMBOL", SI_ORDINARY, si_unlink_symbol, 1, OBJNULL},
{SYS_ "VALID-FUNCTION-NAME-P", SI_ORDINARY, si_valid_function_name_p, 1, OBJNULL},
{SYS_ "WRITE-OBJECT", SI_SPECIAL, si_write_object, 2, OBJNULL},
{SYS_ "WRITE-UGLY-OBJECT", SI_SPECIAL, si_write_ugly_object, 2, OBJNULL},
#ifndef CLOS
{SYS_ "STRUCTURE-INCLUDE", SI_ORDINARY, NULL, -1, OBJNULL},
#else
{SYS_ "CHANGE-INSTANCE", SI_ORDINARY, NULL, 4, OBJNULL},
{SYS_ "COMPUTE-EFFECTIVE-METHOD", SI_ORDINARY, NULL, -1, OBJNULL},
{SYS_ "COPY-INSTANCE", SI_ORDINARY, si_copy_instance, 1, OBJNULL},
{SYS_ "GENERIC-FUNCTION-P", SI_ORDINARY, si_generic_function_p, 1, OBJNULL},
{SYS_ "INSTANCE-REF-SAFE", SI_ORDINARY, si_instance_ref_safe, 2, OBJNULL},
{SYS_ "INSTANCE-REF", SI_ORDINARY, si_instance_ref, 2, OBJNULL},
{SYS_ "INSTANCE-SET", SI_ORDINARY, si_instance_set, 3, OBJNULL},
{SYS_ "INSTANCE-SIG", SI_ORDINARY, si_instance_sig, 1, OBJNULL},
{SYS_ "INSTANCE-SIG-SET", SI_ORDINARY, si_instance_sig_set, 1, OBJNULL},
{SYS_ "INSTANCE-CLASS", SI_ORDINARY, si_instance_class, 1, OBJNULL},
{SYS_ "INSTANCE-CLASS-SET", SI_ORDINARY, si_instance_class_set, 2, OBJNULL},
{SYS_ "INSTANCEP", SI_ORDINARY, si_instancep, 1, OBJNULL},
{SYS_ "SET-COMPILED-FUNCTION-NAME", SI_ORDINARY, si_set_compiled_function_name, 2, OBJNULL},
{SYS_ "SET-FUNCALLABLE", SI_ORDINARY, si_set_funcallable, 2, OBJNULL},
{SYS_ "SL-BOUNDP", SI_ORDINARY, si_sl_boundp, 1, OBJNULL},
{SYS_ "SL-MAKUNBOUND", SI_ORDINARY, si_sl_makunbound, 2, OBJNULL},
{SYS_ "SUBCLASSP", SI_ORDINARY, NULL, -1, OBJNULL},
/*{SYS_ "UNBOUND", SI_ORDINARY, si_unbound, 0, OBJNULL}, */
#endif
#ifdef PROFILE
{SYS_ "*PROFILE-ARRAY*", SI_SPECIAL, NULL, -1, OBJNULL},
#endif
#ifdef ECL_CLOS_STREAMS
{EXT_ "STREAM-CLEAR-INPUT", EXT_ORDINARY, NULL, -1, OBJNULL},
{EXT_ "STREAM-CLEAR-OUTPUT", EXT_ORDINARY, NULL, -1, OBJNULL},
{EXT_ "STREAM-CLOSE", EXT_ORDINARY, NULL, -1, OBJNULL},
{EXT_ "STREAM-FORCE-OUTPUT", EXT_ORDINARY, NULL, -1, OBJNULL},
{EXT_ "STREAM-INPUT-P", EXT_ORDINARY, NULL, -1, OBJNULL},
{EXT_ "STREAM-INTERACTIVE-P", EXT_ORDINARY, NULL, -1, OBJNULL},
{EXT_ "STREAM-LISTEN", EXT_ORDINARY, NULL, -1, OBJNULL},
{EXT_ "STREAM-OUTPUT-P", EXT_ORDINARY, NULL, -1, OBJNULL},
{EXT_ "STREAM-READ-CHAR", EXT_ORDINARY, NULL, -1, OBJNULL},
{EXT_ "STREAM-UNREAD-CHAR", EXT_ORDINARY, NULL, -1, OBJNULL},
{EXT_ "STREAM-WRITE-CHAR", EXT_ORDINARY, NULL, -1, OBJNULL},
#endif
#ifdef PDE
{SYS_ "*RECORD-SOURCE-PATHNAME-P*", SI_SPECIAL, NULL, -1, OBJNULL},
{SYS_ "*SOURCE-PATHNAME*", SI_SPECIAL, NULL, -1, Cnil},
{SYS_ "RECORD-SOURCE-PATHNAME", SI_ORDINARY, NULL, -1, OBJNULL},
#endif
#ifdef PROFILE
{SYS_ "PROFILE", SI_ORDINARY, si_profile, -1, OBJNULL},
{SYS_ "CLEAR-PROFILE", SI_ORDINARY, si_clear_profile, -1, OBJNULL},
{SYS_ "DISPLAY-PROFILE", SI_ORDINARY, si_display_profile, -1, OBJNULL},
#endif /* PROFILE */
#ifdef TCP
{SYS_ "OPEN-CLIENT-STREAM", SI_ORDINARY, si_open_client_stream, 2, OBJNULL},
{SYS_ "OPEN-SERVER-STREAM", SI_ORDINARY, si_open_server_stream, 1, OBJNULL},
{SYS_ "OPEN-UNIX-SOCKET-STREAM", SI_ORDINARY, si_open_unix_socket_stream, 1, OBJNULL},
{SYS_ "LOOKUP-HOST-ENTRY", SI_ORDINARY, si_lookup_host_entry, 1, OBJNULL},
#endif
{SYS_ "CATCH-BAD-SIGNALS", SI_ORDINARY, si_catch_bad_signals, 0, OBJNULL},
{SYS_ "UNCATCH-BAD-SIGNALS", SI_ORDINARY, si_uncatch_bad_signals, 0, OBJNULL},
/* KEYWORD PACKAGE */
{KEY_ "ABORT", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "ABSOLUTE", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "ALLOW-OTHER-KEYS", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "APPEND", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "ARRAY", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "BACK", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "BASE", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "BLOCK", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "CAPITALIZE", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "CASE", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "CATCH", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "CATCHALL", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "CIRCLE", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "COMPILE-TOPLEVEL", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "COMMON",KEYWORD,NULL,-1,OBJNULL},
{KEY_ "CONTROL-STRING", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "CREATE", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "DATUM", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "DEFAULT", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "DEFAULTS", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "DEVICE", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "DIRECTION", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "DIRECTORY", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "DOWNCASE", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "ELEMENT-TYPE", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "END", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "END1", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "END2", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "ERROR", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "ESCAPE", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "EXECUTE", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "EXPECTED-TYPE", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "EXTERNAL", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "EXTERNAL-FORMAT", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "FILE", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "FORMAT-ARGUMENTS", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "FORMAT-CONTROL", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "FUNCTION", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "GENSYM", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "HOST", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "IF-DOES-NOT-EXIST", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "IF-EXISTS", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "INHERITED", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "INITIAL-ELEMENT", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "INPUT", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "INTERNAL", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "INSTANCE", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "IO", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "JUNK-ALLOWED", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "KEY", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "LENGTH", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "LEVEL", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "LINK", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "LIST-ALL", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "LOCAL",KEYWORD,NULL,-1,OBJNULL},
{KEY_ "LOCKABLE", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "LOAD-TOPLEVEL", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "NAME", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "NEW-VERSION", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "NEWEST", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "NICKNAMES", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "OBJECT", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "OFFSET", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "OPERATION", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "OPERANDS", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "OUTPUT", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "OVERWRITE", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "PACKAGE", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "PATHNAME", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "PRETTY", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "PRINT", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "PROBE", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "PROTECT", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "RADIX", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "READABLY", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "REHASH-SIZE", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "REHASH-THRESHOLD", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "RELATIVE", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "RENAME", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "RENAME-AND-DELETE", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "SET-DEFAULT-PATHNAME", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "SEARCH-LIST", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "SIZE", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "SPECIAL", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "START", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "START1", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "START2", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "STREAM", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "SUPERSEDE", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "TAG", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "TEST", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "TEST-NOT", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "TYPE", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "UNSPECIFIC", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "UP", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "UPCASE", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "USE", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "VERBOSE", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "VERSION", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "WILD", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "WILD-INFERIORS", KEYWORD, NULL, -1, OBJNULL},
{EXT_ "BYTE8", EXT_ORDINARY, NULL, -1, OBJNULL},
{EXT_ "COMPILER-LET", EXT_FORM, NULL, -1, OBJNULL},
{EXT_ "INTEGER8", EXT_ORDINARY, NULL, -1, OBJNULL},
{EXT_ "LAMBDA-BLOCK", EXT_ORDINARY, NULL, -1, OBJNULL},
{EXT_ "QUIT", EXT_ORDINARY, si_quit, -1, OBJNULL},
#ifdef CLOS
{EXT_ "GET-METHOD", EXT_ORDINARY, NULL, -1, OBJNULL},
{EXT_ "INSTANCE", EXT_ORDINARY, NULL, -1, OBJNULL},
#endif
{SYS_ "ALLOCATE-FOREIGN-DATA", SI_ORDINARY, si_allocate_foreign_data, 2, OBJNULL},
{SYS_ "FOREIGN-DATA", SI_ORDINARY, NULL, -1, OBJNULL},
{SYS_ "FOREIGN-DATA-ADDRESS", SI_ORDINARY, si_foreign_data_address, 1, OBJNULL},
{SYS_ "FOREIGN-DATA-POINTER", SI_ORDINARY, si_foreign_data_pointer, 4, OBJNULL},
{SYS_ "FOREIGN-DATA-RECAST", SI_ORDINARY, si_foreign_data_recast, 3, OBJNULL},
{SYS_ "FOREIGN-DATA-REF", SI_ORDINARY, si_foreign_data_ref, 4, OBJNULL},
{SYS_ "FOREIGN-DATA-REF-ELT", SI_ORDINARY, si_foreign_data_ref_elt, 3, OBJNULL},
{SYS_ "FOREIGN-DATA-SET", SI_ORDINARY, si_foreign_data_set, 3, OBJNULL},
{SYS_ "FOREIGN-DATA-SET-ELT", SI_ORDINARY, si_foreign_data_set_elt, 4, OBJNULL},
{SYS_ "FOREIGN-DATA-TAG", SI_ORDINARY, si_foreign_data_tag, 1, OBJNULL},
{SYS_ "FREE-FOREIGN-DATA", SI_ORDINARY, si_free_foreign_data, 1, OBJNULL},
{SYS_ "NULL-POINTER-P", SI_ORDINARY, si_null_pointer_p, 1, OBJNULL},
{SYS_ "SIZE-OF-FOREIGN-ELT-TYPE", SI_ORDINARY, si_size_of_foreign_elt_type, 1, OBJNULL},
{KEY_ "ARRAY", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "BYTE", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "CHAR", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "DOUBLE", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "FIXNUM", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "FLOAT", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "INT", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "LONG", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "POINTER-SELF", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "POINTER-VOID", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "SHORT", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "STRUCT", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "UNION", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "VOID", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "UNSIGNED-BYTE", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "UNSIGNED-CHAR", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "UNSIGNED-INT", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "UNSIGNED-LONG", KEYWORD, NULL, -1, OBJNULL},
{KEY_ "UNSIGNED-SHORT", KEYWORD, NULL, -1, OBJNULL},
{SYS_ "C-CHAR-BIT", SI_CONSTANT, NULL, -1, MAKE_FIXNUM(CHAR_BIT)},
{SYS_ "C-CHAR-MAX", SI_CONSTANT, NULL, -1, MAKE_FIXNUM(CHAR_MAX)},
{SYS_ "C-CHAR-MIN", SI_CONSTANT, NULL, -1, MAKE_FIXNUM(CHAR_MIN)},
{SYS_ "C-INT-MAX", SI_CONSTANT, NULL, -1, OBJNULL}, /* See main.d */
{SYS_ "C-INT-MIN", SI_CONSTANT, NULL, -1, OBJNULL}, /* See main.d */
{SYS_ "C-SHORT-MAX", SI_CONSTANT, NULL, -1, MAKE_FIXNUM(SHRT_MAX)},
{SYS_ "C-SHORT-MIN", SI_CONSTANT, NULL, -1, MAKE_FIXNUM(SHRT_MIN)},
{SYS_ "C-LONG-MAX", SI_CONSTANT, NULL, -1, OBJNULL}, /* See main.d */
{SYS_ "C-LONG-MIN", SI_CONSTANT, NULL, -1, OBJNULL}, /* See main.d */
{SYS_ "C-UCHAR-MAX", SI_CONSTANT, NULL, -1, MAKE_FIXNUM(UCHAR_MAX)},
{SYS_ "C-UINT-MAX", SI_CONSTANT, NULL, -1, OBJNULL}, /* See main.d */
{SYS_ "C-USHORT-MAX", SI_CONSTANT, NULL, -1, MAKE_FIXNUM(USHRT_MAX)},
{SYS_ "C-ULONG-MAX", SI_CONSTANT, NULL, -1, OBJNULL}, /* See main.d */
#ifdef GBC_BOEHM
{SYS_ "GC", SI_ORDINARY, si_gc, 1, OBJNULL},
{SYS_ "GC-DUMP", SI_ORDINARY, si_gc_dump, 0, OBJNULL},
#endif
#if !defined(GBC_BOEHM)
{SYS_ "GC", SI_ORDINARY, si_gc, 1, OBJNULL},
{SYS_ "ALLOCATE", SI_ORDINARY, si_allocate, -1, OBJNULL},
{SYS_ "ALLOCATED-PAGES", SI_ORDINARY, si_allocated_pages, -1, OBJNULL},
{SYS_ "MAXIMUM-ALLOCATABLE-PAGES", SI_ORDINARY, si_maximum_allocatable_pages, -1, OBJNULL},
{SYS_ "ALLOCATE-CONTIGUOUS-PAGES", SI_ORDINARY, si_allocate_contiguous_pages, -1, OBJNULL},
{SYS_ "ALLOCATED-CONTIGUOUS-PAGES", SI_ORDINARY, si_allocated_contiguous_pages, -1, OBJNULL},
{SYS_ "MAXIMUM-CONTIGUOUS-PAGES", SI_ORDINARY, si_maximum_contiguous_pages, -1, OBJNULL},
{SYS_ "GC-TIME", SI_ORDINARY, si_gc_time, -1, OBJNULL},
{SYS_ "GET-HOLE-SIZE", SI_ORDINARY, si_get_hole_size, -1, OBJNULL},
{SYS_ "SET-HOLE-SIZE", SI_ORDINARY, si_set_hole_size, -1, OBJNULL},
{SYS_ "IGNORE-MAXIMUM-PAGES", SI_ORDINARY, si_ignore_maximum_pages, -1, OBJNULL},
{SYS_ "ROOM-REPORT", SI_ORDINARY, si_room_report, -1, OBJNULL},
{SYS_ "RESET-GC-COUNT", SI_ORDINARY, si_reset_gc_count, -1, OBJNULL},
#endif /* !GBC_BOEHM */
#ifdef ENABLE_DLOPEN
{SYS_ "LOAD-BINARY", SI_ORDINARY, si_load_binary, 3, OBJNULL},
#endif
#ifdef ECL_THREADS
{MP_ "PROCESS", MP_ORDINARY, NULL, -1, OBJNULL},
{MP_ "LOCK", MP_ORDINARY, NULL, -1, OBJNULL},
{MP_ "*CURRENT-PROCESS*", CL_SPECIAL, NULL, -1, OBJNULL},
{MP_ "ALL-PROCESSES", MP_ORDINARY, mp_all_processes, 0, OBJNULL},
{MP_ "EXIT-PROCESS", MP_ORDINARY, mp_exit_process, 0, OBJNULL},
{MP_ "MAKE-PROCESS", MP_ORDINARY, mp_make_process, -1, OBJNULL},
{MP_ "PROCESS-ACTIVE-P", MP_ORDINARY, mp_process_active_p, 1, OBJNULL},
{MP_ "PROCESS-ENABLE", MP_ORDINARY, mp_process_enable, 1, OBJNULL},
{MP_ "PROCESS-KILL", MP_ORDINARY, mp_process_kill, 1, OBJNULL},
{MP_ "PROCESS-NAME", MP_ORDINARY, mp_process_name, 1, OBJNULL},
{MP_ "PROCESS-PRESET", MP_ORDINARY, mp_process_preset, -1, OBJNULL},
{MP_ "PROCESS-RUN-FUNCTION", MP_ORDINARY, mp_process_run_function, -1, OBJNULL},
{MP_ "PROCESS-WHOSTATE", MP_ORDINARY, mp_process_whostate, 1, OBJNULL},
{MP_ "MAKE-LOCK", MP_ORDINARY, mp_make_lock, -1, OBJNULL},
{MP_ "GET-LOCK", MP_ORDINARY, mp_get_lock, -1, OBJNULL},
{MP_ "GIVEUP-LOCK", MP_ORDINARY, mp_giveup_lock, 1, OBJNULL},
{KEY_ "INITIAL-BINDINGS", KEYWORD, NULL, -1, OBJNULL},
{MP_ "INTERRUPT-PROCESS", MP_ORDINARY, mp_interrupt_process, 2, OBJNULL},
{MP_ "+LOAD-COMPILE-LOCK+", MP_CONSTANT, NULL, -1, OBJNULL},
{MP_ "WITH-LOCK", MP_CONSTANT, NULL, -1, OBJNULL},
{MP_ "WITHOUT-INTERRUPTS", MP_CONSTANT, NULL, -1, OBJNULL},
#endif
{EXT_ "RUN-PROGRAM", SI_ORDINARY, si_run_program, -1, OBJNULL},
/* Tag for end of list */
{NULL, CL_ORDINARY, NULL, -1, OBJNULL}};