kddnewton

require "syntax_tree"

# Create a new visitor that is going to visit the parsed tree.
visitor = SyntaxTree::Visitor::MutationVisitor.new

# Define a mutation on the visitor that is going to search for the given pattern
# to find nodes that match it and then call the given block to mutate the node
# in place in the tree.
visitor.mutate("If[predicate: Assign | OpAssign]") do |node|
  # Get the existing If's predicate node.

kddnewton

# frozen_string_literal: true

module SyntaxTree
  # This class is used to create a mutation that transforms syntax trees based
  # on various linting rules.
  class Linter
    def mutation
      SyntaxTree.mutation do |mutator|
        # Lint/AssignmentInCondition
        mutator.mutate("IfNode[predicate: Assign | OpAssign] | UnlessNode[predicate: Assign | OpAssign] | WhileNode[predicate: Assign | OpAssign] | UntilNode[predicate: Assign | OpAssign]") do |node|

kddnewton

def count(iseq)
  iseq[12].select { _1 in [:ensure | :rescue, *] }.sum { count(_1[1]) } +
  iseq[13].sum do
    case _1
    in Integer | Symbol
      0
    in [*, ["YARVInstructionSequence/SimpleDataFormat", *] => child, *]
      1 + count(child)
    in Array
      1

kddnewton

def c2e(string) = string.chars.map { |char| [char.ord + 128000].pack("U") }.join
def e2c(string) = string.unpack("U*").pack("c*")

c2e("Hello, world!")
# => "👈👥👬👬👯🐬🐠👷👯👲👬👤🐡"

e2c("👈👥👬👬👯🐬🐠👷👯👲👬👤🐡")
# => "Hello, world!"

e2c(c2e("Hello, world!"))

kddnewton

#!/usr/bin/env ruby
# frozen_string_literal: true

VM_DEFINECLASS_TYPE_CLASS           = 0x00
VM_DEFINECLASS_TYPE_SINGLETON_CLASS = 0x01
VM_DEFINECLASS_TYPE_MODULE          = 0x02
VM_DEFINECLASS_FLAG_SCOPED          = 0x08
VM_DEFINECLASS_FLAG_HAS_SUPERCLASS  = 0x10

def log(line, event, message)

kddnewton

# frozen_string_literal: true

require "bundler/inline"

gemfile do
  source "https://rubygems.org"
  gem "json_pure"
  gem "benchmark-ips"
end

kddnewton

putspecialobject 3
putnil
defineclass :FooBar, 0
  definemethod :foo
    putobject "FooBar#foo"
    leave

  definemethod :bar
    putobject "class variable"
    setclassvariable :@@bar

kddnewton

#include <stdbool.h>
#include <stddef.h>
#include <fcntl.h>
#include <stdio.h>
#include <stdlib.h>
#include <sys/mman.h>
#include <sys/stat.h>
#include <unistd.h>

// Each entry in this lookup table indicates whether a character is a valid

kddnewton

require "yarp"

module YARPAST
  def yarp_ast
    ast =
      begin
        RubyVM::AbstractSyntaxTree.of(self, keep_script_lines: true)
      rescue ArgumentError
      end

kddnewton

# frozen_string_literal: true

require "bundler/inline"

gemfile(true) do
  source "https://rubygems.org"
  gem "activerecord", "~> 7.0.0"
  gem "sqlite3"
end