pathname : THEORY
BEGIN
pathname_path(name:string) : list[string]
pathname_name(name:string) : string
pathname_type(name:string) :string
pathname_dir(name:string) : string =
LET path = pathname_path(name) IN
IF null?(path) THEN ""
ELSIF car(path) = "/" THEN
format("/~{~a/~}",{|cdr(path)|})
ELSE
format("~{~a/~}",{|path|})
ENDIF
END pathname
¤ Dauer der Verarbeitung: 0.14 Sekunden
(vorverarbeitet)
¤
|
Haftungshinweis
Die Informationen auf dieser Webseite wurden
nach bestem Wissen sorgfältig zusammengestellt. Es wird jedoch weder Vollständigkeit, noch Richtigkeit,
noch Qualität der bereit gestellten Informationen zugesichert.
Bemerkung:
Die farbliche Syntaxdarstellung ist noch experimentell.
|