⚝
One Hat Cyber Team
⚝
Your IP:
216.73.216.19
Server IP:
178.33.27.10
Server:
Linux cpanel.dev-unit.com 3.10.0-1160.108.1.el7.x86_64 #1 SMP Thu Jan 25 16:17:31 UTC 2024 x86_64
Server Software:
Apache/2.4.57 (Unix) OpenSSL/1.0.2k-fips
PHP Version:
8.2.11
Buat File
|
Buat Folder
Eksekusi
Dir :
~
/
proc
/
self
/
root
/
lib64
/
guile
/
2.0
/
ccache
/
scripts
/
View File Name :
snarf-check-and-output-texi.go
GOOF----LE-8-2.0#K ] � 4 h� ] g guile� � g define-module*� � � g scripts� g snarf-check-and-output-texi� � g filenameS� f 'scripts/snarf-check-and-output-texi.scm� g importsS� g ice-9� g streams� � � g match� � � � g exportsS� � g set-current-module� � � g %include-in-guild-list� f 8Transform snarfed .doc files into texinfo documentation.� g %summary� g make-syntax-transformer� � � g when� g macro� !g $sc-dispatch� "! � #! � $g _� %g any� &$%�� 'g syntax->datum� (' � )' � *g datum->syntax� +* � ,* � -g if� .g begin� /g syntax-violation� 0/ � 1/ � 2f -source expression failed to match any pattern� 3g unless� 4g not� 5g *manual-flag*� 6g member� 7f --manual� 8g process-stream� 9g current-input-port� :g stream-null?� ;g stream-car� <g snarf_cookie� =g dispatch-top-cookie� >g stream-cdr� ?g stream-map� @g string?� Ag string� Bg int_hex� Cg int� Dg string->number� Eg int_oct� Fg int_dec� Gg id� Hg string->symbol� Ig make-stream� Jg eol� Kg port->stream� Lg read� Mg error� Ng syntax� Of premature end of file� Pg brace_open� Qg consume-multiline� Rg consume-upto-cookie� Sg process-singleline� Tf *premature end of file in directive context� Ug reverse!� Vg begin-multiline� Wf *premature end of file in multiline context� Xg brace_close� Yg end-multiline� Zg process-multiline-directive� [g *file*� \g *line*� ]g *c-function-name*� ^g *function-name*� _g *snarf-type*� `g *args*� ag *sig*� bg *docstring*� cf @deffnx {Scheme Procedure} � dg *primitive-deffnx-signature*� eg string-length� fg *primitive-deffnx-sig-length*� gg register� hg length� ig format� jf ;~A:~A: ~A's C implementation takes ~A args (should take ~A)� kg with-output-to-string� lf ~A� mf ~A� nf [~A� of . ~A� pg primitive� qf @deffnx {C Function} ~A (� rf , ~A� sf ) � tf ~A � uf @c snarfed from ~A:~A � vf @deffn {Scheme Procedure} ~A � wg string=?� xg substring� yg display� zf � {f @end deffn � |f � }g string-append� ~f @� f @@� �g texi-quote� �g SCM� �G��� �f invalid argument syntax: ~A� �g map� �g cdr� �g comma� ����� �g paren_close� ����� �g argsig� �f unknown doc attribute: ~A� �g arglist� �g paren_open� ����� �f invalid arglist syntax: ~A� �g void� �G��� �g location� �g hash� �g type� �g fname� �g reverse� �� � �� � �g cname� �g symbol->string� �f unknown doc attribute syntax: ~A� �g argpos� �G��� �g list-index� �f 9~A:~A: wrong position for argument ~A: ~A (should be ~A) � �g current-error-port� �f unknown check: ~A� �g main�C 5 h= Q ]4 5 4 > "