Re: Lisp Reader & Tools

What you want to do is to port poly-mode.el to the LW editor.

Don't look at me.

MA


On Thu, May 28, 2026 at 7:28 PM David McClain (as dbm at
refined-audiometrics dot com) <[email protected]> wrote:

> Yes, the code is actually within a Lisp “Here-doc”
>
> (interpret #>.end
>  …..
> .end)
>
> which inhales all the text between #>.end and .end. It is arbitrary token
> syntax within the body of the inhaled text (il.e. Not Lisp).
>
>
>
> > On May 28, 2026, at 10:07, Martin Simmons <[email protected]> wrote:
> >
> > The first #| inside the double-quotes shouldn't need a closing |#, so I'm
> > puzzled by that.
> >
> > Is this text inside a file that also contains Lisp code?  If not, then
> the
> > Editor shouldn't be editing it in Lisp mode.
> >
> > This looks somewhat like Forth, but Google doesn't find anything useful
> about
> > the case esac words so I'm not sure.
> >
> > --
> > Martin Simmons
> > LispWorks Ltd
> > http://www.lispworks.com/
> >
> >
> >
> >>>>>> On Thu, 28 May 2026 08:27:02 -0700, David McClain (as dbm at
> refined-audiometrics dot com) said:
> >>
> >> With regard to the inability of mere regular expressions guiding the
> text editor, here is a snippet of code that needs those accessory comments
> mentioned previously. Note the funny comment on the first line “— |# |#”.
> That was needed so that the Editor wouldn’t get confused by all the
> vertical nbars in the code on the left...
> >>
> >> (
> >> : skipper
> >>     case { "#|"      string= } { [compile] #|  }  -- |# |#
> >>          { ";;"      string= } { [compile] ;;  }
> >>          { ";;;"     string= } { [compile] ;;; }
> >>          { "--"      string= } { [compile] --  }
> >>          { "("       string= } { [compile] (   }
> >>          { "#+IF"    string= } { skip-to-fi    }
> >>          { "#-IF"    string= } { skip-to-fi    }
> >>          { "\""      string= } { skip-quote    }
> >>          { ".\""     string= } { skip-quote    }
> >>          { "error\"" string= } { skip-quote    }
> >>      esac ;
> >>
> >
> > _______________________________________________
> > Lisp Hug - the mailing list for LispWorks users
> > [email protected]
> > http://www.lispworks.com/support/lisp-hug.html
>
>
> _______________________________________________
> Lisp Hug - the mailing list for LispWorks users
> [email protected]
> http://www.lispworks.com/support/lisp-hug.html
>


-- 
Marco Antoniotti, Professor, Director         tel. +39 - 02 64 48 79 01
DISCo, University of Milan-Bicocca U14 2043   http://dcb.disco.unimib.it
Viale Sarca 336
I-20126 Milan (MI) ITALY

REGAINS: https://regains.disco.unimib.it/