Oh, this bottle of coconut water has "no added sugar"; I wonder if it's okay for my diabetes?
*checks the macros*
(It's roughly equivalent to a can of coke.)
*drinks it anyway*
A question for the #lisp folx:
What, if anything, is the difference between #'(lambda ...) and just plain (lambda ...)?
They seem functionally equivalent to me.
like this
I've been taking a bunch of tests to qualify for a transcription job. They're not easy and I need a perfect score to pass. I finally failed one of the tests but managed to pass it on the retry.
They're really picky about their style guide. Fortunately, it basically amounts to syntax rules and I've been dealing with compilers that are equally picky about syntax for decades.
It also helps that all throughout my schooling my mother worked at the local university proofreading research scientists' papers and she insisted on proofreafing all my essays too.
I never thought I'd end up being happy about that.
So the cooldown period for me to re-take the exam is over. They want me to redo The. Whole. Damn. Thing.
Fine, whatever. It'll take me a few days to get through it all, but I don't expect to fail again.
Given how their style guide is now permanently burned into my brain, there's a tiny vindictive part of me that toyed with the idea of spinning up a competing service. That's probably more throuble than it's worth, though.
I see now why they're always hiring. I wonder how many people get to the prequalification exam and then just decide it's not worth it.
Judy Anderson reshared this.
#LambdaMOO
like this
Digital Mark λ βοΈ πΉ π½ reshared this.
Got my hands on a #shortwave radio, but the fact that I live in a giant concrete box doesn't seem to be helping my reception. Seeing what I can do about that.
Are there any broadcasts that are worth catching that I'd be able to get in Southern Ontario?
Kevin Davy reshared this.
(defun lambdamoo-tab-complete ()
"Complete user input using text from the buffer"
(interactive)
(when (memq (char-before) '(? ?\r ?\n ?\t ?\v))
(user-error "Point must follow non-whitespace character"))
(let (replace-start
(replace-end (point))
replace-text found-pos found-text)
(save-excursion
(backward-word)
(setq replace-start (point)
replace-text (buffer-substring replace-start replace-end))
(when (or (null lambdamoo--search-text)
(not (string-prefix-p lambdamoo--search-text replace-text t)))
(setq-local lambdamoo--search-text replace-text)
(set-marker lambdamoo--found-point (point)))
(goto-char lambdamoo--found-point)
(unless
(setq found-pos
(re-search-backward
(concat "\\b" (regexp-quote lambdamoo--search-text))
(point-min) t))
(setq-local lambdamoo--found-point (make-marker))
(user-error "No match found"))
(set-marker lambdamoo--found-point found-pos)
(forward-word)
(setq found-text (buffer-substring found-pos (point))))
(delete-region replace-start replace-end)
(insert found-text)))#emacs #lisp #moo #mud #LambdaMOO
reshared this
@Omar AntolΓn Actually, looking more closely at it, it might just do the trick.
I love it when I spend hours re-writing code that essentially already exists. ;)
In the end, I wound up just binding tab to dabbrev-expand. π
It might seem like I wasted a bunch of time writing that, but at least I learned a bunch along the way.
Me realizing that festival uses a Lisp dialect:
Oh cool, I can add accessibility features to my Emacs stuff by procedurally generating the code in elisp.
Me realizing that festival's symbols are case sensitive:
Welp, I guess I can just doand do the rest of the processing in elisp directly. That's probably all I wanted anyway.(defun festival-saytext (text) (format "(SayText %S)" text))
Isaac Kuo likes this.
Hey all,
I have a friend who's been trying to get on Mastodon but tells me that it doesn't seem to play well with screen readers. I know there are plenty of people on the fedi who do use screen readers, but I have no experience with them myself, so I can't really direct him.
Can someone who does use a #ScreenReader point me in the direction of some resources that might be useful?
#AskFedi #a11y
like this
reshared this
I'm certain I have reinvented a wheel here, but for the life of me I can't find it. Have I?
(defmacro jrl-extract-list (vars list &rest body)
"Split a list into indiviual variables"
(let ((list* (gensym)))
(append
`(let ,(cons (list list* list) vars))
(seq-map (lambda (var)
`(setq ,var (car ,list*)
,list* (cdr ,list*)))
vars)
body)))#emacs #lisp #elisp
Edit: Of course it was pcase.
Was loading stuff onto my Jellyfin server for my mom to watch in the hospital. She liked Star Trek and I thought Strange New Worlds might be a good idea because it's a more fun show than a lot of the other recent Trek shows.
I started watching the first episode to be sure it was working, and realized I'd forgotten the whole thing about what happens with Captain Pike.
...maybe this show isn't the vibe after all...
Fuck.
My mother had a major stroke today. All I can do right now is sit in the waiting room... waiting.
like this
like this
She spoke! A whole damn sentence!
Of course, it was to chew my dad out for wearing a sweater full of cat hair.
He's never been so happy to be given the gears. π
like this
royae
in reply to Jonathan Lamothe • • •(lambda ...) is just a macro call that expand in the other form.
From the common lisp spec :
Dave Tenny
in reply to Jonathan Lamothe • • •Holger
in reply to Jonathan Lamothe • • •Pascal Costanza
in reply to Jonathan Lamothe • • •Svante
in reply to Jonathan Lamothe • • •Seemingly plain (lambda () ...) is a macro that expands to (function (lambda () ...)). #'(lambda () ...) uses a reader macro to expand to the same (function (lambda () ...)).
clhs.lisp.se/Body/m_lambda.htm
Function is a special operator that returns a function. It takes either a function name or a lambda expression. The second case is what is happening here.
clhs.lisp.se/Body/s_fn.htm#funβ¦
A lambda expression is a list of the symbol lambda, a lambda list, and a body.
clhs.lisp.se/Body/26_glo_l.htmβ¦
CLHS: Macro LAMBDA
clhs.lisp.se