fix: docs of docs.ExternFunctionDocs has always been empty

Author: vknabel

ast/decl-extern-func.go

@@ -6,6 +6,7 @@ type DeclExternFunc struct {
 	Name       Identifier
 	Parameters []DeclParameter
 
+	Docs     *Docs
 	MetaInfo *MetaDecl
 }
 
@@ -28,3 +29,7 @@ func MakeDeclExternFunc(name Identifier, params []DeclParameter, source *Source)
 		MetaInfo:   &MetaDecl{source},
 	}
 }
+
+func (decl DeclExternFunc) ProvidedDocs() *Docs {
+	return decl.Docs
+}

parser/parse-decl-extern.go

@@ -15,6 +15,7 @@ func (fp *FileParser) ParseExternDeclaration() (*ast.Decl, []SyntaxError) {
 			return nil, errs
 		}
 		funcDecl := ast.MakeDeclExternFunc(name, params, fp.AstSource())
+		funcDecl.Docs = fp.ConsumeDocs()
 		decl = *funcDecl
 		return &decl, nil
 	}

runtime/external-docs.go

@@ -197,7 +197,7 @@ func docsInspectValue(value RuntimeValue, env *Environment) (RuntimeValue, *Runt
 		}
 		return env.MakeDataRuntimeValue("ExternFunctionDocs", map[string]Evaluatable{
 			"name":   NewConstantRuntimeValue(PreludeString(value.Decl.Name)),
-			"docs":   NewConstantRuntimeValue(PreludeString("")),
+			"docs":   NewConstantRuntimeValue(PreludeString(value.Decl.Docs.Content)),
 			"params": NewConstantRuntimeValue(paramsList),
 		})
 	case RxVariableType: