arialdomartini

using Xunit;

namespace CSharpBits.Test;

record Payment
{
    internal record Mastercard : Payment;
    
    internal record Visa : Payment;
    

arialdomartini

<ItemGroup>
    <AssemblyAttribute Include="System.Runtime.CompilerServices.InternalsVisibleTo">
        <_Parameter1>DynamicProxyGenAssembly2</_Parameter1>
    </AssemblyAttribute>
</ItemGroup>

arialdomartini

(defun duplicate-line ()
  (interactive)
  (beginning-of-line)
  (let ((from (point)))
    (end-of-line)
    (let ((to (point)))
      (kill-ring-save from to)
      (newline)
      (yank))))

arialdomartini

Emacs 28 -> 30

From emacs 28 to 30, several compilation errors, in particular with straight.el

straight magic

From https://github.com/radian-software/straight.el#packages-and-the-init-file "Note that this means packages installed interactively (using M-x straight-use-package) are not considered part of your Emacs configuration, since the invocation of straight-use-package does not happen in your init-file." How can it be?

arialdomartini

Domanda

Inventa una situazione iperbolica e assurda nella quale un giudice preferisce assumere un medriocre suonatore di volpi piuttosto che un sublime pianista. Descrivi le adsurde giustificazioni che questo personaggio potrebbe portare avanti, in un testo di una commedia sulle stolr di Ionescu

Risposta

In un tribunale assurdo, il giudice decise di assumere un suonatore di volpi mediocre piuttosto che un sublime pianista per il suo concerto di beneficenza annuale. Quando gli venne chiesto il motivo di questa decisione incredibile, il giudice rispose con una serie di assurde giustificazioni.

Innanzitutto, il giudice disse che il suonatore di volpi era l'unico che poteva eseguire la famosa "Sinfonia delle Volpi" che era necessaria per l'evento. Inoltre, il giudice affermò che il suonatore di volpi aveva una grande presenza sul palco e sarebbe stato più divertente per il pubblico guardare qualcuno che correva dietro alle volpi piuttosto che ascoltare la sublime melodia del pianista.

Quando gli venne chie

arialdomartini

(defun repeat-previous-line-char (char)
  "Repeats a character until the end of previous line."
  (interactive "cEnter character to repeat")
  (let ((col (save-excursion
                            (forward-line -1)
                            (end-of-line)
                            (current-column))))
    (while (< (current-column) col)
      (insert char))))

arialdomartini

calculateLargest :: Int
calculateLargest = largest (100,100) 0

next :: (Int, Int) -> (Int, Int)
next (x, 999) = (x+1, 100)
next (x, y) =   (x, y+1)

largest :: (Int, Int) -> Int -> Int
largest (1000, _) champion = champion
largest counter@(x,y) champion =

arialdomartini

module IO.IOSpec where

import Test.Hspec

-- A function returning IO
f :: IO String
f = do return "mario"

printHelloProduction :: IO()
printHelloProduction = printHello putStrLn

arialdomartini

// type Result = Success of int | Error of string
record Result
{
    internal record Success(int Value) : Result;
    internal record Error(string Message) : Result;
}

public class DiscriminatedUnionTypes
{
    [Fact]

arialdomartini

type Result = String | number

let successful: Result = 42
let failed : Result = "file not found"
console.log(typeof successful)
console.log(typeof failed)

let connectionString: String = "blabla"