| S-Lang | |
|---|---|
 S-Lang based editor,JED | |
| Developer | John E. Davis[1] |
| Stable release | 2.3.3[2]  / 5 August 2022 |
| Written in | S-Lang scripting language |
| Operating system | POSIX |
| Type | Widget toolkit |
| License | GPL 2.0 or later[3] |
| Website | www |
TheS-Lang programminglibrary is a software library forUnix,Windows,VMS,OS/2, andmacOS. It provides routines for embedding aninterpreter for the S-Langscripting language, and components to facilitate the creation oftext-based applications.[4] The latter class of functions include routines for constructing and manipulating keymaps, an interactive line-editing facility, and both low- and high-level screen/terminal management functions. It isfree and open-source software released under theGNU General Public License.
The S-Lang programming library was started in 1992 by John E. Davis, considering that functions he wrote for a text editor might be useful in other programs.[5] The earliest version of the library contained input/output routines for interacting with computer terminals and an implementation of a simple stack-based interpreter with aPostScript-likesyntax that he developed for use in a scientific plotting program. TheJED text editor was the first program to both embed the interpreter and use the terminal I/O components of the library.
The interpreter makes up most of the S-Lang library, and is also where most of the development takes place. Although the original syntax supported by the interpreter resembled PostScript, the syntax has evolved to be much more C-like, with added support forobject-oriented programming style constructs. As a reflection of Davis's background in physics and professional interest in scientific computing, the language natively supports many vectorizedarray-based operations similar toMATLAB andIDL.[6]
Until version 2.0, the interpreter was not a standalone program. Instead, Davis advocated embedding it into applications to make them extensible. Using the interpreter meant either embedding it in aC program, or using it in the context of another application (e.g., theJED editor). The S-Lang shell, slsh, was a demonstration program capable of little more than running scripts. Version 2.0, released in 2005, made slsh interactive, and it has evolved into an application in its own right, with a number of external modules for use by it. As such, it has become the S-Lang interpreter.
In the mid-1990s while porting thesc spreadsheet to the S-Lang library, Davis developed the library's screen management facility.[citation needed] This component was designed to optimize screen output (by minimizing the number of characters sent to the terminal), and provide a simple way to support a variety of terminals through an extra layer of abstraction between the application code and the terminal. Theslrn newsreader was the first application to make full use of this interface.[citation needed] Since then, a number of other programs (e.g.,Mutt[7]) have taken advantage of this feature of the library, and it has become arguably the most used aspect of the library, as this component is considered to be an alternative tocurses.[8][9] Since version 2.0, the screen management routines have had transparent support forUTF-8.
#! /usr/bin/env slsh% The program below solves the following problem:% Sort an input file that consists of lines like this%% var1=23 other=14 ditto=23 fred=2privatevariableKeys,Values;privatedefinesort_fun(i,j){variables,a,b;s=Values[i]-Values[j];!if(s)returnstrcmp(Keys[i],Keys[j]);returns;}defineslsh_main(){variableline,len,i,vals;foreachline(stdin){% Split string into an array of strings %% by using white chars and = as delimite%line=strtok(line," \t\n=");len=length(line)/2;if(len==0)continue;% Even elements are keys, odd are values% The [0::2] is an array containing indexes with a 2 specifying step% and creating indexes from 0 to the length(line)Keys=line[[0::2]];vals=line[[1::2]];% The variable is declared aboveValues=atoi(vals);i=array_sort([0:len-1],&sort_fun);% There are different ways of writing the result. Here is a% fast way that avoids a loop.% The empty parenthesis () denote variable declaration and specifies% that return value should be discarded()=printf("%s\n",strjoin(Keys[i]+"="+vals[i]," "));}}
