bshepherdson

bshepherdson

(ns repro
  (:require
   [clojure.test :refer [deftest is testing]]
   [com.wsscode.pathom3.connect.built-in.resolvers :as pbir]
   [com.wsscode.pathom3.connect.indexes :as pci]
   [com.wsscode.pathom3.connect.operation :as pco]
   [com.wsscode.pathom3.interface.eql :as p.eql]))

(deftest more-input-more-problems
  (let [map-data     {123 {:data/name "Alice"}

bshepherdson

• Ominous thunder and lightning
• Every gun shot
• Every time the doorbell rings
• Screaming (not just shouting)
• Every death
• “Communism is a red herring”
• Each time Mr. Green gets slapped
• Each time something is spoken in unison
• "To make a long story short..." drink before it's "too late"

bshepherdson

Stress Test

I'm stress testing Glimmer by rendering a counter and a big table (current 100 wide and 300 tall) of cells holding just a 1.

I'd like the whole thing to render at a respectable pace, maybe a few seconds for such a large nested {{#each}}. And above all I want the increment button to feel responsive.

bshepherdson

testAsync
	| p |
	self timeout: 100.
	p := Promise new: [ :model | [ model value: 7 ] valueWithTimeout: 300 ].
	p then: [ :x | self assert: x equals: 7. self finished ] catch: [ self signalFailure: 'Promise error' ].

bshepherdson

Generic Keyboard

---=I NEED A LOGO=---

Item	Value	Comment
Vendor code	0x1c6c8b36	NYA Elektriska

bshepherdson

use "net"

primitive _PayloadStart
primitive _PayloadHeaders
primitive _PayloadContentLength
primitive _PayloadChunkStart
primitive _PayloadChunk
primitive _PayloadChunkEnd
primitive _PayloadBody
primitive _PayloadReady

bshepherdson

actor Main
  new create(env: Env) =>
    var o = bar()
    var s: String val = recover val
      var t: String ref = String()
      t.concat(consume o)
      t
    end
    env.out.print(s)

bshepherdson

use "collections"

type JsonValue is (String | I32 | F64 | None)

primitive JsonTokenStartArray
primitive JsonTokenEndArray
primitive JsonTokenStartObject
primitive JsonTokenEndObject
primitive JsonTokenFieldName
primitive JsonTokenNull

bshepherdson

class Foo[A: Any #read]
  let _value: A
  new create(v: A) => _value = v
  fun foo(): A => _value