bakpakin

###
### dagbuild.janet
###
### A module for building files / running commands in an order.
### Building blocks for a Make-like build system.
###

#
# DAG Execution
#

dz4k

-- Usage: _="install Draggable(dragHandle: .titlebar in me)"

behavior Draggable(dragHandle)
  init
    if no dragHandle set the dragHandle to me
  end
  on pointerdown(clientX, clientY) from dragHandle
    halt the event
    trigger draggable:start -- hooks, e.g. for adding a drop shadow while dragging
    measure my x, y

sogaiu

(var steps 0)

(defn my-repl
  [the-syms]
  (def chunks
    (fn [buf p]
      (getline (string/format "\nrecent: %p\nsteps: %d\n> "
                              (keys the-syms) steps)
               buf the-syms)))
  #

ityonemo

A half-hour to learn Zig

This is inspired by https://fasterthanli.me/blog/2020/a-half-hour-to-learn-rust/

Basics

the command zig run my_code.zig will compile and immediately run your Zig program. Each of these cells contains a zig program that you can try to run (some of them contain compile-time errors that you can comment out to play with)

subsetpark

(defmacro
  defclass
  `
  Define a CLOS-style class.
  `
  [name parent & attributes]
  (def forms @[])
  (let [init-args @[]
        names-with-defaults (mapcat |[(keyword ($0 0)) (($0 1) :default)]
                                    attributes)]

felixr

URL	Stars	Created
http://github.com/ahungry/ahungry-janet	3	2020-05-29 02:54:07
http://github.com/ahungry/ahungry-janet-user	0	2020-05-29 04:28:45
http://github.com/ahungry/janet-code	8	2019-07-28 05:10:59
http://github.com/ahungry/janet-p99-map	1	2020-05-10 04:13:27
http://github.com/ahungry/janet-pobox	7	2020-05-27 04:36:08
http://github.com/ahungry/janet-xbuild	2	2020-05-28 14:17:09
http://github.com/ahungry/puny-gui	83	2020-04-24 02:52:59
http://github.com/ahungry/puny-server	1	2020-04-23 01:42:38

sogaiu

bakpakin (https://gitter.im/janet-language/help?at=5fcc1cf375f7397e29f66fcc)

There are several functions for printing out "readable" versions of values, so I'll try to explain some of this:

• string, symbol, buffer, keyword - constructors for these byte sequences. Other byte sequences will get spliced in, things like numbers and tables will get converted as with describe.

• describe - Get a human readable but non-recursive description of a value as a string. This means the identity of an object should be more or less determinable from the output (i.e. if they print the same, they are probably =). For things like tables, tuples, structs and arrays, this means printing the pointer since these are recursive types.

• pp - not really relevant actually, since the output of this is configurable.

sogaiu

Life of a Janet Expression

Overall Flow

via janet cli:

• cli-main (definition)
  • repl (definition)
    • run-context (definition)
• parser/new ([src/core/parse.c cfun_parse_parser](https://github.com/janet-lang/j

sogaiu

from ctypes import *

# macos may need .dylib
# windows may need WinDLL and .dll
dll = CDLL("./libjanet.so")

dll.janet_init()

# http://michas.eu/blog/c_ints.php?lang=en
# https://stackoverflow.com/a/13293860

sogaiu

https://github.com/janet-lang/janet/blob/master/src/include/janet.h
https://github.com/janet-lang/janet/blob/master/src/core/abstract.c
https://github.com/janet-lang/janet/blob/master/src/core/marsh.c
https://github.com/janet-lang/janet/blob/master/src/core/typedarray.c
https://github.com/janet-lang/janet/blob/master/src/core/peg.c

/* A context for marshaling and unmarshaling abstract types */
typedef struct {
    void *m_state;
    void *u_state;