Warning: this is an htmlized version!
The original is here, and the conversion rules are here. |
-- This file: -- http://anggtwu.net/LUA/Clhs1.lua.html -- http://anggtwu.net/LUA/Clhs1.lua -- (find-angg "LUA/Clhs1.lua") -- Author: Eduardo Ochs <eduardoochs@gmail.com> -- -- (defun e () (interactive) (find-angg "LUA/Clhs1.lua")) -- (find-es "lisp" "format") foo = function (fname) local fnamestem = fname:gsub(".htm", "") local bigstr = ee_readfile(fname) local s = bigstr:match("<H2>(.-)</H2>") local s0 = bitrim(s) print(format("# (find-clhsdoc \"Body/%s\" \"%s\")", fnamestem, s0)) end --[[ * (eepitch-shell) * (eepitch-kill) * (eepitch-shell) # (find-fline "/usr/share/doc/hyperspec/Body/") cd /usr/share/doc/hyperspec/Body/ ls 22_c* | tee /tmp/o lynxdump0 () { lynx -dump -width=80 $1; } lynxdump () { echo "\n\n\n\n--- $1: ---"; lynxdump0 $1; } for i in 22*.htm; do lynxdump $i; done > /tmp/o2 * (eepitch-lua51) * (eepitch-kill) * (eepitch-lua51) dofile "Clhs1.lua" chdir "/usr/share/doc/hyperspec/Body/" fnames = VTable(split(ee_readfile "/tmp/o")) = fnames foo("22_cc.htm") for _,fname in ipairs(fnames) do foo(fname) end --]] -- (find-clhsdoc "Body/22_c" "22.3 Formatted Output") -- (find-clhsdoc "Body/22_ca" "22.3.1 FORMAT Basic Output") -- (find-clhsdoc "Body/22_caa" "22.3.1.1 Tilde C: Character") -- (find-clhsdoc "Body/22_cab" "22.3.1.2 Tilde Percent: Newline") -- (find-clhsdoc "Body/22_cac" "22.3.1.3 Tilde Ampersand: Fresh-Line") -- (find-clhsdoc "Body/22_cad" "22.3.1.4 Tilde Vertical-Bar: Page") -- (find-clhsdoc "Body/22_cae" "22.3.1.5 Tilde Tilde: Tilde") -- (find-clhsdoc "Body/22_cb" "22.3.2 FORMAT Radix Control") -- (find-clhsdoc "Body/22_cba" "22.3.2.1 Tilde R: Radix") -- (find-clhsdoc "Body/22_cbb" "22.3.2.2 Tilde D: Decimal") -- (find-clhsdoc "Body/22_cbc" "22.3.2.3 Tilde B: Binary") -- (find-clhsdoc "Body/22_cbd" "22.3.2.4 Tilde O: Octal") -- (find-clhsdoc "Body/22_cbe" "22.3.2.5 Tilde X: Hexadecimal") -- (find-clhsdoc "Body/22_cc" "22.3.3 FORMAT Floating-Point Printers") -- (find-clhsdoc "Body/22_cca" "22.3.3.1 Tilde F: Fixed-Format Floating-Point") -- (find-clhsdoc "Body/22_ccb" "22.3.3.2 Tilde E: Exponential Floating-Point") -- (find-clhsdoc "Body/22_ccc" "22.3.3.3 Tilde G: General Floating-Point") -- (find-clhsdoc "Body/22_ccd" "22.3.3.4 Tilde Dollarsign: Monetary Floating-Point") -- (find-clhsdoc "Body/22_cd" "22.3.4 FORMAT Printer Operations") -- (find-clhsdoc "Body/22_cda" "22.3.4.1 Tilde A: Aesthetic") -- (find-clhsdoc "Body/22_cda" "22.3.4.1 Tilde A: Aesthetic" "~mincol,colinc,minpad,padcharA") -- (find-clhsdoc "Body/22_cdb" "22.3.4.2 Tilde S: Standard") -- (find-clhsdoc "Body/22_cdc" "22.3.4.3 Tilde W: Write") -- (find-clhsdoc "Body/22_ce" "22.3.5 FORMAT Pretty Printer Operations") -- (find-clhsdoc "Body/22_cea" "22.3.5.1 Tilde Underscore: Conditional Newline") -- (find-clhsdoc "Body/22_ceb" "22.3.5.2 Tilde Less-Than-Sign: Logical Block") -- (find-clhsdoc "Body/22_cec" "22.3.5.3 Tilde I: Indent") -- (find-clhsdoc "Body/22_ced" "22.3.5.4 Tilde Slash: Call Function") -- (find-clhsdoc "Body/22_cf" "22.3.6 FORMAT Layout Control") -- (find-clhsdoc "Body/22_cfa" "22.3.6.1 Tilde T: Tabulate") -- (find-clhsdoc "Body/22_cfb" "22.3.6.2 Tilde Less-Than-Sign: Justification") -- (find-clhsdoc "Body/22_cfc" "22.3.6.3 Tilde Greater-Than-Sign: End of Justification") -- (find-clhsdoc "Body/22_cg" "22.3.7 FORMAT Control-Flow Operations") -- (find-clhsdoc "Body/22_cga" "22.3.7.1 Tilde Asterisk: Go-To") -- (find-clhsdoc "Body/22_cgb" "22.3.7.2 Tilde Left-Bracket: Conditional Expression") -- (find-clhsdoc "Body/22_cgc" "22.3.7.3 Tilde Right-Bracket: End of Conditional Expression") -- (find-clhsdoc "Body/22_cgd" "22.3.7.4 Tilde Left-Brace: Iteration") -- (find-clhsdoc "Body/22_cge" "22.3.7.5 Tilde Right-Brace: End of Iteration") -- (find-clhsdoc "Body/22_cgf" "22.3.7.6 Tilde Question-Mark: Recursive Processing") -- (find-clhsdoc "Body/22_ch" "22.3.8 FORMAT Miscellaneous Operations") -- (find-clhsdoc "Body/22_cha" "22.3.8.1 Tilde Left-Paren: Case Conversion") -- (find-clhsdoc "Body/22_chb" "22.3.8.2 Tilde Right-Paren: End of Case Conversion") -- (find-clhsdoc "Body/22_chc" "22.3.8.3 Tilde P: Plural") -- (find-clhsdoc "Body/22_ci" "22.3.9 FORMAT Miscellaneous Pseudo-Operations") -- (find-clhsdoc "Body/22_cia" "22.3.9.1 Tilde Semicolon: Clause Separator") -- (find-clhsdoc "Body/22_cib" "22.3.9.2 Tilde Circumflex: Escape Upward") -- (find-clhsdoc "Body/22_cic" "22.3.9.3 Tilde Newline: Ignored Newline") -- (find-clhsdoc "Body/22_cj" "22.3.10 Additional Information about FORMAT Operations") -- (find-clhsdoc "Body/22_cja" "22.3.10.1 Nesting of FORMAT Operations") -- (find-clhsdoc "Body/22_cjb" "22.3.10.2 Missing and Additional FORMAT Arguments") -- (find-clhsdoc "Body/22_cjc" "22.3.10.3 Additional FORMAT Parameters") -- (find-clhsdoc "Body/22_cjd" "22.3.10.4 Undefined FORMAT Modifier Combinations") -- (find-clhsdoc "Body/22_ck" "22.3.11 Examples of FORMAT") -- (find-clhsdoc "Body/22_cl" "22.3.12 Notes about FORMAT") -- Local Variables: -- coding: utf-8-unix -- End: