-
Notifications
You must be signed in to change notification settings - Fork 15
/
Copy pathgoldfish.cpp
29 lines (27 loc) · 996 Bytes
/
goldfish.cpp
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
//
// Copyright (C) 2024 The Goldfish Scheme Authors
//
// Licensed under the Apache License, Version 2.0 (the "License");
// you may not use this file except in compliance with the License.
// You may obtain a copy of the License at
//
// http://www.apache.org/licenses/LICENSE-2.0
//
// Unless required by applicable law or agreed to in writing, software
// distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
// WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. See the
// License for the specific language governing permissions and limitations
// under the License.
//
#include "goldfish.hpp"
#include <string>
int
main (int argc, char** argv) {
#ifdef TB_CONFIG_OS_WINDOWS
SetConsoleOutputCP (65001);
#endif
std::string gf_lib_dir = goldfish::find_goldfish_library ();
const char* gf_lib = gf_lib_dir.c_str ();
s7_scheme* sc= goldfish::init_goldfish_scheme (gf_lib);
return goldfish::repl_for_community_edition (sc, argc, argv);
}