sogaiu

freebsd

NCCS

#define	NCCS		20

tcflag_t and friends

sogaiu

* account settings
  * info leakage prevention
* browser settings
  * info leakage prevention

sogaiu

$ janet
Janet 1.35.2-771956b5 linux/x64/gcc - '(doc)' for help

repl:1:> (disasm (fn [] (printf "%j" [:a])))

{:arity 0
 :bytecode @[(ldc 0 0) (ldc 1 1) (push2 0 1) (ldc 0 2) (tcall 0)]
 :constants @["%j" (:a) <cfunction printf>]
 :defs @[]
 :environments @[]

sogaiu

https://lists.gnu.org/archive/html/emacs-orgmode/2016-04/msg00277.html

try typing single quote followed by text to match a link to follow...

sogaiu

• https://stackoverflow.com/questions/980255/should-a-directory-path-variable-end-with-a-trailing-slash
• https://en.wikipedia.org/wiki/Talk:Path_(computing)#Filepath_Misconceptions
• https://unix.stackexchange.com/questions/50499/when-should-i-use-a-trailing-slash-on-a-directory
• https://unix.stackexchange.com/questions/177765/difference-between-including-at-the-end-of-a-directory-path-and-and-omitting-i

sogaiu

$ janet
Janet 1.35.2-771956b5 linux/x64/gcc - '(doc)' for help

repl:1:> (import spork/path)
@{_ @{:value <cycle 0>} path/abspath @{:private true} path/abspath? @{:private true} path/basename @{:private true} path/delim @{:private true} path/dirname @{:private true} path/ext @{:private true} path/join @{:private true} path/normalize @{:private true} path/parts @{:private true} path/posix/abspath @{:private true} path/posix/abspath? @{:private true} path/posix/basename @{:private true} path/posix/delim @{:private true} path/posix/dirname @{:private true} path/posix/ext @{:private true} path/posix/join @{:private true} path/posix/normalize @{:private true} path/posix/parts @{:private true} path/posix/relpath @{:private true} path/posix/sep @{:private true} path/relpath @{:private true} path/sep @{:private true} path/win32/abspath @{:private true} path/win32/abspath? @{:private true} path/win32/basename @{:private true} path/win32/delim @{:private true} path/win32/dirname @{:private true} path/win32/ext @{:priva

sogaiu

# based on code from spork/path by bakpakin

# https://en.wikipedia.org/wiki/Path_(computing)

# unclear whether unc paths should be covered or not

(defn abspath?
  [path &opt doze?]
  (default doze? (= :windows (os/which)))
  (if doze?

sogaiu

$ ./arnie bench `which janet`
@{"/home/user/.local/bin/janet" @{ "benchmarks/binarytrees/binarytrees1.janet" @[(0 1721265038.71622 1721265038.71982)] "benchmarks/fannkuch/fannkuch1.janet" @[(0 1721265023.07978 1721265029.87274)] "benchmarks/fannkuch/fannkuch2-in.janet" @[(0 1721265013.3833 1721265018.01945)] "benchmarks/fannkuch/fannkuch2.janet" @[(0 1721265032.8012 1721265038.71622)] "benchmarks/fannkuch/fannkuch2b.janet" @[(0 1721265022.04114 1721265022.04885)] "benchmarks/fannkuch/fannkuch3.janet" @[(0 1721265029.87276 1721265032.80118)] "benchmarks/fannkuch/fannkuch4-bakpakin.janet" @[(0 1721265009.56453 1721265013.38328)] "benchmarks/fannkuch/fannkuch4-parallel.janet" @[(0 1721265022.04885 1721265023.07976)] "benchmarks/fannkuch/fannkuch4.janet" @[(0 1721265018.01946 1721265022.04113)] "benchmarks/fannkuch/fannkuch5.janet" @[(0 1721265007.22588 1721265009.56453)] "benchmarks/knucleotide/knucleotide.janet" @[(0 1721265038.96106 1721265039.14689)] "benchmarks/knucleotide/knucleotide2.janet" @[(0 1721265038

sogaiu

$ janet runbench.janet benchmark_runs/bench_twojanets.jdn > results
name,janet,janet-bt
fannkuch,3.51,3.52
binarytrees,79.5,76.99
knucleotide,178.42,177.57
nbody,15.39,15.68
reverse-complement,35.59,35.72
pidigits,4.97,4.97
regexredux,14.11,14.25

sogaiu

$ janet runbench.janet benchmark_runs/bench_pylua.jdn >t1
name,janet,python,lua
fannkuch,3.51,3.66,1.42
binarytrees,72.4,72.73,95.63
knucleotide,175.27,163.34,62.53
nbody,16.85,22.13,8.56
reverse-complement,35.49,8.02,36.29
pidigits,5.21,3.28,nan
regexredux,14.37,10.82,nan