File: hello.lisp

package info (click to toggle)
ecl 20.4.24%2Bds-2
  • links: PTS, VCS
  • area: main
  • in suites: bullseye
  • size: 18,632 kB
  • sloc: ansic: 148,594; lisp: 67,213; xml: 8,221; asm: 5,551; sh: 3,145; makefile: 1,973; cpp: 190; java: 116
file content (7 lines) | stat: -rw-r--r-- 179 bytes parent folder | download | duplicates (4) 
1
2
3
4
5
6
7
 

(ffi::clines "extern const char *hello_string;")

(ffi::def-foreign-var ("hello_string" +hello-string+) (* :char) nil)

(print (ffi:convert-from-foreign-string +hello-string+))