Skip to content

Instantly share code, notes, and snippets.

View server.lisp
(defun server ()
(zmq:with-context (ctx)
(zmq:with-socket (socket ctx :rep)
(zmq:bind socket "tcp://")
(let ((query (make-instance 'zmq:msg)))
(zmq:recv socket query)
(let ((req-string (zmq:msg-data-as-string query)))
(format t "Recieved message: '~A'~%" req-string)
(zmq:send socket (make-instance 'zmq:msg :data req-string)) ))))))
View a.rb
#!/usr/bin/env ruby
class Node
attr_accessor :size, :num, :left, :right
def initialize(n)
self.size = 1
self.num = n
self.left = nil
self.right = nil
taksatou /
Last active Aug 29, 2015
embench result

echo 100000回実行

lang msec
(control) 2.134
Lua 15.164
LuaJIT 12.531
Squirrel 22.273
V8 100.93
mruby 36.118
taksatou / test
Created Sep 13, 2021
simple alart icons