summaryrefslogtreecommitdiff
path: root/embed.h
blob: a4669e5acd385038d5a12dab5c2d13fd41aee819 (plain)
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
/* !!!!!!!   DO NOT EDIT THIS FILE   !!!!!!! 
   This file is derived from global.sym and interp.sym 
   Any changes made here will be lost 
*/

/* (Doing namespace management portably in C is really gross.) */

/*  EMBED has no run-time penalty, but helps keep the Perl namespace
    from colliding with that used by other libraries pulled in
    by extensions or by embedding perl.  Allow a cc -DNO_EMBED
    override, however, to keep binary compatability with previous
    versions of perl.
*/
#ifndef NO_EMBED
#  define EMBED 1 
#endif

#ifdef EMBED

/* globals we need to hide from the world */
#define AMG_names	Perl_AMG_names
#define No		Perl_No
#define Sv		Perl_Sv
#define Xpv		Perl_Xpv
#define Yes		Perl_Yes
#define abs_amg		Perl_abs_amg
#define add_amg		Perl_add_amg
#define add_ass_amg	Perl_add_ass_amg
#define additem		Perl_additem
#define amagic_generation	Perl_amagic_generation
#define an		Perl_an
#define atan2_amg	Perl_atan2_amg
#define band_amg	Perl_band_amg
#define bool__amg	Perl_bool__amg
#define bor_amg		Perl_bor_amg
#define buf		Perl_buf
#define bufend		Perl_bufend
#define bufptr		Perl_bufptr
#define bxor_amg	Perl_bxor_amg
#define check		Perl_check
#define compiling	Perl_compiling
#define compl_amg	Perl_compl_amg
#define compcv		Perl_compcv
#define comppad		Perl_comppad
#define comppad_name	Perl_comppad_name
#define comppad_name_fill	Perl_comppad_name_fill
#define comppad_name_floor	Perl_comppad_name_floor
#define concat_amg	Perl_concat_amg
#define concat_ass_amg	Perl_concat_ass_amg
#define cop_seqmax	Perl_cop_seqmax
#define cos_amg		Perl_cos_amg
#define cryptseen	Perl_cryptseen
#define cshlen		Perl_cshlen
#define cshname		Perl_cshname
#define curcop		Perl_curcop
#define curcopdb	Perl_curcopdb
#define curinterp	Perl_curinterp
#define curpad		Perl_curpad
#define cv_const_sv	Perl_cv_const_sv
#define dc		Perl_dc
#define debug		Perl_debug
#define dec_amg		Perl_dec_amg
#define di		Perl_di
#define div_amg		Perl_div_amg
#define div_ass_amg	Perl_div_ass_amg
#define do_undump	Perl_do_undump
#define ds		Perl_ds
#define egid		Perl_egid
#define envgv		Perl_envgv
#define eq_amg		Perl_eq_amg
#define error_count	Perl_error_count
#define euid		Perl_euid
#define evalseq		Perl_evalseq
#define exp_amg		Perl_exp_amg
#define expect		Perl_expect
#define expectterm	Perl_expectterm
#define fallback_amg	Perl_fallback_amg
#define filter_add	Perl_filter_add
#define filter_del	Perl_filter_del
#define filter_read	Perl_filter_read
#define fold		Perl_fold
#define freq		Perl_freq
#define ge_amg		Perl_ge_amg
#define gid		Perl_gid
#define gt_amg		Perl_gt_amg
#define hexdigit	Perl_hexdigit
#define hints		Perl_hints
#define in_my		Perl_in_my
#define inc_amg		Perl_inc_amg
#define io_close	Perl_io_close
#define know_next	Perl_know_next
#define last_lop	Perl_last_lop
#define last_lop_op	Perl_last_lop_op
#define last_uni	Perl_last_uni
#define le_amg		Perl_le_amg
#define lex_state	Perl_lex_state
#define lex_defer	Perl_lex_defer
#define lex_expect	Perl_lex_expect
#define lex_brackets	Perl_lex_brackets
#define lex_formbrack	Perl_lex_formbrack
#define lex_fakebrack	Perl_lex_fakebrack
#define lex_casemods	Perl_lex_casemods
#define lex_dojoin	Perl_lex_dojoin
#define lex_starts	Perl_lex_starts
#define lex_stuff	Perl_lex_stuff
#define lex_repl	Perl_lex_repl
#define lex_op		Perl_lex_op
#define lex_inpat	Perl_lex_inpat
#define lex_inwhat	Perl_lex_inwhat
#define lex_brackstack	Perl_lex_brackstack
#define lex_casestack	Perl_lex_casestack
#define linestr		Perl_linestr
#define log_amg		Perl_log_amg
#define lshift_amg	Perl_lshift_amg
#define lshift_ass_amg	Perl_lshift_ass_amg
#define lt_amg		Perl_lt_amg
#define markstack	Perl_markstack
#define markstack_max	Perl_markstack_max
#define markstack_ptr	Perl_markstack_ptr
#define maxo		Perl_maxo
#define max_intro_pending	Perl_max_intro_pending
#define min_intro_pending	Perl_min_intro_pending
#define mod_amg		Perl_mod_amg
#define mod_ass_amg	Perl_mod_ass_amg
#define mult_amg	Perl_mult_amg
#define mult_ass_amg	Perl_mult_ass_amg
#define multi_close	Perl_multi_close
#define multi_end	Perl_multi_end
#define multi_open	Perl_multi_open
#define multi_start	Perl_multi_start
#define na		Perl_na
#define ncmp_amg	Perl_ncmp_amg
#define nextval		Perl_nextval
#define nexttype	Perl_nexttype
#define nexttoke	Perl_nexttoke
#define ne_amg		Perl_ne_amg
#define neg_amg		Perl_neg_amg
#define nexttype	Perl_nexttype
#define nextval		Perl_nextval
#define no_aelem	Perl_no_aelem
#define no_dir_func	Perl_no_dir_func
#define no_func		Perl_no_func
#define no_helem	Perl_no_helem
#define no_mem		Perl_no_mem
#define no_modify	Perl_no_modify
#define no_security	Perl_no_security
#define no_sock_func	Perl_no_sock_func
#define no_usym		Perl_no_usym
#define nointrp		Perl_nointrp
#define nomem		Perl_nomem
#define nomemok		Perl_nomemok
#define nomethod_amg	Perl_nomethod_amg
#define not_amg		Perl_not_amg
#define numer_amg	Perl_numer_amg
#define oldbufptr	Perl_oldbufptr
#define oldoldbufptr	Perl_oldoldbufptr
#define op		Perl_op
#define op_desc		Perl_op_desc
#define op_name		Perl_op_name
#define op_seqmax	Perl_op_seqmax
#define opargs		Perl_opargs
#define origalen	Perl_origalen
#define origenviron	Perl_origenviron
#define osname		Perl_osname
#define padix		Perl_padix
#define patleave	Perl_patleave
#define pow_amg		Perl_pow_amg
#define pow_ass_amg	Perl_pow_ass_amg
#define ppaddr		Perl_ppaddr
#define profiledata	Perl_profiledata
#define provide_ref	Perl_provide_ref
#define psig_ptr	Perl_psig_ptr
#define psig_name	Perl_psig_name
#define qrt_amg		Perl_qrt_amg
#define rcsid		Perl_rcsid
#define reall_srchlen	Perl_reall_srchlen
#define regarglen	Perl_regarglen
#define regbol		Perl_regbol
#define regcode		Perl_regcode
#define regdummy	Perl_regdummy
#define regendp		Perl_regendp
#define regeol		Perl_regeol
#define regfold		Perl_regfold
#define reginput	Perl_reginput
#define regkind		Perl_regkind
#define reglastparen	Perl_reglastparen
#define regmyendp	Perl_regmyendp
#define regmyp_size	Perl_regmyp_size
#define regmystartp	Perl_regmystartp
#define regnarrate	Perl_regnarrate
#define regnaughty	Perl_regnaughty
#define regnpar		Perl_regnpar
#define regparse	Perl_regparse
#define regprecomp	Perl_regprecomp
#define regprev		Perl_regprev
#define regsawback	Perl_regsawback
#define regsize		Perl_regsize
#define regstartp	Perl_regstartp
#define regtill		Perl_regtill
#define regxend		Perl_regxend
#define repeat_amg	Perl_repeat_amg
#define repeat_ass_amg	Perl_repeat_ass_amg
#define retstack	Perl_retstack
#define retstack_ix	Perl_retstack_ix
#define retstack_max	Perl_retstack_max
#define rsfp		Perl_rsfp
#define rsfp_filters	Perl_rsfp_filters
#define rshift_amg	Perl_rshift_amg
#define rshift_ass_amg	Perl_rshift_ass_amg
#define save_pptr	Perl_save_pptr
#define savestack	Perl_savestack
#define savestack_ix	Perl_savestack_ix
#define savestack_max	Perl_savestack_max
#define saw_return	Perl_saw_return
#define scmp_amg	Perl_scmp_amg
#define scopestack	Perl_scopestack
#define scopestack_ix	Perl_scopestack_ix
#define scopestack_max	Perl_scopestack_max
#define scrgv		Perl_scrgv
#define seq_amg		Perl_seq_amg
#define sge_amg		Perl_sge_amg
#define sgt_amg		Perl_sgt_amg
#define sig_name	Perl_sig_name
#define sig_num		Perl_sig_num
#define siggv		Perl_siggv
#define sighandler	Perl_sighandler
#define simple		Perl_simple
#define sin_amg		Perl_sin_amg
#define sle_amg		Perl_sle_amg
#define slt_amg		Perl_slt_amg
#define sne_amg		Perl_sne_amg
#define stack_base	Perl_stack_base
#define stack_max	Perl_stack_max
#define stack_sp	Perl_stack_sp
#define statbuf		Perl_statbuf
#define string_amg	Perl_string_amg
#define sub_generation	Perl_sub_generation
#define subline		Perl_subline
#define subname		Perl_subname
#define subtr_amg	Perl_subtr_amg
#define subtr_ass_amg	Perl_subtr_ass_amg
#define sv_no		Perl_sv_no
#define sv_undef	Perl_sv_undef
#define sv_yes		Perl_sv_yes
#define tainting	Perl_tainting
#define thisexpr	Perl_thisexpr
#define timesbuf	Perl_timesbuf
#define tokenbuf	Perl_tokenbuf
#define uid		Perl_uid
#define varies		Perl_varies
#define vert		Perl_vert
#define vtbl_amagic	Perl_vtbl_amagic
#define vtbl_amagicelem	Perl_vtbl_amagicelem
#define vtbl_arylen	Perl_vtbl_arylen
#define vtbl_bm		Perl_vtbl_bm
#define vtbl_dbline	Perl_vtbl_dbline
#define vtbl_env	Perl_vtbl_env
#define vtbl_envelem	Perl_vtbl_envelem
#define vtbl_glob	Perl_vtbl_glob
#define vtbl_isa	Perl_vtbl_isa
#define vtbl_isaelem	Perl_vtbl_isaelem
#define vtbl_mglob	Perl_vtbl_mglob
#define vtbl_pack	Perl_vtbl_pack
#define vtbl_packelem	Perl_vtbl_packelem
#define vtbl_pos	Perl_vtbl_pos
#define vtbl_sig	Perl_vtbl_sig
#define vtbl_sigelem	Perl_vtbl_sigelem
#define vtbl_substr	Perl_vtbl_substr
#define vtbl_sv		Perl_vtbl_sv
#define vtbl_taint	Perl_vtbl_taint
#define vtbl_uvar	Perl_vtbl_uvar
#define vtbl_vec	Perl_vtbl_vec
#define warn_nl		Perl_warn_nl
#define warn_nosemi	Perl_warn_nosemi
#define warn_reserved	Perl_warn_reserved
#define watchaddr	Perl_watchaddr
#define watchok		Perl_watchok
#define yychar		Perl_yychar
#define yycheck		Perl_yycheck
#define yydebug		Perl_yydebug
#define yydefred	Perl_yydefred
#define yydgoto		Perl_yydgoto
#define yyerrflag	Perl_yyerrflag
#define yygindex	Perl_yygindex
#define yylen		Perl_yylen
#define yylhs		Perl_yylhs
#define yylval		Perl_yylval
#define yyname		Perl_yyname
#define yynerrs		Perl_yynerrs
#define yyrindex	Perl_yyrindex
#define yyrule		Perl_yyrule
#define yysindex	Perl_yysindex
#define yytable		Perl_yytable
#define yyval		Perl_yyval
#define Gv_AMupdate	Perl_Gv_AMupdate
#define amagic_call	Perl_amagic_call
#define append_elem	Perl_append_elem
#define append_list	Perl_append_list
#define apply		Perl_apply
#define assertref	Perl_assertref
#define av_clear	Perl_av_clear
#define av_extend	Perl_av_extend
#define av_fake		Perl_av_fake
#define av_fetch	Perl_av_fetch
#define av_fill		Perl_av_fill
#define av_len		Perl_av_len
#define av_make		Perl_av_make
#define av_pop		Perl_av_pop
#define av_push		Perl_av_push
#define av_shift	Perl_av_shift
#define av_store	Perl_av_store
#define av_undef	Perl_av_undef
#define av_unshift	Perl_av_unshift
#define bind_match	Perl_bind_match
#define block_end	Perl_block_end
#define block_start	Perl_block_start
#define calllist	Perl_calllist
#define cando		Perl_cando
#define cast_ulong	Perl_cast_ulong
#define check_uni	Perl_check_uni
#define checkcomma	Perl_checkcomma
#define ck_aelem	Perl_ck_aelem
#define ck_concat	Perl_ck_concat
#define ck_delete	Perl_ck_delete
#define ck_eof		Perl_ck_eof
#define ck_eval		Perl_ck_eval
#define ck_exec		Perl_ck_exec
#define ck_formline	Perl_ck_formline
#define ck_ftst		Perl_ck_ftst
#define ck_fun		Perl_ck_fun
#define ck_glob		Perl_ck_glob
#define ck_grep		Perl_ck_grep
#define ck_gvconst	Perl_ck_gvconst
#define ck_index	Perl_ck_index
#define ck_lengthconst	Perl_ck_lengthconst
#define ck_lfun		Perl_ck_lfun
#define ck_listiob	Perl_ck_listiob
#define ck_match	Perl_ck_match
#define ck_null		Perl_ck_null
#define ck_repeat	Perl_ck_repeat
#define ck_require	Perl_ck_require
#define ck_retarget	Perl_ck_retarget
#define ck_rfun		Perl_ck_rfun
#define ck_rvconst	Perl_ck_rvconst
#define ck_select	Perl_ck_select
#define ck_shift	Perl_ck_shift
#define ck_sort		Perl_ck_sort
#define ck_spair	Perl_ck_spair
#define ck_split	Perl_ck_split
#define ck_subr		Perl_ck_subr
#define ck_svconst	Perl_ck_svconst
#define ck_trunc	Perl_ck_trunc
#define convert		Perl_convert
#define cpytill		Perl_cpytill
#define croak		Perl_croak
#define cv_clone	Perl_cv_clone
#define cv_undef	Perl_cv_undef
#define cx_dump		Perl_cx_dump
#define cxinc		Perl_cxinc
#define deb		Perl_deb
#define deb_growlevel	Perl_deb_growlevel
#define debop		Perl_debop
#define debprofdump	Perl_debprofdump
#define debstack	Perl_debstack
#define debstackptrs	Perl_debstackptrs
#define deprecate	Perl_deprecate
#define die		Perl_die
#define die_where	Perl_die_where
#define do_aexec	Perl_do_aexec
#define do_chomp	Perl_do_chomp
#define do_chop		Perl_do_chop
#define do_close	Perl_do_close
#define do_eof		Perl_do_eof
#define do_exec		Perl_do_exec
#define do_execfree	Perl_do_execfree
#define do_ipcctl	Perl_do_ipcctl
#define do_ipcget	Perl_do_ipcget
#define do_join		Perl_do_join
#define do_kv		Perl_do_kv
#define do_msgrcv	Perl_do_msgrcv
#define do_msgsnd	Perl_do_msgsnd
#define do_open		Perl_do_open
#define do_pipe		Perl_do_pipe
#define do_print	Perl_do_print
#define do_readline	Perl_do_readline
#define do_seek		Perl_do_seek
#define do_semop	Perl_do_semop
#define do_shmio	Perl_do_shmio
#define do_sprintf	Perl_do_sprintf
#define do_tell		Perl_do_tell
#define do_trans	Perl_do_trans
#define do_vecset	Perl_do_vecset
#define do_vop		Perl_do_vop
#define doeval		Perl_doeval
#define dofindlabel	Perl_dofindlabel
#define dopoptoeval	Perl_dopoptoeval
#define dounwind	Perl_dounwind
#define dowantarray	Perl_dowantarray
#define dump_all	Perl_dump_all
#define dump_eval	Perl_dump_eval
#define dump_fds	Perl_dump_fds
#define dump_form	Perl_dump_form
#define dump_gv		Perl_dump_gv
#define dump_mstats	Perl_dump_mstats
#define dump_op		Perl_dump_op
#define dump_packsubs	Perl_dump_packsubs
#define dump_pm		Perl_dump_pm
#define dump_sub	Perl_dump_sub
#define fbm_compile	Perl_fbm_compile
#define fbm_instr	Perl_fbm_instr
#define fetch_gv	Perl_fetch_gv
#define fetch_io	Perl_fetch_io
#define filter_add	Perl_filter_add
#define filter_del	Perl_filter_del
#define filter_read	Perl_filter_read
#define fold_constants	Perl_fold_constants
#define force_ident	Perl_force_ident
#define force_list	Perl_force_list
#define force_next	Perl_force_next
#define force_word	Perl_force_word
#define free_tmps	Perl_free_tmps
#define gen_constant_list	Perl_gen_constant_list
#define gp_free		Perl_gp_free
#define gp_ref		Perl_gp_ref
#define gv_AVadd	Perl_gv_AVadd
#define gv_HVadd	Perl_gv_HVadd
#define gv_IOadd	Perl_gv_IOadd
#define gv_check	Perl_gv_check
#define gv_efullname	Perl_gv_efullname
#define gv_fetchfile	Perl_gv_fetchfile
#define gv_fetchmeth	Perl_gv_fetchmeth
#define gv_fetchmethod	Perl_gv_fetchmethod
#define gv_fetchpv	Perl_gv_fetchpv
#define gv_fullname	Perl_gv_fullname
#define gv_init		Perl_gv_init
#define gv_stashpv	Perl_gv_stashpv
#define gv_stashpvn	Perl_gv_stashpvn
#define gv_stashsv	Perl_gv_stashsv
#define he_delayfree	Perl_he_delayfree
#define he_free		Perl_he_free
#define he_root		Perl_he_root
#define hoistmust	Perl_hoistmust
#define hv_clear	Perl_hv_clear
#define hv_delete	Perl_hv_delete
#define hv_delete_ent	Perl_hv_delete_ent
#define hv_exists	Perl_hv_exists
#define hv_exists_ent	Perl_hv_exists_ent
#define hv_fetch	Perl_hv_fetch
#define hv_fetch_ent	Perl_hv_fetch_ent
#define hv_iterinit	Perl_hv_iterinit
#define hv_iterkey	Perl_hv_iterkey
#define hv_iterkeysv	Perl_hv_iterkeysv
#define hv_iternext	Perl_hv_iternext
#define hv_iternextsv	Perl_hv_iternextsv
#define hv_iterval	Perl_hv_iterval
#define hv_magic	Perl_hv_magic
#define hv_stashpv	Perl_hv_stashpv
#define hv_store	Perl_hv_store
#define hv_store_ent	Perl_hv_store_ent
#define hv_undef	Perl_hv_undef
#define ibcmp		Perl_ibcmp
#define ingroup		Perl_ingroup
#define instr		Perl_instr
#define intuit_more	Perl_intuit_more
#define invert		Perl_invert
#define jmaybe		Perl_jmaybe
#define keyword		Perl_keyword
#define leave_scope	Perl_leave_scope
#define lex_end		Perl_lex_end
#define lex_start	Perl_lex_start
#define linklist	Perl_linklist
#define list		Perl_list
#define listkids	Perl_listkids
#define localize	Perl_localize
#define looks_like_number	Perl_looks_like_number
#define magic_clearenv	Perl_magic_clearenv
#define magic_clearpack	Perl_magic_clearpack
#define magic_clearsig	Perl_magic_clearsig
#define magic_existspack	Perl_magic_existspack
#define magic_get	Perl_magic_get
#define magic_getarylen	Perl_magic_getarylen
#define magic_getglob	Perl_magic_getglob
#define magic_getpack	Perl_magic_getpack
#define magic_getpos	Perl_magic_getpos
#define magic_getsig	Perl_magic_getsig
#define magic_gettaint	Perl_magic_gettaint
#define magic_getuvar	Perl_magic_getuvar
#define magic_len	Perl_magic_len
#define magic_nextpack	Perl_magic_nextpack
#define magic_set	Perl_magic_set
#define magic_setamagic	Perl_magic_setamagic
#define magic_setarylen	Perl_magic_setarylen
#define magic_setbm	Perl_magic_setbm
#define magic_setdbline	Perl_magic_setdbline
#define magic_setenv	Perl_magic_setenv
#define magic_setglob	Perl_magic_setglob
#define magic_setisa	Perl_magic_setisa
#define magic_setmglob	Perl_magic_setmglob
#define magic_setpack	Perl_magic_setpack
#define magic_setpos	Perl_magic_setpos
#define magic_setsig	Perl_magic_setsig
#define magic_setsubstr	Perl_magic_setsubstr
#define magic_settaint	Perl_magic_settaint
#define magic_setuvar	Perl_magic_setuvar
#define magic_setvec	Perl_magic_setvec
#define magic_wipepack	Perl_magic_wipepack
#define magicname	Perl_magicname
#define markstack_grow	Perl_markstack_grow
#define mess		Perl_mess
#define mg_clear	Perl_mg_clear
#define mg_copy		Perl_mg_copy
#define mg_find		Perl_mg_find
#define mg_free		Perl_mg_free
#define mg_get		Perl_mg_get
#define mg_len		Perl_mg_len
#define mg_magical	Perl_mg_magical
#define mg_set		Perl_mg_set
#define mod		Perl_mod
#define modkids		Perl_modkids
#define moreswitches	Perl_moreswitches
#define mstats		Perl_mstats
#define my		Perl_my
#define my_bcopy	Perl_my_bcopy
#define my_bzero	Perl_my_bzero
#define my_chsize	Perl_my_chsize
#define my_exit		Perl_my_exit
#define my_htonl	Perl_my_htonl
#define my_lstat	Perl_my_lstat
#define my_memcmp	Perl_my_memcmp
#define my_ntohl	Perl_my_ntohl
#define my_pclose	Perl_my_pclose
#define my_popen	Perl_my_popen
#define my_setenv	Perl_my_setenv
#define my_stat		Perl_my_stat
#define my_swap		Perl_my_swap
#define my_unexec	Perl_my_unexec
#define newANONHASH	Perl_newANONHASH
#define newANONLIST	Perl_newANONLIST
#define newANONSUB	Perl_newANONSUB
#define newASSIGNOP	Perl_newASSIGNOP
#define newAV		Perl_newAV
#define newAVREF	Perl_newAVREF
#define newBINOP	Perl_newBINOP
#define newCONDOP	Perl_newCONDOP
#define newCVREF	Perl_newCVREF
#define newFORM		Perl_newFORM
#define newFOROP	Perl_newFOROP
#define newGVOP		Perl_newGVOP
#define newGVREF	Perl_newGVREF
#define newGVgen	Perl_newGVgen
#define newHV		Perl_newHV
#define newHVREF	Perl_newHVREF
#define newIO		Perl_newIO
#define newLISTOP	Perl_newLISTOP
#define newLOGOP	Perl_newLOGOP
#define newLOOPEX	Perl_newLOOPEX
#define newLOOPOP	Perl_newLOOPOP
#define newNULLLIST	Perl_newNULLLIST
#define newOP		Perl_newOP
#define newPMOP		Perl_newPMOP
#define newPROG		Perl_newPROG
#define newPVOP		Perl_newPVOP
#define newRANGE	Perl_newRANGE
#define newRV		Perl_newRV
#define newSLICEOP	Perl_newSLICEOP
#define newSTATEOP	Perl_newSTATEOP
#define newSUB		Perl_newSUB
#define newSV		Perl_newSV
#define newSVOP		Perl_newSVOP
#define newSVREF	Perl_newSVREF
#define newSViv		Perl_newSViv
#define newSVnv		Perl_newSVnv
#define newSVpv		Perl_newSVpv
#define newSVrv		Perl_newSVrv
#define newSVsv		Perl_newSVsv
#define newUNOP		Perl_newUNOP
#define newWHILEOP	Perl_newWHILEOP
#define newXS		Perl_newXS
#define newXSUB		Perl_newXSUB
#define nextargv	Perl_nextargv
#define ninstr		Perl_ninstr
#define no_fh_allowed	Perl_no_fh_allowed
#define no_op		Perl_no_op
#define oopsAV		Perl_oopsAV
#define oopsCV		Perl_oopsCV
#define oopsHV		Perl_oopsHV
#define op_free		Perl_op_free
#define package		Perl_package
#define pad_alloc	Perl_pad_alloc
#define pad_allocmy	Perl_pad_allocmy
#define pad_findmy	Perl_pad_findmy
#define pad_free	Perl_pad_free
#define pad_leavemy	Perl_pad_leavemy
#define pad_reset	Perl_pad_reset
#define pad_sv		Perl_pad_sv
#define pad_swipe	Perl_pad_swipe
#define peep		Perl_peep
#define pidgone		Perl_pidgone
#define pmflag		Perl_pmflag
#define pmruntime	Perl_pmruntime
#define pmtrans		Perl_pmtrans
#define pop_return	Perl_pop_return
#define pop_scope	Perl_pop_scope
#define pp_aassign	Perl_pp_aassign
#define pp_abs		Perl_pp_abs
#define pp_accept	Perl_pp_accept
#define pp_add		Perl_pp_add
#define pp_aelem	Perl_pp_aelem
#define pp_aelemfast	Perl_pp_aelemfast
#define pp_alarm	Perl_pp_alarm
#define pp_and		Perl_pp_and
#define pp_andassign	Perl_pp_andassign
#define pp_anoncode	Perl_pp_anoncode
#define pp_anonhash	Perl_pp_anonhash
#define pp_anonlist	Perl_pp_anonlist
#define pp_aslice	Perl_pp_aslice
#define pp_atan2	Perl_pp_atan2
#define pp_av2arylen	Perl_pp_av2arylen
#define pp_backtick	Perl_pp_backtick
#define pp_bind		Perl_pp_bind
#define pp_binmode	Perl_pp_binmode
#define pp_bit_and	Perl_pp_bit_and
#define pp_bit_or	Perl_pp_bit_or
#define pp_bit_xor	Perl_pp_bit_xor
#define pp_bless	Perl_pp_bless
#define pp_caller	Perl_pp_caller
#define pp_chdir	Perl_pp_chdir
#define pp_chmod	Perl_pp_chmod
#define pp_chomp	Perl_pp_chomp
#define pp_chop		Perl_pp_chop
#define pp_chown	Perl_pp_chown
#define pp_chr		Perl_pp_chr
#define pp_chroot	Perl_pp_chroot
#define pp_close	Perl_pp_close
#define pp_closedir	Perl_pp_closedir
#define pp_complement	Perl_pp_complement
#define pp_concat	Perl_pp_concat
#define pp_cond_expr	Perl_pp_cond_expr
#define pp_connect	Perl_pp_connect
#define pp_const	Perl_pp_const
#define pp_cos		Perl_pp_cos
#define pp_crypt	Perl_pp_crypt
#define pp_cswitch	Perl_pp_cswitch
#define pp_dbmclose	Perl_pp_dbmclose
#define pp_dbmopen	Perl_pp_dbmopen
#define pp_dbstate	Perl_pp_dbstate
#define pp_defined	Perl_pp_defined
#define pp_delete	Perl_pp_delete
#define pp_die		Perl_pp_die
#define pp_divide	Perl_pp_divide
#define pp_dofile	Perl_pp_dofile
#define pp_dump		Perl_pp_dump
#define pp_each		Perl_pp_each
#define pp_egrent	Perl_pp_egrent
#define pp_ehostent	Perl_pp_ehostent
#define pp_enetent	Perl_pp_enetent
#define pp_enter	Perl_pp_enter
#define pp_entereval	Perl_pp_entereval
#define pp_enteriter	Perl_pp_enteriter
#define pp_enterloop	Perl_pp_enterloop
#define pp_entersub	Perl_pp_entersub
#define pp_entersubr	Perl_pp_entersubr
#define pp_entertry	Perl_pp_entertry
#define pp_enterwrite	Perl_pp_enterwrite
#define pp_eof		Perl_pp_eof
#define pp_eprotoent	Perl_pp_eprotoent
#define pp_epwent	Perl_pp_epwent
#define pp_eq		Perl_pp_eq
#define pp_eservent	Perl_pp_eservent
#define pp_evalonce	Perl_pp_evalonce
#define pp_exec		Perl_pp_exec
#define pp_exists	Perl_pp_exists
#define pp_exit		Perl_pp_exit
#define pp_exp		Perl_pp_exp
#define pp_fcntl	Perl_pp_fcntl
#define pp_fileno	Perl_pp_fileno
#define pp_flip		Perl_pp_flip
#define pp_flock	Perl_pp_flock
#define pp_flop		Perl_pp_flop
#define pp_fork		Perl_pp_fork
#define pp_formline	Perl_pp_formline
#define pp_ftatime	Perl_pp_ftatime
#define pp_ftbinary	Perl_pp_ftbinary
#define pp_ftblk	Perl_pp_ftblk
#define pp_ftchr	Perl_pp_ftchr
#define pp_ftctime	Perl_pp_ftctime
#define pp_ftdir	Perl_pp_ftdir
#define pp_fteexec	Perl_pp_fteexec
#define pp_fteowned	Perl_pp_fteowned
#define pp_fteread	Perl_pp_fteread
#define pp_ftewrite	Perl_pp_ftewrite
#define pp_ftfile	Perl_pp_ftfile
#define pp_ftis		Perl_pp_ftis
#define pp_ftlink	Perl_pp_ftlink
#define pp_ftmtime	Perl_pp_ftmtime
#define pp_ftpipe	Perl_pp_ftpipe
#define pp_ftrexec	Perl_pp_ftrexec
#define pp_ftrowned	Perl_pp_ftrowned
#define pp_ftrread	Perl_pp_ftrread
#define pp_ftrwrite	Perl_pp_ftrwrite
#define pp_ftsgid	Perl_pp_ftsgid
#define pp_ftsize	Perl_pp_ftsize
#define pp_ftsock	Perl_pp_ftsock
#define pp_ftsuid	Perl_pp_ftsuid
#define pp_ftsvtx	Perl_pp_ftsvtx
#define pp_fttext	Perl_pp_fttext
#define pp_fttty	Perl_pp_fttty
#define pp_ftzero	Perl_pp_ftzero
#define pp_ge		Perl_pp_ge
#define pp_gelem	Perl_pp_gelem
#define pp_getc		Perl_pp_getc
#define pp_getlogin	Perl_pp_getlogin
#define pp_getpeername	Perl_pp_getpeername
#define pp_getpgrp	Perl_pp_getpgrp
#define pp_getppid	Perl_pp_getppid
#define pp_getpriority	Perl_pp_getpriority
#define pp_getsockname	Perl_pp_getsockname
#define pp_ggrent	Perl_pp_ggrent
#define pp_ggrgid	Perl_pp_ggrgid
#define pp_ggrnam	Perl_pp_ggrnam
#define pp_ghbyaddr	Perl_pp_ghbyaddr
#define pp_ghbyname	Perl_pp_ghbyname
#define pp_ghostent	Perl_pp_ghostent
#define pp_glob		Perl_pp_glob
#define pp_gmtime	Perl_pp_gmtime
#define pp_gnbyaddr	Perl_pp_gnbyaddr
#define pp_gnbyname	Perl_pp_gnbyname
#define pp_gnetent	Perl_pp_gnetent
#define pp_goto		Perl_pp_goto
#define pp_gpbyname	Perl_pp_gpbyname
#define pp_gpbynumber	Perl_pp_gpbynumber
#define pp_gprotoent	Perl_pp_gprotoent
#define pp_gpwent	Perl_pp_gpwent
#define pp_gpwnam	Perl_pp_gpwnam
#define pp_gpwuid	Perl_pp_gpwuid
#define pp_grepstart	Perl_pp_grepstart
#define pp_grepwhile	Perl_pp_grepwhile
#define pp_gsbyname	Perl_pp_gsbyname
#define pp_gsbyport	Perl_pp_gsbyport
#define pp_gservent	Perl_pp_gservent
#define pp_gsockopt	Perl_pp_gsockopt
#define pp_gt		Perl_pp_gt
#define pp_gv		Perl_pp_gv
#define pp_gvsv		Perl_pp_gvsv
#define pp_helem	Perl_pp_helem
#define pp_hex		Perl_pp_hex
#define pp_hslice	Perl_pp_hslice
#define pp_i_add	Perl_pp_i_add
#define pp_i_divide	Perl_pp_i_divide
#define pp_i_eq		Perl_pp_i_eq
#define pp_i_ge		Perl_pp_i_ge
#define pp_i_gt		Perl_pp_i_gt
#define pp_i_le		Perl_pp_i_le
#define pp_i_lt		Perl_pp_i_lt
#define pp_i_modulo	Perl_pp_i_modulo
#define pp_i_multiply	Perl_pp_i_multiply
#define pp_i_ncmp	Perl_pp_i_ncmp
#define pp_i_ne		Perl_pp_i_ne
#define pp_i_negate	Perl_pp_i_negate
#define pp_i_subtract	Perl_pp_i_subtract
#define pp_index	Perl_pp_index
#define pp_indread	Perl_pp_indread
#define pp_int		Perl_pp_int
#define pp_interp	Perl_pp_interp
#define pp_ioctl	Perl_pp_ioctl
#define pp_iter		Perl_pp_iter
#define pp_join		Perl_pp_join
#define pp_keys		Perl_pp_keys
#define pp_kill		Perl_pp_kill
#define pp_last		Perl_pp_last
#define pp_lc		Perl_pp_lc
#define pp_lcfirst	Perl_pp_lcfirst
#define pp_le		Perl_pp_le
#define pp_leave	Perl_pp_leave
#define pp_leaveeval	Perl_pp_leaveeval
#define pp_leaveloop	Perl_pp_leaveloop
#define pp_leavesub	Perl_pp_leavesub
#define pp_leavetry	Perl_pp_leavetry
#define pp_leavewrite	Perl_pp_leavewrite
#define pp_left_shift	Perl_pp_left_shift
#define pp_length	Perl_pp_length
#define pp_lineseq	Perl_pp_lineseq
#define pp_link		Perl_pp_link
#define pp_list		Perl_pp_list
#define pp_listen	Perl_pp_listen
#define pp_localtime	Perl_pp_localtime
#define pp_log		Perl_pp_log
#define pp_lslice	Perl_pp_lslice
#define pp_lstat	Perl_pp_lstat
#define pp_lt		Perl_pp_lt
#define pp_map		Perl_pp_map
#define pp_mapstart	Perl_pp_mapstart
#define pp_mapwhile	Perl_pp_mapwhile
#define pp_match	Perl_pp_match
#define pp_method	Perl_pp_method
#define pp_mkdir	Perl_pp_mkdir
#define pp_modulo	Perl_pp_modulo
#define pp_msgctl	Perl_pp_msgctl
#define pp_msgget	Perl_pp_msgget
#define pp_msgrcv	Perl_pp_msgrcv
#define pp_msgsnd	Perl_pp_msgsnd
#define pp_multiply	Perl_pp_multiply
#define pp_ncmp		Perl_pp_ncmp
#define pp_ne		Perl_pp_ne
#define pp_negate	Perl_pp_negate
#define pp_next		Perl_pp_next
#define pp_nextstate	Perl_pp_nextstate
#define pp_not		Perl_pp_not
#define pp_nswitch	Perl_pp_nswitch
#define pp_null		Perl_pp_null
#define pp_oct		Perl_pp_oct
#define pp_open		Perl_pp_open
#define pp_open_dir	Perl_pp_open_dir
#define pp_or		Perl_pp_or
#define pp_orassign	Perl_pp_orassign
#define pp_ord		Perl_pp_ord
#define pp_pack		Perl_pp_pack
#define pp_padany	Perl_pp_padany
#define pp_padav	Perl_pp_padav
#define pp_padhv	Perl_pp_padhv
#define pp_padsv	Perl_pp_padsv
#define pp_pipe_op	Perl_pp_pipe_op
#define pp_pop		Perl_pp_pop
#define pp_pos		Perl_pp_pos
#define pp_postdec	Perl_pp_postdec
#define pp_postinc	Perl_pp_postinc
#define pp_pow		Perl_pp_pow
#define pp_predec	Perl_pp_predec
#define pp_preinc	Perl_pp_preinc
#define pp_print	Perl_pp_print
#define pp_prototype	Perl_pp_prototype
#define pp_prtf		Perl_pp_prtf
#define pp_push		Perl_pp_push
#define pp_pushmark	Perl_pp_pushmark
#define pp_pushre	Perl_pp_pushre
#define pp_quotemeta	Perl_pp_quotemeta
#define pp_rand		Perl_pp_rand
#define pp_range	Perl_pp_range
#define pp_rcatline	Perl_pp_rcatline
#define pp_read		Perl_pp_read
#define pp_readdir	Perl_pp_readdir
#define pp_readline	Perl_pp_readline
#define pp_readlink	Perl_pp_readlink
#define pp_recv		Perl_pp_recv
#define pp_redo		Perl_pp_redo
#define pp_ref		Perl_pp_ref
#define pp_refgen	Perl_pp_refgen
#define pp_regcmaybe	Perl_pp_regcmaybe
#define pp_regcomp	Perl_pp_regcomp
#define pp_rename	Perl_pp_rename
#define pp_repeat	Perl_pp_repeat
#define pp_require	Perl_pp_require
#define pp_reset	Perl_pp_reset
#define pp_return	Perl_pp_return
#define pp_reverse	Perl_pp_reverse
#define pp_rewinddir	Perl_pp_rewinddir
#define pp_right_shift	Perl_pp_right_shift
#define pp_rindex	Perl_pp_rindex
#define pp_rmdir	Perl_pp_rmdir
#define pp_rv2av	Perl_pp_rv2av
#define pp_rv2cv	Perl_pp_rv2cv
#define pp_rv2gv	Perl_pp_rv2gv
#define pp_rv2hv	Perl_pp_rv2hv
#define pp_rv2sv	Perl_pp_rv2sv
#define pp_sassign	Perl_pp_sassign
#define pp_scalar	Perl_pp_scalar
#define pp_schomp	Perl_pp_schomp
#define pp_schop	Perl_pp_schop
#define pp_scmp		Perl_pp_scmp
#define pp_scope	Perl_pp_scope
#define pp_seek		Perl_pp_seek
#define pp_seekdir	Perl_pp_seekdir
#define pp_select	Perl_pp_select
#define pp_semctl	Perl_pp_semctl
#define pp_semget	Perl_pp_semget
#define pp_semop	Perl_pp_semop
#define pp_send		Perl_pp_send
#define pp_seq		Perl_pp_seq
#define pp_setpgrp	Perl_pp_setpgrp
#define pp_setpriority	Perl_pp_setpriority
#define pp_sge		Perl_pp_sge
#define pp_sgrent	Perl_pp_sgrent
#define pp_sgt		Perl_pp_sgt
#define pp_shift	Perl_pp_shift
#define pp_shmctl	Perl_pp_shmctl
#define pp_shmget	Perl_pp_shmget
#define pp_shmread	Perl_pp_shmread
#define pp_shmwrite	Perl_pp_shmwrite
#define pp_shostent	Perl_pp_shostent
#define pp_shutdown	Perl_pp_shutdown
#define pp_sin		Perl_pp_sin
#define pp_sle		Perl_pp_sle
#define pp_sleep	Perl_pp_sleep
#define pp_slt		Perl_pp_slt
#define pp_sne		Perl_pp_sne
#define pp_snetent	Perl_pp_snetent
#define pp_socket	Perl_pp_socket
#define pp_sockpair	Perl_pp_sockpair
#define pp_sort		Perl_pp_sort
#define pp_splice	Perl_pp_splice
#define pp_split	Perl_pp_split
#define pp_sprintf	Perl_pp_sprintf
#define pp_sprotoent	Perl_pp_sprotoent
#define pp_spwent	Perl_pp_spwent
#define pp_sqrt		Perl_pp_sqrt
#define pp_srand	Perl_pp_srand
#define pp_srefgen	Perl_pp_srefgen
#define pp_sselect	Perl_pp_sselect
#define pp_sservent	Perl_pp_sservent
#define pp_ssockopt	Perl_pp_ssockopt
#define pp_stat		Perl_pp_stat
#define pp_stringify	Perl_pp_stringify
#define pp_stub		Perl_pp_stub
#define pp_study	Perl_pp_study
#define pp_subst	Perl_pp_subst
#define pp_substcont	Perl_pp_substcont
#define pp_substr	Perl_pp_substr
#define pp_subtract	Perl_pp_subtract
#define pp_symlink	Perl_pp_symlink
#define pp_syscall	Perl_pp_syscall
#define pp_sysopen	Perl_pp_sysopen
#define pp_sysread	Perl_pp_sysread
#define pp_system	Perl_pp_system
#define pp_syswrite	Perl_pp_syswrite
#define pp_tell		Perl_pp_tell
#define pp_telldir	Perl_pp_telldir
#define pp_tie		Perl_pp_tie
#define pp_tied		Perl_pp_tied
#define pp_time		Perl_pp_time
#define pp_tms		Perl_pp_tms
#define pp_trans	Perl_pp_trans
#define pp_truncate	Perl_pp_truncate
#define pp_uc		Perl_pp_uc
#define pp_ucfirst	Perl_pp_ucfirst
#define pp_umask	Perl_pp_umask
#define pp_undef	Perl_pp_undef
#define pp_unlink	Perl_pp_unlink
#define pp_unpack	Perl_pp_unpack
#define pp_unshift	Perl_pp_unshift
#define pp_unstack	Perl_pp_unstack
#define pp_untie	Perl_pp_untie
#define pp_utime	Perl_pp_utime
#define pp_values	Perl_pp_values
#define pp_vec		Perl_pp_vec
#define pp_wait		Perl_pp_wait
#define pp_waitpid	Perl_pp_waitpid
#define pp_wantarray	Perl_pp_wantarray
#define pp_warn		Perl_pp_warn
#define pp_xor		Perl_pp_xor
#define pregcomp	Perl_pregcomp
#define pregexec	Perl_pregexec
#define pregfree	Perl_pregfree
#define prepend_elem	Perl_prepend_elem
#define push_return	Perl_push_return
#define push_scope	Perl_push_scope
#define q		Perl_q
#define ref		Perl_ref
#define refkids		Perl_refkids
#define regdump		Perl_regdump
#define regnext		Perl_regnext
#define regprop		Perl_regprop
#define repeatcpy	Perl_repeatcpy
#define rninstr		Perl_rninstr
#define runops		Perl_runops
#define same_dirent	Perl_same_dirent
#define save_I32	Perl_save_I32
#define save_aptr	Perl_save_aptr
#define save_ary	Perl_save_ary
#define save_clearsv	Perl_save_clearsv
#define save_delete	Perl_save_delete
#define save_destructor	Perl_save_destructor
#define save_freeop	Perl_save_freeop
#define save_freepv	Perl_save_freepv
#define save_freesv	Perl_save_freesv
#define save_hash	Perl_save_hash
#define save_hptr	Perl_save_hptr
#define save_int	Perl_save_int
#define save_item	Perl_save_item
#define save_list	Perl_save_list
#define save_long	Perl_save_long
#define save_nogv	Perl_save_nogv
#define save_pptr	Perl_save_pptr
#define save_scalar	Perl_save_scalar
#define save_sptr	Perl_save_sptr
#define save_svref	Perl_save_svref
#define savepv		Perl_savepv
#define savepvn		Perl_savepvn
#define savestack_grow	Perl_savestack_grow
#define sawparens	Perl_sawparens
#define scalar		Perl_scalar
#define scalarkids	Perl_scalarkids
#define scalarseq	Perl_scalarseq
#define scalarvoid	Perl_scalarvoid
#define scan_const	Perl_scan_const
#define scan_formline	Perl_scan_formline
#define scan_heredoc	Perl_scan_heredoc
#define scan_hex	Perl_scan_hex
#define scan_ident	Perl_scan_ident
#define scan_inputsymbol	Perl_scan_inputsymbol
#define scan_num	Perl_scan_num
#define scan_oct	Perl_scan_oct
#define scan_pat	Perl_scan_pat
#define scan_prefix	Perl_scan_prefix
#define scan_str	Perl_scan_str
#define scan_subst	Perl_scan_subst
#define scan_trans	Perl_scan_trans
#define scan_word	Perl_scan_word
#define scope		Perl_scope
#define screaminstr	Perl_screaminstr
#define setdefout	Perl_setdefout
#define setenv_getix	Perl_setenv_getix
#define sharepvn	Perl_sharepvn
#define sighandler	Perl_sighandler
#define skipspace	Perl_skipspace
#define stack_grow	Perl_stack_grow
#define start_subparse	Perl_start_subparse
#define sublex_done	Perl_sublex_done
#define sublex_start	Perl_sublex_start
#define sv_2bool	Perl_sv_2bool
#define sv_2cv		Perl_sv_2cv
#define sv_2io		Perl_sv_2io
#define sv_2iv		Perl_sv_2iv
#define sv_2mortal	Perl_sv_2mortal
#define sv_2nv		Perl_sv_2nv
#define sv_2pv		Perl_sv_2pv
#define sv_add_arena	Perl_sv_add_arena
#define sv_backoff	Perl_sv_backoff
#define sv_bless	Perl_sv_bless
#define sv_catpv	Perl_sv_catpv
#define sv_catpvn	Perl_sv_catpvn
#define sv_catsv	Perl_sv_catsv
#define sv_chop		Perl_sv_chop
#define sv_clean_all	Perl_sv_clean_all
#define sv_clean_objs	Perl_sv_clean_objs
#define sv_clear	Perl_sv_clear
#define sv_cmp		Perl_sv_cmp
#define sv_dec		Perl_sv_dec
#define sv_dump		Perl_sv_dump
#define sv_eq		Perl_sv_eq
#define sv_free		Perl_sv_free
#define sv_free_arenas	Perl_sv_free_arenas
#define sv_gets		Perl_sv_gets
#define sv_grow		Perl_sv_grow
#define sv_inc		Perl_sv_inc
#define sv_insert	Perl_sv_insert
#define sv_isa		Perl_sv_isa
#define sv_isobject	Perl_sv_isobject
#define sv_len		Perl_sv_len
#define sv_magic	Perl_sv_magic
#define sv_mortalcopy	Perl_sv_mortalcopy
#define sv_newmortal	Perl_sv_newmortal
#define sv_newref	Perl_sv_newref
#define sv_peek		Perl_sv_peek
#define sv_pvn_force	Perl_sv_pvn_force
#define sv_ref		Perl_sv_ref
#define sv_reftype	Perl_sv_reftype
#define sv_replace	Perl_sv_replace
#define sv_report_used	Perl_sv_report_used
#define sv_reset	Perl_sv_reset
#define sv_setiv	Perl_sv_setiv
#define sv_setnv	Perl_sv_setnv
#define sv_setptrobj	Perl_sv_setptrobj
#define sv_setpv	Perl_sv_setpv
#define sv_setpvn	Perl_sv_setpvn
#define sv_setref_iv	Perl_sv_setref_iv
#define sv_setref_nv	Perl_sv_setref_nv
#define sv_setref_pv	Perl_sv_setref_pv
#define sv_setref_pvn	Perl_sv_setref_pvn
#define sv_setsv	Perl_sv_setsv
#define sv_unmagic	Perl_sv_unmagic
#define sv_unref	Perl_sv_unref
#define sv_upgrade	Perl_sv_upgrade
#define sv_usepvn	Perl_sv_usepvn
#define taint_env	Perl_taint_env
#define taint_not	Perl_taint_not
#define taint_proper	Perl_taint_proper
#define too_few_arguments	Perl_too_few_arguments
#define too_many_arguments	Perl_too_many_arguments
#define unlnk		Perl_unlnk
#define unsharepvn	Perl_unsharepvn
#define utilize		Perl_utilize
#define wait4pid	Perl_wait4pid
#define warn		Perl_warn
#define watch		Perl_watch
#define whichsig	Perl_whichsig
#define xiv_arenaroot	Perl_xiv_arenaroot
#define xiv_root	Perl_xiv_root
#define xnv_root	Perl_xnv_root
#define xpv_root	Perl_xpv_root
#define xrv_root	Perl_xrv_root
#define yyerror		Perl_yyerror
#define yylex		Perl_yylex
#define yyparse		Perl_yyparse
#define yywarn		Perl_yywarn

#endif /* EMBED */

/* Put interpreter specific symbols into a struct? */

#ifdef MULTIPLICITY

/* Undefine symbols that were defined by EMBED. Somewhat ugly */

#undef curcop
#undef curcopdb
#undef envgv
#undef siggv
#undef tainting

#define Argv		(curinterp->IArgv)
#define Cmd		(curinterp->ICmd)
#define DBgv		(curinterp->IDBgv)
#define DBline		(curinterp->IDBline)
#define DBsignal	(curinterp->IDBsignal)
#define DBsingle	(curinterp->IDBsingle)
#define DBsub		(curinterp->IDBsub)
#define DBtrace		(curinterp->IDBtrace)
#define allgvs		(curinterp->Iallgvs)
#define ampergv		(curinterp->Iampergv)
#define argvgv		(curinterp->Iargvgv)
#define argvoutgv	(curinterp->Iargvoutgv)
#define basetime	(curinterp->Ibasetime)
#define beginav		(curinterp->Ibeginav)
#define bodytarget	(curinterp->Ibodytarget)
#define cddir		(curinterp->Icddir)
#define chopset		(curinterp->Ichopset)
#define copline		(curinterp->Icopline)
#define curblock	(curinterp->Icurblock)
#define curcop		(curinterp->Icurcop)
#define curcopdb	(curinterp->Icurcopdb)
#define curcsv		(curinterp->Icurcsv)
#define curpm		(curinterp->Icurpm)
#define curstack	(curinterp->Icurstack)
#define curstash	(curinterp->Icurstash)
#define curstname	(curinterp->Icurstname)
#define cxstack		(curinterp->Icxstack)
#define cxstack_ix	(curinterp->Icxstack_ix)
#define cxstack_max	(curinterp->Icxstack_max)
#define dbargs		(curinterp->Idbargs)
#define debdelim	(curinterp->Idebdelim)
#define debname		(curinterp->Idebname)
#define debstash	(curinterp->Idebstash)
#define defgv		(curinterp->Idefgv)
#define defoutgv	(curinterp->Idefoutgv)
#define defstash	(curinterp->Idefstash)
#define delaymagic	(curinterp->Idelaymagic)
#define diehook		(curinterp->Idiehook)
#define dirty		(curinterp->Idirty)
#define dlevel		(curinterp->Idlevel)
#define dlmax		(curinterp->Idlmax)
#define doextract	(curinterp->Idoextract)
#define doswitches	(curinterp->Idoswitches)
#define dowarn		(curinterp->Idowarn)
#define dumplvl		(curinterp->Idumplvl)
#define e_fp		(curinterp->Ie_fp)
#define e_tmpname	(curinterp->Ie_tmpname)
#define endav		(curinterp->Iendav)
#define envgv		(curinterp->Ienvgv)
#define errgv		(curinterp->Ierrgv)
#define eval_root	(curinterp->Ieval_root)
#define eval_start	(curinterp->Ieval_start)
#define fdpid		(curinterp->Ifdpid)
#define filemode	(curinterp->Ifilemode)
#define firstgv		(curinterp->Ifirstgv)
#define forkprocess	(curinterp->Iforkprocess)
#define formfeed	(curinterp->Iformfeed)
#define formtarget	(curinterp->Iformtarget)
#define gensym		(curinterp->Igensym)
#define in_eval		(curinterp->Iin_eval)
#define incgv		(curinterp->Iincgv)
#define inplace		(curinterp->Iinplace)
#define last_in_gv	(curinterp->Ilast_in_gv)
#define lastfd		(curinterp->Ilastfd)
#define lastretstr	(curinterp->Ilastretstr)
#define lastscream	(curinterp->Ilastscream)
#define lastsize	(curinterp->Ilastsize)
#define lastspbase	(curinterp->Ilastspbase)
#define laststatval	(curinterp->Ilaststatval)
#define laststype	(curinterp->Ilaststype)
#define leftgv		(curinterp->Ileftgv)
#define lineary		(curinterp->Ilineary)
#define localizing	(curinterp->Ilocalizing)
#define localpatches	(curinterp->Ilocalpatches)
#define main_cv		(curinterp->Imain_cv)
#define main_root	(curinterp->Imain_root)
#define main_start	(curinterp->Imain_start)
#define mainstack	(curinterp->Imainstack)
#define maxscream	(curinterp->Imaxscream)
#define maxsysfd	(curinterp->Imaxsysfd)
#define minus_F		(curinterp->Iminus_F)
#define minus_a		(curinterp->Iminus_a)
#define minus_c		(curinterp->Iminus_c)
#define minus_l		(curinterp->Iminus_l)
#define minus_n		(curinterp->Iminus_n)
#define minus_p		(curinterp->Iminus_p)
#define multiline	(curinterp->Imultiline)
#define mystack_base	(curinterp->Imystack_base)
#define mystack_mark	(curinterp->Imystack_mark)
#define mystack_max	(curinterp->Imystack_max)
#define mystack_sp	(curinterp->Imystack_sp)
#define mystrk		(curinterp->Imystrk)
#define nrs		(curinterp->Inrs)
#define ofmt		(curinterp->Iofmt)
#define ofs		(curinterp->Iofs)
#define ofslen		(curinterp->Iofslen)
#define oldlastpm	(curinterp->Ioldlastpm)
#define oldname		(curinterp->Ioldname)
#define op_mask		(curinterp->Iop_mask)
#define origargc	(curinterp->Iorigargc)
#define origargv	(curinterp->Iorigargv)
#define origfilename	(curinterp->Iorigfilename)
#define ors		(curinterp->Iors)
#define orslen		(curinterp->Iorslen)
#define parsehook	(curinterp->Iparsehook)
#define patchlevel	(curinterp->Ipatchlevel)
#define perldb		(curinterp->Iperldb)
#define perl_destruct_level	(curinterp->Iperl_destruct_level)
#define pidstatus	(curinterp->Ipidstatus)
#define preambled	(curinterp->Ipreambled)
#define preambleav	(curinterp->Ipreambleav)
#define preprocess	(curinterp->Ipreprocess)
#define restartop	(curinterp->Irestartop)
#define rightgv		(curinterp->Irightgv)
#define rs		(curinterp->Irs)
#define runlevel	(curinterp->Irunlevel)
#define sawampersand	(curinterp->Isawampersand)
#define sawi		(curinterp->Isawi)
#define sawstudy	(curinterp->Isawstudy)
#define sawvec		(curinterp->Isawvec)
#define screamfirst	(curinterp->Iscreamfirst)
#define screamnext	(curinterp->Iscreamnext)
#define secondgv	(curinterp->Isecondgv)
#define siggv		(curinterp->Isiggv)
#define signalstack	(curinterp->Isignalstack)
#define sortcop		(curinterp->Isortcop)
#define sortstack	(curinterp->Isortstack)
#define sortstash	(curinterp->Isortstash)
#define splitstr	(curinterp->Isplitstr)
#define statcache	(curinterp->Istatcache)
#define statgv		(curinterp->Istatgv)
#define statname	(curinterp->Istatname)
#define statusvalue	(curinterp->Istatusvalue)
#define stdingv		(curinterp->Istdingv)
#define strchop		(curinterp->Istrchop)
#define strtab		(curinterp->Istrtab)
#define sv_count	(curinterp->Isv_count)
#define sv_objcount	(curinterp->Isv_objcount)
#define sv_root		(curinterp->Isv_root)
#define sv_arenaroot	(curinterp->Isv_arenaroot)
#define tainted		(curinterp->Itainted)
#define tainting	(curinterp->Itainting)
#define tmps_floor	(curinterp->Itmps_floor)
#define tmps_ix		(curinterp->Itmps_ix)
#define tmps_max	(curinterp->Itmps_max)
#define tmps_stack	(curinterp->Itmps_stack)
#define top_env		(curinterp->Itop_env)
#define toptarget	(curinterp->Itoptarget)
#define unsafe		(curinterp->Iunsafe)
#define warnhook	(curinterp->Iwarnhook)

#else	/* not multiple, so translate interpreter symbols the other way... */

#define IArgv		Argv
#define ICmd		Cmd
#define IDBgv		DBgv
#define IDBline		DBline
#define IDBsignal	DBsignal
#define IDBsingle	DBsingle
#define IDBsub		DBsub
#define IDBtrace	DBtrace
#define Iallgvs		allgvs
#define Iampergv	ampergv
#define Iargvgv		argvgv
#define Iargvoutgv	argvoutgv
#define Ibasetime	basetime
#define Ibeginav	beginav
#define Ibodytarget	bodytarget
#define Icddir		cddir
#define Ichopset	chopset
#define Icopline	copline
#define Icurblock	curblock
#define Icurcop		curcop
#define Icurcopdb	curcopdb
#define Icurcsv		curcsv
#define Icurpm		curpm
#define Icurstack	curstack
#define Icurstash	curstash
#define Icurstname	curstname
#define Icxstack	cxstack
#define Icxstack_ix	cxstack_ix
#define Icxstack_max	cxstack_max
#define Idbargs		dbargs
#define Idebdelim	debdelim
#define Idebname	debname
#define Idebstash	debstash
#define Idefgv		defgv
#define Idefoutgv	defoutgv
#define Idefstash	defstash
#define Idelaymagic	delaymagic
#define Idiehook	diehook
#define Idirty		dirty
#define Idlevel		dlevel
#define Idlmax		dlmax
#define Idoextract	doextract
#define Idoswitches	doswitches
#define Idowarn		dowarn
#define Idumplvl	dumplvl
#define Ie_fp		e_fp
#define Ie_tmpname	e_tmpname
#define Iendav		endav
#define Ienvgv		envgv
#define Ierrgv		errgv
#define Ieval_root	eval_root
#define Ieval_start	eval_start
#define Ifdpid		fdpid
#define Ifilemode	filemode
#define Ifirstgv	firstgv
#define Iforkprocess	forkprocess
#define Iformfeed	formfeed
#define Iformtarget	formtarget
#define Igensym		gensym
#define Iin_eval	in_eval
#define Iincgv		incgv
#define Iinplace	inplace
#define Ilast_in_gv	last_in_gv
#define Ilastfd		lastfd
#define Ilastretstr	lastretstr
#define Ilastscream	lastscream
#define Ilastsize	lastsize
#define Ilastspbase	lastspbase
#define Ilaststatval	laststatval
#define Ilaststype	laststype
#define Ileftgv		leftgv
#define Ilineary	lineary
#define Ilocalizing	localizing
#define Ilocalpatches	localpatches
#define Imain_cv	main_cv
#define Imain_root	main_root
#define Imain_start	main_start
#define Imainstack	mainstack
#define Imaxscream	maxscream
#define Imaxsysfd	maxsysfd
#define Iminus_F	minus_F
#define Iminus_a	minus_a
#define Iminus_c	minus_c
#define Iminus_l	minus_l
#define Iminus_n	minus_n
#define Iminus_p	minus_p
#define Imultiline	multiline
#define Imystack_base	mystack_base
#define Imystack_mark	mystack_mark
#define Imystack_max	mystack_max
#define Imystack_sp	mystack_sp
#define Imystrk		mystrk
#define Inrs		nrs
#define Iofmt		ofmt
#define Iofs		ofs
#define Iofslen		ofslen
#define Ioldlastpm	oldlastpm
#define Ioldname	oldname
#define Iop_mask	op_mask
#define Iorigargc	origargc
#define Iorigargv	origargv
#define Iorigfilename	origfilename
#define Iors		ors
#define Iorslen		orslen
#define Iparsehook	parsehook
#define Ipatchlevel	patchlevel
#define Iperldb		perldb
#define Iperl_destruct_level	perl_destruct_level
#define Ipidstatus	pidstatus
#define Ipreambled	preambled
#define Ipreambleav	preambleav
#define Ipreprocess	preprocess
#define Irestartop	restartop
#define Irightgv	rightgv
#define Irs		rs
#define Irunlevel	runlevel
#define Isawampersand	sawampersand
#define Isawi		sawi
#define Isawstudy	sawstudy
#define Isawvec		sawvec
#define Iscreamfirst	screamfirst
#define Iscreamnext	screamnext
#define Isecondgv	secondgv
#define Isiggv		siggv
#define Isignalstack	signalstack
#define Isortcop	sortcop
#define Isortstack	sortstack
#define Isortstash	sortstash
#define Isplitstr	splitstr
#define Istatcache	statcache
#define Istatgv		statgv
#define Istatname	statname
#define Istatusvalue	statusvalue
#define Istdingv	stdingv
#define Istrchop	strchop
#define Istrtab		strtab
#define Isv_count	sv_count
#define Isv_objcount	sv_objcount
#define Isv_root	sv_root
#define Isv_arenaroot	sv_arenaroot
#define Itainted	tainted
#define Itainting	tainting
#define Itmps_floor	tmps_floor
#define Itmps_ix	tmps_ix
#define Itmps_max	tmps_max
#define Itmps_stack	tmps_stack
#define Itop_env	top_env
#define Itoptarget	toptarget
#define Iunsafe		unsafe
#define Iwarnhook	warnhook

#endif /* MULTIPLICITY */